ADOFOX
HOLA, ME GUSTARIA SABER COMO PUEDO DAR DE ALTA REGISTROS DESDE FOXPRO 6.0 A UNA BASE DE DATOS DE ACCESS, Y COMO DESPLEGAR DESDE UN GRID LA TABLA DE ACCESS, SI ALGUNO DE USTEDES ME PUDIERA AYUDAR SE LO AGRADESERIA MUCHO, GRACIAS DE ANTEMANO.
Si estás familiarizado con Ado y los recordset esto te vá a resultar facil:
parameter emedebe,pwd,tabla
conexion=CreateObject("ADODB.Connection")
recordset=CreateObject("ADODB.recordset")
conexion.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" + emedebe + ";Persist Security Info=False;Jet OLEDB:Database Password=" + pwd
conexion.open
recordset.open(tabla,conexion)
Para agregar un registro nuevo:
recordset.addnew
recordset.fields(0).value="hola"
recordset.fields(1).value="mundo"
recordset.update
Para mostrar los datos en un grid de forma mas simple tenés que crear una vista remota (fijáte en la ayuda de fox está bien explicado) y la utilizás como cualquier tabla de fox.
thisform.grilla.recordsource="vistaremota"
PD: con la vista remota (pero creada de una forma especial) tambien se puede agregar, eliminar y modificar registos de la mdb.
parameter emedebe,pwd,tabla
conexion=CreateObject("ADODB.Connection")
recordset=CreateObject("ADODB.recordset")
conexion.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" + emedebe + ";Persist Security Info=False;Jet OLEDB:Database Password=" + pwd
conexion.open
recordset.open(tabla,conexion)
Para agregar un registro nuevo:
recordset.addnew
recordset.fields(0).value="hola"
recordset.fields(1).value="mundo"
recordset.update
Para mostrar los datos en un grid de forma mas simple tenés que crear una vista remota (fijáte en la ayuda de fox está bien explicado) y la utilizás como cualquier tabla de fox.
thisform.grilla.recordsource="vistaremota"
PD: con la vista remota (pero creada de una forma especial) tambien se puede agregar, eliminar y modificar registos de la mdb.
