Cómo ejecutar un Procedure SQL Server 2000 en Visual Basic 6.0

[francog]

Mira este es otro ejemplo que a mi juicio es mucho mas simple y tb. funciona para ASP o VB

acá vá

************************************************** **

Set dbConnection = Server.CreateObject("ADODB.Connection")
dbConnection.ConnectionTimeout = 1024
dbConnection.CommandTimeout = 1024
dbConnection.Open ("DSN=DSNTestFranco;UID=sa;PWD=;DATABASE=TestFranc o;APP=ASP script") 'Debe Existir en tu Pc (ODBC)

SQLQuery = "SELECT Nombre FROM Amigos Order by Nombre"
Response.Write "<br>" & SQLQuery
Set rsQuery = dbConnectionSQL.Execute(SQLQuery)

Do While Not(rsQuery.EOF)
Response.Write "<br>" & rsQuery("Nombre_Campo") 'para ASP
MsgBox rsQuery("Nombre_Campo") 'para Visual Vasic
MoveNext
Loop


Set dbConnection = Nothing
************************************************** **

Salu2