Creo que puedes resumir el comando en una sola instruccion que tenga el nombre del programa, los par�metros y la conexion, luego le haces el execute, a mi me funciona, ej:
Dim
comando As New SqlCommand("Programa '" & TextBox1.Text & "'", Me.SqlConnection1)Vicente Asensi <[EMAIL PROTECTED]> wrote:
Ya hace tiempo apareci� en el foro algo sobre esto pero no se lleg� a solucionar,
nuestro problema es que nos da un error al intentar hacer una llamada
desde .NET a un programa en AS400 (ya sea una CL o un RPG), en VB lo hacemos sin
ning�n problema.
Se produce el error al ejecutar el "ExecuteNonQuery",
se puede deducir que la forma de pasar par�metros no
es correcta o alg�n problema similar.
C�digo Fuente
DBCommand.Connection = conConection
DBCommand.CommandType = CommandType.Text
DBCommand.CommandText = "{{call /QSYS.LIB/PGMS.LIB/MIPGM.PGM(?)}}"
Dim DBParam As New OleDb.OleDbParameter("", Data.OleDb.OleDbType.Char, 3)
DBParam.Direction = ParameterDirection.Input
DBParam.Value = "077"
DBCommand.Parameters.Add(DBParam)
DBCommand.Prepare()
i = DBCommand.ExecuteNonQuery
Error
Excepci�n ! no controlada del tipo 'System.NullReferenceException' en system.data.dll
Informaci�n adicional: Referencia a objeto no establecida como instancia de un objeto.
Si alguien nos puede ayudar, Gracias
_____________________________________________________
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]
Yahoo! Messenger
Nueva versión: Super Webcam, voz, caritas animadas, y más ¡Gratis!
