Hola amigos, estoy dando mis primeros pasos en ASP y para empezar he creado una db que se llama datos con una tabla llamada Nombres y un campo llamado nombre.
http://www32.brinkster.com/bruno00/datos.asp
Podréis ver el error que me muestra.
¿Alguien sabe a que se puede deber?
Aqui coloco el codigo de la pagina. Por si alguien sabe responder.
*****************************
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<%sub menu%>
<a href="datos.asp?Mod=I">Insertar
<%end sub%>
<%sub insertar%>
<form action=datos.asp?Mod=M method=post>
<INPUT type="text" id=text1 name=txtinser>
<INPUT type="submit" value="Guardar" id=button1 name=btnguardar>
</form>
<%end sub%>
<%sub meter%>
<%
dat=Request.Form("txtinser")
Set cn = Server.CreateObject ("ADODB.Connection")
cn.ConnectionString="Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db\datos.mdb")
cn.open
cad="select * from Nombres where nombre='" + dat + "'"
set rs=cn.Execute (cad)
if rs.bof and rs.eof then
cad="insert into datos values('"+dat+"')"
set rs=cn.Execute (cad)
Response.Write ("el + dat + ha sido guardado")
end if
%>
<%end sub%>
<%dim Modo
Modo = Ucase(Request.QueryString ("Mod"))
Select Case Modo
Case "I"
Call insertar()
Case "M"
Call meter()
Case else
Call menu()
end select
Response.End
%>
</BODY>
</HTML>
**************************
Muchas gracias.
