Pues te mando un ejemplo.
Dim WithEvents CONEXION As ADODB.Connection
Private Sub Form_Load()
Dim SYSNAME As String
Dim CL As String
SYSNAME = "xxxxxxxx"
CL = "CALL BIBLIOTECA.PROGRAMA ('PARAMETRE ')"
Set CONEXION = New ADODB.Connection
CONEXION.Open "PROVIDER=IBMDA400;DATA SOURCE=" & SYSNAME & ";", "", ""
CONEXION.Execute (CL)
CONEXION.Close
Unload Me
End Sub
Private Sub Form_Unload(Cancel As Integer)
End
End Sub
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]En nombre de Candel Arroyes,
Jordi
Enviado el: lunes 2 de diciembre de 2002 10:05
Para: '[EMAIL PROTECTED]'
Asunto: RE: Llamar un Cl remotamente.
si, utilizo ADO.
-----Mensaje original-----
De: Alberto [mailto:[EMAIL PROTECTED]]
Enviado el: viernes, 29 de noviembre de 2002 17:49
Para: [EMAIL PROTECTED]
Asunto: RE: Llamar un Cl remotamente.
Lo haces con ADO?
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]En nombre de Candel Arroyes,
Jordi
Enviado el: viernes 29 de noviembre de 2002 16:10
Para: '[EMAIL PROTECTED]'
Asunto: Llamar un Cl remotamente.
Buenas tardes Foro.
Intento llamar un CL con par�metros desde una aplicaci�n de visual Basic
pero con resultado no satisfactorio.
Si no me da error de sintaxis, me da error de ODBC's.. Es la primera vez que
tengo que hacer algo parecido y no s� si
lo hago de forma correcta.
Muchas gracias de antemano.
Jordi Candel.
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=LEAVE
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=LEAVE
