Conexion VisualFox - Paradox
Publicado por Rafael Chang (62 intervenciones) el 02/02/2001 15:52:59
Alguien sabe como puedo manipular una tabla Paradox desde Visual Fox?. Insertar, Borrar y Modificar los registros de la tabla de paradox desde Visual Fox.
Estoy usando el passtrhoug con el siguiente codigo:
Set Multilocks On
H = SqlConnect('PARADOX','admin','')
X = SQLEXEC(H,'SELECT * FROM C:\RAFAEL\Nom10003.DB','CP')
A = CursorSetProp('Tables','Nom10003')
A = CursorSetProp("UpdateNameList", "IDDEPARTAMENTO Nom10003.IDDEPARTAMENTO, NUMERODEPARTAMENTO Nom10003.NUMERODEPARTAMENTO, DESCRIPCION Nom10003.DESCRIPCION, DESCRIPCION Nom10003.DESCRIPCION, CUENTACW Nom10003.CUENTACW, TIMESTAMP Nom10003.TIMESTAMP")
A = CursorSetProp('KeyFieldList','IDDEPARTAMENTO')
A = cursorsetprop('updatablefieldlist', 'IDDEPARTAMENTO, NUMERODEPARTAMENTO, DESCRIPCION, BENEFICIARIO, CUENTACW, TIMESTAMP')
A = CursorSetProp('SendUpDates',.T.)
Begin transaction
INSERT INTO CP(IDDEPARTAMENTO, NUMERODEPARTAMENTO, DESCRIPCION, BENEFICIARIO, CUENTACW, TIMESTAMP) VALUES(24, 24, "INFORMATICA", "YO", "ADAD", DATETIME())
A = SQLCommit(h)
End trans
pero no hace el insert lo he intentado con el SQLEXEC y tampoco, marca error de conectividad ODBC.
Si alguien me puede ayudar se lo agradesco de antemano.
Estoy usando el passtrhoug con el siguiente codigo:
Set Multilocks On
H = SqlConnect('PARADOX','admin','')
X = SQLEXEC(H,'SELECT * FROM C:\RAFAEL\Nom10003.DB','CP')
A = CursorSetProp('Tables','Nom10003')
A = CursorSetProp("UpdateNameList", "IDDEPARTAMENTO Nom10003.IDDEPARTAMENTO, NUMERODEPARTAMENTO Nom10003.NUMERODEPARTAMENTO, DESCRIPCION Nom10003.DESCRIPCION, DESCRIPCION Nom10003.DESCRIPCION, CUENTACW Nom10003.CUENTACW, TIMESTAMP Nom10003.TIMESTAMP")
A = CursorSetProp('KeyFieldList','IDDEPARTAMENTO')
A = cursorsetprop('updatablefieldlist', 'IDDEPARTAMENTO, NUMERODEPARTAMENTO, DESCRIPCION, BENEFICIARIO, CUENTACW, TIMESTAMP')
A = CursorSetProp('SendUpDates',.T.)
Begin transaction
INSERT INTO CP(IDDEPARTAMENTO, NUMERODEPARTAMENTO, DESCRIPCION, BENEFICIARIO, CUENTACW, TIMESTAMP) VALUES(24, 24, "INFORMATICA", "YO", "ADAD", DATETIME())
A = SQLCommit(h)
End trans
pero no hace el insert lo he intentado con el SQLEXEC y tampoco, marca error de conectividad ODBC.
Si alguien me puede ayudar se lo agradesco de antemano.
Valora esta pregunta


0