Ya lo he conseguido, perdonar las molestias, pero estaba perdido.... Un saludo y grac�as.
Jes�s -----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�n de un comando del AS400 con ADO > Buenos d�as. > > 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. > > Tengo este c�digo en una ASP: > > > <%@ Language=VBScript %> > <% > cnx ="Provider=IBMDA400;Data Source=XXX.XXX.XXX.XXX;User > Id=AAA;Password=AAA" > set cmd = CreateObject("ADODB.Command") > > cmd.ActiveConnection = cnx > > cmd.CommandText = "{{CALL PRUWEB/SNDMSG1(?)}}" > cmd.CommandType = 1 > cmd.parameters.append cmd.CreateParameter("P1",129,1,5) > cmd("P1") = cstr(request.form("PARM1")) > > line18 cmd.execute > > response.write "C�digo ejecutado" > end if %> > > El parametro que mando es de 5 string y en el CL de 5 *char, y me da > el siguiente error. > > Tipo de error: > (0x80004005) > Error no especificado > /pruebas/AS400/sndpgm_CON_parametros_ADODB.asp, line 18 > He estado mirando c�digo en la web pero no doy con el chiste, si > alguno me puede ayudar os lo agradecer� > > Un saludo, > > Jes�s > > _____________________________________________________ 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
