none
Visual FoxPro 6.0 no me mustra los reguistros de mi base de datos en Sql Server 2005 RRS feed

  • Pregunta

  • Tengo que mostrar lo que tengo en una tabla de base de datos en sql server 2005 con visual foxpro 6.0, La tabla se llama departamentos, el campo llave es Id y tiene otra columna llamada nombre, uso este codio en el valid event del text box pero no me funciona.

    PRIVATE WVALOR
    wvalor="SELECT * FROM Departamentos WHERE Id="+ALLTRIM(STR(thisform.wId.Value))
    SQLEXEC(thisform.conexion,wvalor)
    thisform.wnombre.value=SQLRESULT.Nombre
    IF RECCOUNT('SQLRESULT')>0
    thisform.eliminar.enabled=.T.
    ENDIF

    jueves, 3 de noviembre de 2016 23:28

Respuestas

  • Allí no se muestra qué conexión usas al SQL (hay varios modos) pero una manera de ver el contenido de una tabla SQL desde VFP es:

    Crear una conexión DSN en el ODBC (driver SQL server) y le llamas sqldsn5

    Desde VFP usando vistas remotas:

    CREATE DATABASE testdata
    CREATE CONNECTION remote_01 DATASOURCE "sqldsn5" USERID "sa" PASSWORD "sa12345"

    CREATE SQL VIEW mivista CONNECTION remote_01 as select * from Departamentos    (respeta mayusc/minusc del nombre de la tabla en SQL)

    OPEN DATABASE testdata.dbc
    brow
    haces doble clic sobre objeto vista "mivista"

    Aqjui deberás ver la data, puedes usar comando copy to para guardarla en DBF. Si ves los datos en este ejercicio entonces tu código tiene errores en la conexión.

    domingo, 6 de noviembre de 2016 3:53

Todas las respuestas

  • asegúrate, si acaso con profiler, de que ese select te está devolviendo algún valor. Lamentablemente yo no se ni media palabra de fox, aunque el código que pones parece tener sentido

    Comparte lo que sepas, aprende lo que no sepas (FGG)
    portalSQL
    El rincón del DBA

    viernes, 4 de noviembre de 2016 6:52
    Moderador
  • Hola Beowulf1200.

    SqlExec te devuelve -1 si tienes un error..

    SqlExec te devuelve -1 si hubo error, prueba 

    If SqlExec(ThisForm.Conexion, wvalor) = -1

    aerror(laError)

    Messagebox(laError(1,3))

    endif

    Saludos.

    Mauricio

    viernes, 4 de noviembre de 2016 21:44
  • Allí no se muestra qué conexión usas al SQL (hay varios modos) pero una manera de ver el contenido de una tabla SQL desde VFP es:

    Crear una conexión DSN en el ODBC (driver SQL server) y le llamas sqldsn5

    Desde VFP usando vistas remotas:

    CREATE DATABASE testdata
    CREATE CONNECTION remote_01 DATASOURCE "sqldsn5" USERID "sa" PASSWORD "sa12345"

    CREATE SQL VIEW mivista CONNECTION remote_01 as select * from Departamentos    (respeta mayusc/minusc del nombre de la tabla en SQL)

    OPEN DATABASE testdata.dbc
    brow
    haces doble clic sobre objeto vista "mivista"

    Aqjui deberás ver la data, puedes usar comando copy to para guardarla en DBF. Si ves los datos en este ejercicio entonces tu código tiene errores en la conexión.

    domingo, 6 de noviembre de 2016 3:53