Ver Mensaje Individual
  #2 (permalink)  
Antiguo 11/01/2005, 12:22
Avatar de Potro
Potro
 
Fecha de Ingreso: abril-2001
Mensajes: 2.249
Antigüedad: 24 años
Puntos: 39
y este es el codigo del agregar.asp

<%
' tomamos los datos del formulario
nombre = Request.Form("nombre")
apellido = Request.Form("apellido")
email = Request.Form("email")
password = Request.Form("password")

' creamos la conexion y los 2 recordset
Set Con=Server.CreateObject("ADODB.Connection")

Set RS=Server.CreateObject("ADODB.RecordSet")
Set RS2=Server.CreateObject("ADODB.RecordSet")

Con.Open "gema"

' ejecutamos una consulta para cada recorset
RS.Open "SELECT * FROM Usuarios", Con, adOpenDynamic, adLockPessimistic, adCMDText
RS2.Open "SELECT * FROM UsuariosPassword", Con, adOpenDynamic, adLockPessimistic, adCMDText

' agregamos los datos a la primera tabla
RS.AddNew
RS("nombre")= nombre
RS("apellido")= apellido
RS.Update

' agregamos los datos a la segunda tabla
RS2.AddNew
RS2("email")= email
RS2("password")= password
RS2.Update

' cerramos los objetos y liberamos memoria
RS.Close
RS2.Close
MyConn.Close
Set RS = Nothing
Set RS2 = Nothing
Set MyConn = Nothing
%>




*******************

gema es el nombre de mi DSN y todo esta en la misma carpeta pero cuando trato de insertarlos me marca error..

este es el link

http://www.ameg.org.mx/cgi-bin/news/formulario.htm

ojala me puedan ayudar...