Visual FoxPro.NET - parametros SP

   
Vista:

parametros SP

Publicado por viajeronet (14 intervenciones) el 06/03/2010 17:12:04
Hola de nuevo por aca, agradeciendo a Dios la salud que tengo.
Mi pregunta es;
Trabajo con VFP 7, y me conecto a SQL a travez de ADO oledb, estoy tratando de enviar parametros a un procedimiento almacenado, los comandos son:

*Grabar utilizando stored procedure
oclass = CREATEOBJECT("clases_comunes")
oconn = oclass.obtener_conexion()
ocomm = oclass.obtener_command()
ocomm.commandtext = "spactualizarempleado"

ocomm.commandtype = 4 && adCmdStoredProc = 4
ocomm.commandtimeout = 86400
ocomm.activeconnection = oconn

*----Primero Borra los parametros del objeto Command
vnum_param = ocomm.Parameters.Count
If vnum_param > 0
i = 1
Do While i <= vnum_param
ocomm.Parameters.Delete(0)
i = i + 1
Enddo
Endif
ocomm.Parameters.refresh
********************
***********************

***CUANDO LLEGO AQUI SALE EL ERROR "NO HAY VARIABLE ADVARCHAR" Y ASI CONSECUTIVAMENTE CON LOS OTROS TIPOS DE VARIABLE

ocomm.Parameters.Append(ocomm.createparameter("RETURN_VALUE", adInteger, adparamreturnvalue, 4))
ocomm.Parameters.Append(ocomm.createparameter("@id", advarchar, adparaminput, 20, ThisForm.TXTCODIGO.VALUE))
ocomm.Parameters.Append(ocomm.createparameter("@nombres", advarchar, adparaminput, 70, ThisForm.TXTNOMBRE.VALUE))
ocomm.Parameters.Append(ocomm.createparameter("@apellidos", advarchar, adparaminput, 70, ThisForm.TXTAPELLIDOS.VALUE))

COMO SOLUCIONO ESTE PROBLEMA??

GRACIAS POR LA AYUDA.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder