Problemas con ADODC1 - VB-MUNDO

MarcoArzapalo · #1 (**permalink**) 05-08-2008, 22:39:01

BUENAS TARDES AMIGOS, TENGO UN ERROR EN MI CODIGO PERO NO ENCUENTRO LA SOLUCION Y ESPERO Q ME PUEDAN AYUDAR. TENGO LA RUTA DE UNA VBASE DE DATOS EN UN CUADRO DE TEXTO Y DESEO QUE EL ADO LLAME A LA RUTA

Private Sub Form_Load()
Text1.Text="C:\admision\admision.mdb"
Const sPathBase As String = Trim(Text1.Text)
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sPathBase & ";Persist Security Info=False;Jet OLEDB

atabase Password=217416"
Adodc1.RecordSource = "select * from WSConfig"
Adodc1.Refresh
End Sub

Desde ya muchas gracias

Saludos

seba123neo · #2 (**permalink**) 06-08-2008, 02:56:18

Hola, ¿que error te da y donde?

saludos.

MarcoArzapalo · #3 (**permalink**) 06-08-2008, 03:08:33

Hola, Es El Siguiente: Error De Compilacion, Es Necesaria Una Expresion De Constante, El Error Es En "trim"

La Idea Es Ubicar La Base De Datos En Cualquier Ruta Y Si Hay Otra Forma Te Adradecere Darme La Solucion.

Saludos.

Marco

J.M.Movilla · #4 (**permalink**) 06-08-2008, 09:15:39

Parece que el error lo provoca la definición de la Constante sPathBase. Cambia tu código por

Código:

Text1.Text="C:\admision\admision.mdb"
 Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Text1.Text & ";Persist Security

seba123neo · #5 (**permalink**) 06-08-2008, 18:36:07

pues si, no se le puede asignar a la constante un valor que dependa de otra cosa, tiene que ser como lo dice el nombre "CONSTANTE" tenes que asignarle un valor unico...

saludos.