Ver Mensaje Individual
  #2 (permalink)  
Antiguo 14/03/2002, 16:58
Avatar de RsOfT
RsOfT
 
Fecha de Ingreso: marzo-2002
Ubicación: InterNET
Mensajes: 1.121
Antigüedad: 23 años, 2 meses
Puntos: 7
Re: Agregar Datos a una BD en ASP

En la página ingresar tengo:
---------------------------------------------------------------
<%@ 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")
Dim Temp

Conexion.Open "Correo"
Tabla.Open "Tabla1",Conexion

Temp="Select * From Tabla1 Where UCase(Nombre)='" & UCase(Request("Dato1"))
& "' And UCase(Apellido)='" & UCase(Request("Dato2")) & "' And
UCase(Email)='" & UCase(Request("Dato3")) & "'"

Tabla.Open Temp,Conexion

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>
---------------------------------------------------------------
Al presionar Sumit de value="Ingresar", no me agrega nada, solo me pone:
No se puede mostrar la página, y si le doy a refresh me sale un letrerito
que dice:
La página no puede actualizarse sin renviar la informacion, haga click en
reintentar para volver a renviar la informacion o Cancelar para volver a la
página que intentaba ver, Si le doy a reintentar me sale otra ves: "No se
puede mostrar la página" y si le doy a Cancelar me sale: "Advertencia: La
página ha caducado"

Que estoy haciendo mal???
La informacion obtenida para mi aprendisaje la estoy extrayendo de:
http://www.ethek.com/contenido.asp?IDContenido=181
Gracias anticipadas...

.::RsOfT::.
--El que se aferra a lo conocido, nunca conocerá lo desconocido--
--Es intentando lo imposible como se realiza lo posible--
--Es de pesimo gusto contentarse con algo mediocre cuando lo excelente esta a nuestro alcance--