problemas con codigo....

[ana1981]

Tengo que hacer una simple actualizacion de una tabla de usuarios. Sólo cojo los datos, y los introduzco. Hasta aquí iba bien. Una vez hecho esto, introduje una comprobacion para ver si el usuario existia, y si existia, que no entrara usuarios con el mismo nif. El caso es que ahora no me funciona. Pongo aquí el código para ver si veis algo que esté mal...
No sé si será el uso de "<%" y "%>", es q no termino de controlarlo......


<%
fechaNacimiento=(Request.Form("anyo") & "/" & Request.Form("mes") & "/" & Request.Form("dia"))
fechaAlta = Date()
Dim oConn,strSQL
Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\bd1.mdb"))
strSQL = "select * from usuario where nif = '" & Request.Form("nif") & "'"
set oRs = Server.CreateObject("ADODB.Recordset")
oRs.Open strSQL,oConn, 3, 3
if not oRs.Eof then
oConn.Close
strSQL = "insert into usuario (nombre, apellido1,........) values ('" & Request.Form("nombre") & "','" & Request.Form("apellido1") & "','" ........
oConn.Execute(strSQL)
oConn.Close
set oConn = nothing
else
response.write("Ya está dado de alta")
oConn.Close
set oConn = nothing
end if
oRs.Close
%>