altas de registro?
Publicado por ROBERTO (1 intervención) el 09/02/2001 00:27:28
altas de registro?
Hola, lei rl tutorial del ethek, donde para dar de alta o generar un nuevo registro en la BD suo un formulario con metodo POST hacia una pagina ingreso.asp que forma asi:
<%@ LANGUAGE=\"VBSCRIPT\" %>
<html>
<head>
<title>Ingreso de Datos</title>
</head>
<body>
<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject(\"adodb.connection\")
Set Tabla=Server.CreateObject(\"adodb.recordset\")
Conexion.Open \"Correo\"
Tabla.Open \"Tabla1\",Conexion
Dim Temp
Temp=\"Select * From Tabla1 Where UCase(Nombre)=\'\"(Request(\"Dato1\"))&\"\' And UCase(Apellido)=\'\"(Request(\"Dato2\"))&\"\' And UCase(Email)=\'\"(Request(\"Dato3\"))&\"\'\"
Tabla.Open Temp,Conexion2,3,1
If Tabla.BOF And Tabla.EOF Then
Tabla.AddNew
Tabla(\"Nombre\") = Request(\"Dato1\")
Tabla(\"Apellido\") = Request(\"Dato2\")
Tabla(\"Email\") = Request(\"Dato3\")
Tabla.Update
%>
<p>Ingreso de datos completado</p>
<%
Else Response.Write \"El registro ya existe\"
End If
Tabla.Close
Conexion.Close
%>
</body>
</html>
lo primero creo que funciona (la verificacion de que no se repitan los ingresos) pero la alta en sí al marcar
Tabla.Open Temp,Conexion2,3,1
creo que es ahi donde falla. dice que no puede usar un objeto que esta abierto
espero que alguien haya entendido
Hola, lei rl tutorial del ethek, donde para dar de alta o generar un nuevo registro en la BD suo un formulario con metodo POST hacia una pagina ingreso.asp que forma asi:
<%@ LANGUAGE=\"VBSCRIPT\" %>
<html>
<head>
<title>Ingreso de Datos</title>
</head>
<body>
<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject(\"adodb.connection\")
Set Tabla=Server.CreateObject(\"adodb.recordset\")
Conexion.Open \"Correo\"
Tabla.Open \"Tabla1\",Conexion
Dim Temp
Temp=\"Select * From Tabla1 Where UCase(Nombre)=\'\"(Request(\"Dato1\"))&\"\' And UCase(Apellido)=\'\"(Request(\"Dato2\"))&\"\' And UCase(Email)=\'\"(Request(\"Dato3\"))&\"\'\"
Tabla.Open Temp,Conexion2,3,1
If Tabla.BOF And Tabla.EOF Then
Tabla.AddNew
Tabla(\"Nombre\") = Request(\"Dato1\")
Tabla(\"Apellido\") = Request(\"Dato2\")
Tabla(\"Email\") = Request(\"Dato3\")
Tabla.Update
%>
<p>Ingreso de datos completado</p>
<%
Else Response.Write \"El registro ya existe\"
End If
Tabla.Close
Conexion.Close
%>
</body>
</html>
lo primero creo que funciona (la verificacion de que no se repitan los ingresos) pero la alta en sí al marcar
Tabla.Open Temp,Conexion2,3,1
creo que es ahi donde falla. dice que no puede usar un objeto que esta abierto
espero que alguien haya entendido
Valora esta pregunta
0