Problemas insertando datos

[yampoo]

Bueno... pongo todo el codigo completo...:

<%
Response.Cookies("emailbe") = request.form("email")
Response.Cookies("emailbe").Expires = Date + 365
if request.form("password") = request.form("password2") then
else
response.redirect "registro.asp?msg=Las contraseñas no coinciden"
end if
if request.form("codigo") = request.form("codigo2") then
else
response.redirect "registro.asp?msg=El código de validación no coincide"
end if
Response.Buffer = true
dim cnn,rst
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath("bd"))
set rs = CreateObject("ADODB.Recordset")
sqltext2 = "SELECT * FROM empresas WHERE email = '"&request.form("email")&"'"
rs.Open sqltext2,cnn,3,3
if rs.eof then
else
if rs("email") = request.form("email") then
response.redirect "registro.asp?msg=El usuario ya está en uso"
else
end if
end if
rs.Close
set rst = CreateObject("ADODB.Recordset")
sqltext = "SELECT * FROM candidatos"
rst.Open sqltext,cnn,3,3

'Recogemos los datos y validamos que no haya ningun campo vacio
dim titulo, copete, noticia
email = Request.Form("email")
password = Request.Form("password")
codigo = Request.Form("codigo")
nombre = Request.Form("nombre")
denominacion = Request.Form("denominacion")
cif = Request.Form("cif")
provincia = Request.Form("provincia")
pais = Request.Form("pais")
telefono = Request.Form("telefono")
ntrabajadores = Request.Form("ntrabajadores")
sector = Request.Form("sector")
contratosano = Request.Form("contratosano")
facturacion = Request.Form("facturacion")
logo = Request.Form("logo")
web = Request.Form("web")

if password ="" or email ="" then

error = "registro.asp?msg=No ha completado todos los datos"
Response.redirect error
Response.End
end if


'Si está todo correcto, procedemos a ingresar los datos a la base de datos

rst.AddNew

rst("password") = password
rst("email") = email
rst("nombre") = nombre
rst("provincia") = provincia
rst("pais") = pais
rst("cif") = cif <-------> 81
rst("denominacion") = denominacion
rst("telefono") = telefono
rst("ntrabajadores") = ntrabajadores
rst("sector") = sector
rst("contratosano") = contratosano
rst("facturacion") = facturacion
rst("logo") = logo
rst("web") = web

rst.update

'Terminamos e imprimimos un mensaje
Response.redirect "panel.asp"

%>