La Web del Programador: Comunidad de Programadores
 
    Pregunta:  14549 - ENLACE CON BASE DE DATOS DE POWER BUILDER
Autor:  Alexander Zuluaga
¿Como puedo acceder a una base de datos creada en power builder con una aplicaciòn de visual basic?

Necesito tomar datos con visual basic y exportarlos a una base de datos en Power Builder para hacer gràficos con ellos.

Uso:
Power Builder 6.0
Visual Basic 5.0 ò 6.0
Sybase sql Anywhere 5.0

  Respuesta:  Meche Bárcena
Como sabes cada vez que trabajas con bases de datos nativas para power builder en este caso anywhere debes de tener configurado tu odbc. Una vez que lo tengas configurado entonces hay varias maneras de extraer información entre ellas están el usar un componente físico o usar solo la referencia creando el objeto. Y es algo así:

Colocas físicamente un componente adodc1 ,en tu forma y lo puedes manipular de la siguiente manera:

A mi componente adodc1 le llame ado, el la parte del driver
Usas una cadena de conexión donde el saecobat lo reemplazas por el nombre de tu odbc y el uid por tu usuario y el pwd por el password

ado.ConnectionString = "DSN=saecobat;driver=SQL Anywhere 6.0;uid=dba;pwd=sql"
'El select es de donde requieras traer los datos
ado.RecordSource = "Select * from temprepote"
ado.Refresh
'Con esto controlas sin trae o no registros tu consulta
If ado.Recordset.RecordCount > 0 Then
ado.Recordset.MoveLast
' y se cuenta cuantos datos trae
SON = ado.Recordset.RecordCount
Label1.Caption = SON
End If

Es un ejemplo muy sencillo en donde se ilustra como conectarse por medio de VB a una base de Sql anywhere.

Si necesitas más datos, enviame un mail.
Espero que te sirva.