Ver Mensaje Individual
  #4 (permalink)  
Antiguo 19/01/2006, 08:35
Avatar de gorka_arai
gorka_arai
 
Fecha de Ingreso: octubre-2005
Mensajes: 281
Antigüedad: 19 años, 6 meses
Puntos: 1
Mmmm, veo varias cosas extrañas... pero como no especificas el error en concreto, te diré varias cosas que veo pueden fallar...

1. Antes de abrir la BD debes especificar la cadena de conexión:

conn.ConnectionString="provider=microsoft.jet.oled b.4.0; data source="& server.MapPath("mibase.mdb")
conn.open

2. También observo que no haces uso de ningún recordset... ¿Cómo pretendes entonces abrir las tablas para consultarlas o insertar o eliminar datos?
La cosa quedaría así (para insertar en una tabla tus vbes nombre y telefono)

set reg=server.CreateObject("ADODB.Recordset")
reg.Open "tabla",conn,3,2
while not reg.EOF
reg.MoveNext
wend
reg.AddNew
reg.Fields("nombre_campo_tabla")=nombre
reg.Fields("nombre_campo_tabla")=telefono
reg.Update
Reg.close
Conn.close
set reg=nothing
Set conn=nothing


Con el while me muevo hasta el ultimo registro, luego agrego uno nuevo y meto los datos que has recogido en tus vbes nombre y telefono. Hago el update para que los cambios surtan efecto sobre la tabla y por ultimo cierro y destruyo los objetos.

Espero haberte sido de ayuda...