Foros del Web » Programando para Internet » ASP Clásico »

insertar registros en bd access

Estas en el tema de insertar registros en bd access en el foro de ASP Clásico en Foros del Web. Hola amigos,tengo una bd access la cual quiero llenar de registros a traves de un formulario pero me estoy volviendo loco.Ahi va el codigo que ...
  #1 (permalink)  
Antiguo 13/07/2004, 02:28
 
Fecha de Ingreso: mayo-2004
Mensajes: 7
Antigüedad: 21 años
Puntos: 0
insertar registros en bd access

Hola amigos,tengo una bd access la cual quiero llenar de registros a traves de un formulario pero me estoy volviendo loco.Ahi va el codigo que tengo:

<form>
<center><table width="50%" border="0">
<tr>
<td><b><font face="Arial, helvetica" size=2 color="#000080">NOM
CONSUMIDOR</font></b></td>
<td><font face="Arial, helvetica" size=2 color="#000080">
<input type="text" name="nom_consumidor">
</font></td>
</tr>
<tr>
<td><b><font face="Arial, helvetica" size=2 color="#000080">COGNOMS</font></b></td>
<td><font face="Arial, helvetica" size=2 color="#000080">
<input type="text" name="cognoms">
</font></td>
</tr>
<tr>
<center><td><center><br><input type="SUBMIT" value="ENVIAR" name="enviar"></center></td>
</table>




<%

Dim oConn,strSQL,oRs
Set oConn = Server.CreateObject("ADODB.Connection")
Set oRS = Server.createobject("ADODB.Recordset")
oConn.Mode=3
nom = Request.Querystring("nom_consumidor")
cognoms = Request.Querystring("cognoms")
oConn.Open ("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("base_dades/cosefed_manresa.mdb"))


strSQL = "insert into contacte (nom_consumidor,cognoms) values ('nom','cognoms')"


oRs= oConn.Execute(strSQL)
oConn.Close
set oConn = nothing
%>

</form>
bueno el error que me dice el navegador es el de la linia "oConn.Open ("DRIVER={....." y el mensaje que me da es:
Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Controlador ODBC Microsoft Access]Error general No se puede abrir la clave 'Temporary (volatile) Jet DSN for process 0x5d4 Thread 0x69c DBC 0x140c024 Jet' del Registro.
Muchas gracias y perdonad por poner un mensaje tan largo pero es como estoy desesperao y es urgente pues no me he querido dejar nada.
  #2 (permalink)  
Antiguo 13/07/2004, 07:34
Avatar de Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses
Puntos: 146
Prueba conectandote con:
strconn = ""Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/db.mdb")
set conn = Server.Createobject("adodb.connection")
conn.open strconn

Aunque se me hace raro que con la cadena normal no te conectes.

strconn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("\bd.mdb")
set conn = Server.Createobject("adodb.connection")
conn.open strconn

¿Si tienes el driver de Access instalado y/o actualizado?

Saludos

Última edición por Myakire; 13/07/2004 a las 07:38
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:22.