Autoit.ES

Tengo una duda al consultar una base de datos SQL, segun yo el codigo esta bien (eso digo yo) pero no logro obtener cada registro de una tabla...}
Base:SoporteTec
Tabla: Actparametros
Columnas: Modulo, Version, Status

La consulta la realizo de la siguiente manera

Código: Seleccionar todo


$oMyError = ObjEvent("AutoIt.Error","oErrorConnect")
$sqlCon = ObjCreate("ADODB.Connection")
$sqlCon.Open("DRIVER={SQL Server};SERVER=10.0.1.243;DATABASE=SoporteTec;UID=admin;PWD=123;")

If @error Then
	MsgBox (0, "Actualizador", "La conexion a la base de datos fallo.", 10)
Else
	MsgBox (0, "Actualizador", "la conexion fue realizada", 3)
EndIf

Func oErrorConnect()
	;Funcion en caso de error
   Endfunc

$rs = ObjCreate("ADODB.RecordSet")
$dBaseUpdates = $rs.open ("SELECT * from Actparametros", $sqlCon)

  for $rsupdate in $dBaseUpdates
	ConsoleWrite ("Nombre: " & $rsupdate.Fields('Modulo').Value & @CRLF)
  next

El problema es que no me imprime ningun valor en el mensaje de la consola, seguro que es un simple detalle que no logro encontrar.
Mucho agradecere su apoyo.

Recupera los registros así:

Código: Seleccionar todo

while not $rs.eof     ;hasta que no llege a la posición de después del último registro continua el bucle (último registro + 1 = eof)
   ConsoleWrite ("Nombre: " & $rs.Fields('Modulo').Value & @CRLF)
   rs.movenext    ;se mueve al siguiente registro
wend

Si la conexión y la consulta a la bbdd está bien hecha, lo anterior te debe funcionar.

Por cierto, intenta meter las funciones al final y no en medio del código. Eso hará un código más claro y limpio.

Saludos.

Autoit.ES

Consulta SQL

Consulta SQL

Re: Consulta SQL