Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Fox pro y SQL Server 2000
Message
From
30/07/2003 17:09:20
 
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00814886
Message ID:
00815137
Views:
15
el codigo es el siguiente
STORE SQLSTRINGCONNECT('dsn=conefox;uid=nn;pwd=nn') TO ln_sql

IF ln_sql <= 0
MESSAGEBOX('Imposible Conectar con base de datos Sql',48,'Master Retail')
ELSE
WAIT windows 'Buscando Informacion de Empleados...' nowait
lc_empleados = "select * from empleados order by compania,numep"
= SQLSETPROP(ln_sql, 'asynchronous', .F.)
= SQLEXEC(ln_sql, lc_empleados, 'LC_EMPLEADO1')

lc_emp = "select nombre,codigo,nomenc from empresa"
= SQLSETPROP(ln_sql, 'asynchronous', .F.)
= SQLEXEC(ln_sql, lc_emp, 'LC_EMPrEsa')
ENDIF

SELECT *, cia_autoriza as ciaa from LC_EMPLEADO1 INTO TABLE c:\LC_EMPLEADO

SELECT LC_EMPLEADO1
use
= SQLDISCONNECT(ln_sql)

este es el codigo que utilizo, revise la estructura de la tabla y el campo mas grande es un char de 30....

gracias.
El Hombre que dice
"No Puede Hacerse",
será sorprendido por
"Alguien que lo Haga"
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform