Page 1 of 1

Advantage Data Server con ADO

Posted: Wed Nov 14, 2007 4:08 pm
by arturo_cervantes
Buen día a la comunicad.

Deseo saber como puedo abrir la base de datos con advantage via ADO ya baje el odbc incluso el OLE Provider, lo único cual sería el string para realizar la conexión.

Saludos.
Arturo.
México

Posted: Wed Nov 14, 2007 7:30 pm
by alex_cyr
oConexionAdo:Open("Provider=Advantage.OLEDB.1;User ID=adssys;Data Source=diccionario.add;Persist Security Info=False;ServerType=ADS_REMOTE_SERVER;LockMode=ADS_COMPATIBLE_LOCKING")

saludos

Gracias.

Posted: Wed Nov 14, 2007 9:13 pm
by arturo_cervantes
Y sabras de que forma se puede hacer mediante ODBC igual con ADO.

Saludos

Hola Alex_cyr

Posted: Wed Nov 14, 2007 10:17 pm
by arturo_cervantes
Saludos.

Sabrás como puedo solucionar el siguiente error?

Error ador.recordset/9 El proveedor actual no admite la interfaz necesaria para la funcionalidad Índice.: SEEK

El código que tengo es el siguiente:

oDatos:LockType := 4 //adLockOptimistic = 3, adReadOnly = 1
oDatos:CursorLocation := 3 //adUseServer = 2 , adUseClient = 3
oDatos:CursorType := 2 //adOpenKeyset = 1
oDatos:Source:=cComando
oDatos:ActiveConnection(oCon)
oDatos:Open()
oDatos:Sort := "Nom_Prod DESC"
oDatos:Seek("RESISTENCIAS", 1)

Agradecere tu ayuda.

Posted: Thu Nov 15, 2007 8:42 am
by Biel EA6DD
Para el tema de connections string tanto via ole db como odbc, puedes mirar esta entrada de mi blog ( http://bielsys.blogspot.com/2007/11/ado ... tring.html ).
Con referencia a lo del seek, no sabria decirte, pues no utilizo el metodo seek, ni el motor ADS. En este link pone algo de documentación de como usar seek con ADO http://support.microsoft.com/kb/287638/es.

Suponiendo que fuera una limitación del motor de base de datos, otra alternativa sin indice seria con el metodo FIND.

Code: Select all

oRs:Find( "Campo LIKE '"+cBuscar,,1)