Conexion E Insercion De Datos En Dos Tablas Al Mismo Tiempo

[epa2]

Hola amigos.


Estoy intentando buscar documentacion o algo sobre lo siguiente.

Tengo una bd y hago y establezco la conexion, hasta aquí todo bien, pero esta bd tiene dos tablas, y me gustaría que el formulario de la página web, al enviarse, insertara los datos en las dos tablas al mismo tiempo,

¿es posible que en una misma conexion, abrir las dos tablas de la bd para insertar registros?

Espero.

gracias de antemano.

Código PHP:

  basedatos=server.mappath("../../datos/Ejemplo.mdb")
set conexion=server.createobject("adodb.connection")
set registros=server.createobject("adodb.recordset")
conexion.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & basedatos & ";"
registros.open "SELECT * FROM tabla1",conexion,2,2
registros.addnew
registros.fields("nombre")=request.form("nombre")
registros.fields("email")=request.form("email")
registros.fields("mensaje")=request.form("mensaje")
registros.fields("fecha")=FormatDateTime(Now, vbLongDate)
registros.update
registros.close
conexion.close
set registros=nothing
set conexion=nothing 
   

[AlZuwaga]

Si, creo que no hay problema.
Sólo debés instanciar dos recordsets... algo así:



basedatos=server.mappath("../../datos/Ejemplo.mdb")
set conexion=server.createobject("adodb.connection")
set registros=server.createobject("adodb.recordset")
set registros1=server.createobject("adodb.recordset")
conexion.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & basedatos & ";"
registros.open "SELECT * FROM tabla1",conexion,2,2
registros.addnew
registros.fields("nombre")=request.form("nombre")
registros.fields("email")=request.form("email")
registros.fields("mensaje")=request.form("mensaje" )
registros.fields("fecha")=FormatDateTime(Now, vbLongDate)
registros.update
registros.close

registros1.open "SELECT * FROM tabla2",conexion,2,2
registros1.addnew
registros1.fields("nombre")=request.form("nombre")
registros1.fields("email")=request.form("email")
registros1.fields("mensaje")=request.form("mensaje ")
registros1.fields("fecha")=FormatDateTime(Now, vbLongDate)
registros1.update
registros1.close

conexion.close
set registros=nothing
set registros1=nothing
set conexion=nothing

[epa2]

Gracias por responder, voy a ver.