Como hacer una llamada con ADO a un procedimiento almacenado en SQL-server
Hola estoy intentando saber como se hace una llamada a un procedimiento almacenadao desde visual basic mi codigo es este:
Dim Qy As New ADODB.Command
Dim cn As New ADODB.Connection
Dim rs as New ADODB.RecordSet
Dim Parm As New ADODB.Parameter
cn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=baseDatos;Data Source=Dominio"
Set Qy.ActiveConnection = cn
Qy.CommandType = adCmdStoredProc
Dim fecha As Date
fecha = CDate("15/12/2004")
Qy.Parameters.Append Qy.CreateParameter("Fecha", adDate, adParamInput, 8, fecha)
Qy.CommandText = "NombreProcedimientoAlmacenado"
Set rs = Qy.Execute
MsgBox (Qy.Parameters(1).Value)
pero con esto no me va.
a ver si alguien me puede hechar una mano gracias.
Dim Qy As New ADODB.Command
Dim cn As New ADODB.Connection
Dim rs as New ADODB.RecordSet
Dim Parm As New ADODB.Parameter
cn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=baseDatos;Data Source=Dominio"
Set Qy.ActiveConnection = cn
Qy.CommandType = adCmdStoredProc
Dim fecha As Date
fecha = CDate("15/12/2004")
Qy.Parameters.Append Qy.CreateParameter("Fecha", adDate, adParamInput, 8, fecha)
Qy.CommandText = "NombreProcedimientoAlmacenado"
Set rs = Qy.Execute
MsgBox (Qy.Parameters(1).Value)
pero con esto no me va.
a ver si alguien me puede hechar una mano gracias.