Y que es lo que ocurria?
El tema del ADODB es interesante.
fins aviat...
�lex Corretg�
"Arbues Sanz, Jesus" <[EMAIL PROTECTED]>@QUIJOTE.COMBIOS.ES con
fecha 11/11/2002 15:17:45
Por favor, responda a [EMAIL PROTECTED]
Tram�s per: [EMAIL PROTECTED]
Destinataris: [EMAIL PROTECTED]
C�pia:
Classificat: |----------------|
| ( ) Important |
| ( ) urgent |
| ( ) hist�ric |
| ( ) temporal |
| ( ) bretolada |
| ( ) particular |
|----------------|
Assumpte: RE: Ejecuci�n de un comando del AS400 con ADO
Ya lo he conseguido, perdonar las molestias, pero estaba perdido....
Un saludo y grac=EDas.
Jes=FAs
-----Mensaje original-----
De: Arbues Sanz, Jesus [mailto:jesus.arbues@;dkvseguros.es]
Enviado el: lunes, 11 de noviembre de 2002 10:21
Para: [EMAIL PROTECTED]
Asunto: Ejecuci=F3n de un comando del AS400 con ADO
> Buenos d=EDas.
>=20
> Vuelvo con el tema de llamar un RPG desde HTML, estoy probando con
> ADO y me surge un problema, sera una tonteria pero imagino que alguno =
se
> le habra planteado.
>=20
> Tengo este c=F3digo en una ASP:
>=20
>=20
> <%@ Language=3DVBScript %>
> <%=20
> cnx =3D"Provider=3DIBMDA400;Data Source=3DXXX.XXX.XXX.XXX;User
> Id=3DAAA;Password=3DAAA"
> set cmd =3D CreateObject("ADODB.Command")
>=20
> cmd.ActiveConnection =3D cnx
>=20
> cmd.CommandText =3D "{{CALL PRUWEB/SNDMSG1(?)}}"
> cmd.CommandType =3D 1
> cmd.parameters.append cmd.CreateParameter("P1",129,1,5)
> cmd("P1") =3D cstr(request.form("PARM1"))
> =20
> line18 cmd.execute
>=20
> response.write "C=F3digo ejecutado"
> end if %>
>=20
> El parametro que mando es de 5 string y en el CL de 5 *char, y me da
> el siguiente error.
>=20
> Tipo de error:
> (0x80004005)
> Error no especificado=20
> /pruebas/AS400/sndpgm_CON_parametros_ADODB.asp, line 18
> He estado mirando c=F3digo en la web pero no doy con el chiste, si
> alguno me puede ayudar os lo agradecer=E9
>=20
> Un saludo,
>=20
> Jes=FAs
>=20
>=20
_____________________________________________________
Forum.HELP400 es un servicio m=E1s de NEWS/400.
=A9 Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env=EDa el mensaje resultante de pulsar
mailto:forum.help400-request@;combios.es?body=3DLEAVE
_____________________________________________________
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:forum.help400-request@;combios.es?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:forum.help400-request@;combios.es?body=LEAVE
