Foro de programacion

#1 (**permalink**) 05 de julio,2005, 13:10

Soy nuevo en esto, y estoy intentando realizar mi primeras paginas asp con acceso a una tabla de acces.
resulta que quiero añadir un nuevo alumno a la tabla y me da el error"No coinciden los tipos de datos en la expresión de criterios."
el codigo de la pagina asp es el siguiente:

<HTML>
<TITLE>asp añade nuevo alumno</TITLE>
<HEAD>

</HEAD>
<BODY BGCOLOR=#0055AA LINK=#AAAA00 VLINK=#AAAA00>
Alumnos

<%
Dim DNI, Nombre, Apellidos, Telefono, Email
DNI = Request.Form("DNI")
Nombre = Request.Form("Nombre")
Apellidos = Request.Form("Apellidos")
Telefono = Request.Form("Telefono")
Email = Request.Form("Email")

Dim Valores
Valores = "'" & Request.Form("DNI") & "','" & Request.Form("Nombre") & "','" & Request.Form("Apellidos") & "','" & Request.Form("Telefono") & "','" & Request.Form("Email") & "'"
%>
<%
On Error Resume Next
Set Conexion = CreateObject("ADODB.Connection")
Conexion.Open "trebeki"

strSQL ="SELECT Id FROM Visitas ORDER BY 1 DESC"
Set miConexion = Conexion.Execute(strSQL)
Dim Id
If Not miConexion.EOF Then
Id = miConexion("Id")
Id = Id + 1
Else
Id = 1
End If

strSQL = "INSERT INTO Alumnos VALUES(" & Id & ",#" & Time & "#," & Valores & ")"
Set miConexion = Conexion.Execute(strSQL)
If Err.Description <> "" then
Response.Write "Error en Base de Datos: " & Err.Description & ""
Else
Response.Write("

Se han actualizado los siguientes datos:")
Response.Write ("

[b]DNI: " & DNI & "
Nombre: " & Nombre & "
Apellidos: " & Apellidos & "
Telefono: " & Telefono & "
Email: " & Email & "")
End If

miConexion.Close
Conexion.Close
Set miConexion = Nothing
Set Conexion = Nothing
%>
</BODY>
</HTML>
Si alguien es tan amable de ayudarme con este problema se lo agradeceria mucho.

GRACIAS de antemano.