Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/04/2006, 01:14
lizardmx
 
Fecha de Ingreso: enero-2006
Mensajes: 3
Antigüedad: 19 años, 3 meses
Puntos: 1
Pregunta Error de conexion a la BD. VB6

Hola, eh estado programando una aplicacion que de manera local creando una conexion local desde el ODBC con la cadena de conexion:

cadena = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=ahorro" //para acceder a la base de datos ahorro.

pero ahora al querer accesar desde la red a la misma base de datos ahorro ya cargada a un servidor designado (x.x.x.x), uso los siguientes codigos:

Open App.Path & "\server.txt" For Input As #1
Line Input #1, server
usuario = "admin"
password = "comercial"
cadena = "PROVIDER=MSDASQL;dsn=baselocal;"
Close #1


y otra cadena de conexion es:

Open App.Path & "\server.txt" For Input As #1
Line Input #1, server
usuario = "admin"
password = "comercial"
cadena = "PROVIDER=MSDASQL;driver={MySQL ODBC 3.51 Driver};server=" & server & ";uid=" & usuario & ";pwd=" & password & ";database=ahorro;" & "option=" & 1 + 2 + 8 + 32 + 2048 + 16384
Close #1



sabiendo que en el server.txt esta la direccion de mi servidor, y que el usuario y password ya estan asignados a mi conexion.

Ninguna cadena de conexion me conecta a la Base de Datos del Servidor.

Les agradeceria mucho su ayuda si le pudieran decirme donde puede estar mi error y hacerle alguna modificación u observacion. Muchas gracias