Advantage Data Server con ADO

[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

[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

[arturo_cervantes]

Y sabras de que forma se puede hacer mediante ODBC igual con ADO.

Saludos

[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.

[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)