problemas con fechas III

donni
17 de Marzo del 2002
Hola a todos.
Tengo problemas a la hora de comparar la fecha introducida por el usuario con la fecha de la b.d,me cerciorado de que tengan el mismo tipo y aun asi sigue sin compararmelo.Les agradeceria si me pudiesen echar un cable.
Gracias
ahi va el codigo:
//anadirt.asp
<%@language="vbscript"%>
<% if request.form("fecha")="" or request.form("manana")="" or request.form("tarde")="" or request.form("noche")=""then
response.redirect "anadir.htm"
end if
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
dim manana,tarde,noche,fecha,conexion,sql,tabla
manana=request.form("manana")
tarde=request.form("tarde")
noche=request.form("noche")
fecha=request.form("fecha")
fecha=Cdate(fecha)
response.write(vartype(fecha))
sql="insert into turnos (fecha,manana,tarde,noche) values "& "('"&fecha&"','"&manana&"','"&tarde&"','"&noche&"')"
sql1="select * from turnos"
set conexion=Server.CreateObject("Adodb.Connection")
conexion.open "asoagro"
set tabla=conexion.execute(sql1)
do while not tabla.eof
response.write(vartype(tabla("fecha")))
if tabla("fecha") = fecha then 'No compara aqui
response.write("Este turno ya esta en la b.d")
else
conexion.execute sql
response.write("Ha sido insertado correctamente")
end if
tabla.movenext
loop
conexion.close
set conexion=nothing
%>
</body>
</html>
77
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][Controlador ODBC Microsoft Access] Los cambios solicitados en la tabla no se realizaron correctamente porque crearan valores duplicados en el ndice, clave principal o relacin. Cambie los datos en el campo o los campos que contienen datos duplicados, quite el ndice o vuelva a definir el ndice para permitir entradas duplicadas e intntelo de nuevo.

/proyecto/anadirt.asp, line 33