muy cansado con este error

[hugorei]

Dim oConn, rs, SQL, cuenta, categoria
set oConn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=ejemplo.mdb ;jet OLEDB:Database Password=11"
SQL="SELECT IdCategoria, NomCategoria FROM Categorias"


por que no anda porqueeeee, no encuentra la conexion , puede ser que sea tan compilcado cuando pones una maldita clave en la tabla ??????????????? aca no me encuentra la conexion a la tabla y no se porqueeeeee le puse la ruta de todas las maneras posibles , ya me tiene repodrido este error si alguien me ayude antes que enloquesca por favor

[gigio_wt]

mmm... yo que tu agregaba la ruta absoluta dentro del servidr a la base de datos... algo asi como:

oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=d:\inetpub\wwwroot\bases\ejemplo.mdb;jet OLEDB:Database Password=11"

bueno, puede ser eso...

[TeresitaHP]

Prueba con este string de conexión, strRuta debe ser la ruta completa de donde tienes tu base de datos, algo como "c:\Data\ejemplo.mdb"

oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & strRuta & "; UID=usuario; PWD=password"

Con ese drive, puedes abrir cualquier versión de base de datos en Access, 97, 2000, 2003.

[hugorei]

Lo que no entiendo en una base de datos access donde le ponen el nombre de usuario .... si cuando vos protejes la base te pide que ingreses dos veces el password y nada mas ?????

Ademas si pongo una ruta absoluta cuando lo levante en el servidor va a dar error , no me va a encontrar la base ???'

[Ysdragil]

Te envio otra forma de conexion, a mi siempre me ha servido y creo que es muy util:

Set Ob_Conn=Server.CreateObject("ADODB.Connection")
Ob_Conn.Open "Data Source=" & Server.Mappath("db.mdb") & ";Provider=Microsoft.Jet.OLEDB.4.0;"

Con el Server.MapPath obtengo el Path del servidor, de esa forma no importa en donde coloquen tu carpeta, va a obtener el path, despues tu le agregas el nombre de la base de datos. En caso de que este dentro de una carpeta solo tendras que especificar la direccion de la carpeta y de la base de datos

Set Ob_Conn=Server.CreateObject("ADODB.Connection")
Ob_Conn.Open "Data Source=" & Server.Mappath("db/db.mdb") & ";Provider=Microsoft.Jet.OLEDB.4.0;"

Saludos

[pola26]

Y usando dsn??

por ejemplo :
Dim Conec__
Set Conec__=Server.CreateObject("ADODB.Connection")
Conec__.Open MM_Silber_STRING

donde
MM_Silber_STRING="dsn=A1883_Envio_Correos;"

de algo te puede servir...

[hugorei]

Asi lo solucione :

oConn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
oConn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & Server.MapPath("ejemplo.mdb")&" ; Jet OLEDB:Database Password=12412741"



ASI FUNCIONA OK


GRACIAS A TODOS