erro de código

[Aldan Nunes]

Bom dia! estou com um probleminha em um script de envio de informações para BD e email.

è o seguinte quando usa-se o navegador Internet Explorer, Firefox o envio funciona normalmente mais quando se usa o Navegador chrome ele está dando o seguinte erro como mostra imagem http://www.psicotecnicarh.com.br/Image.jpg. o código segue abaixo.

<%

nome = request.form("nome")

endereco = request.form("endereco")

bairro = request.form("bairro")

cidade = request.form("cidade")

estado = request.form("estado")

cep = request.form("cep")

telFixo = request.form("telFixo")

telCel = request.form("telCel")

telComer = request.form("telComer")

email = request.form ("email")

datanasc = request.form("datanasc")

formacao = request.form("formacao")

areaformacao = request.foRm("areaformacao")

anoconclusao = request.form("anoconclusao")

ultemprego = request.form("ultemprego")

EmpresaUltEmprego = request.form("EmpresaUltEmprego")

descrUltEmprego = request.form("descrUltEmprego")

MesAnoInicioUltEmp = request.form("MesAnoInicioUltEmp")

MesAnoFimUltEmp = request.form("MesAnoFimUltEmp")

contatoUltimo = request.form("contatoUltimo")

PenultEmprego = request.form("PenultEmprego")

EmpresaPenEmpr = request.form("EmpresaPenEmpr")

descPenultEmprego = request.form("descPenulEmprego")

MesAnoIniPenEmp = request.form("MesAnoIniPenEmp")

MesAnoFimPenEmp = request.form("MesAnoFimPenEmp")

contatoPenulEmprego = request.form("contatoPenulEmprego")

cursoAperfeicoamento = request.form ("cursoAperfeicoamento")

objetivo = request.form("objetivo")

referencia1 = request.form("referencia1")

referencia2 = request.form("referencia2")

referencia3 = request.form("referencia3")

'criamos o objeto para receber

set msg = createObject("CDONTS.newMail")

msg.from = email

msg.To = "psicotecnicarh@psicotecnicarh.com.br, aldanptu@gmail.com"

msg.subject = "CADASTRO DE CURRÍCULOS ATRAVÉS DO SITE PSICOTÉCNICA RH"

texto = "Usuário: " & nome & " acabou de inscrever seu currículo no site " & ".<br> <br>"

texto = texto &"DADOS PESSOAIS" & "<br> <br>"

texto = texto &"Nome: " & nome &".<br> <br>"

texto = texto &"Data Nascimento: " & datanasc &".<br> <br> <br>"

texto = texto &"ENDEREÇO" & "<br> <br>"

texto = texto &"Endereço: " & endereco &".<br> <br>"

texto = texto &"Bairro: " & bairro &".<br> <br>"

texto = texto &"Cidade: " & cidade &".<br> <br>"

texto = texto &"Estado: " & estado &".<br> <br>"

texto = texto &"CEP: " & cep &".<br> <br> <br>"

texto = texto &"CONTATO" & "<br> <br>"

texto = texto &"Telefone Residencial: " & telFixo &".<br> <br>"

texto = texto &"Telefone Comercial: " & telComer &".<br> <br>"

texto = texto &"Telefone Celular: " & telCel &".<br> <br>"

texto = texto &"Email: " & email &".<br> <br> <br>"

texto = texto &"ESCOLARIDADE" & "<br> <br>"

texto = texto &"Formação: " & formacao &".<br> <br>"

texto = texto &"Área de Formacão: " & areaformacao &".<br> <br>"

texto = texto &"Ano de Conclusão: " & anoconclusao &".<br> <br> <br>"

texto = texto &"EXPERIÊNCIA PROFISSIONAL" & "<br> <br>"

texto = texto &"Último Emprego: " & ultemprego &".<br> <br>"

texto = texto &"Empresa do Último Emprego: " & EmpresaUltEmprego &".<br> <br>"

texto = texto &"Mês / Ano do Início do Último Emprego: " & MesAnoInicioUltEmp &".<br> <br>"

texto = texto &"Mês / Ano do Fim do Ultimo Emprego: " & MesAnoFimUltEmp &".<br> <br>"

texto = texto &"Descrição do Último Emprego: " & descrUltEmprego &".<br> <br>"

texto = texto &"Contato do Último Emprego: " & contatoUltimo &".<br> <br>"

texto = texto &"Penúltimo Emprego: " & PenultEmprego &".<br> <br>"

texto = texto &"Empresa do Penúltimo Emprego: " & EmpresaPenEmpr &".<br> <br>"

texto = texto &"Mês / Ano do Início do Penúltimo Emprego: " & MesAnoIniPenEmp &".<br> <br>"

texto = texto &"Mês / Ano do Fim do Penúltimo Emprego: " & MesAnoFimPenEmp &".<br> <br>"

texto = texto &"Descrição do Penúltimo Emprego: " & descPenulEmprego &".<br> <br>"

texto = texto &"Contato do Penúltimo Emprego: " & contatoPenulEmprego &".<br> <br>"

texto = texto &"Cursos de Aperfeiçoamento: " & cursoAperfeicoamento &".<br> <br>"

texto = texto &"Objetivo do Emprego: " & objetivo &".<br> <br>"

texto = texto &"Nome e Telefone da 1ª Referencia: " & referencia1 &".<br> <br>"

texto = texto &"Nome e Telefone da 2ª Referencia: " & referencia2 &".<br> <br>"

texto = texto &"Nome e Telefone da 3ª Referencia: " & referencia3 &".<br> <br>"

msg.body = texto

msg.mailformat = 0

msg.bodyformat = 0

msg.send

set msg = nothing

set db = server.CreateObject("ADODB.connection")

dim caminho

caminho = server.MapPath("curDB.mdb")

db.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & caminho

sql = "INSERT INTO cadastro (nome, endereco, bairro, cidade, estado, cep, "

sql = sql & "telfixo, telcel, telcomer, email, rg, orgexp, cpf, datanasc, formacao, "

sql = sql & "areaformacao, anoconclusao, ultemprego, EmpresaUltEmprego, descrUltEmprego, "

sql = sql & "MesAnoInicioUltEmp, MesAnoFimUltEmp, contatoUltimo, PenultEmprego, EmpresaPenEmpr, "

sql = sql & "descPenultEmprego, MesAnoIniPenEmp, MesAnoFimPenEmp, contatoPenulEmprego, cursoAperfeicoamento, "

sql = sql & "objetivo, referecia1, referencia2, referencia3) "

sql = sql & "VALUES "

sql = sql & "('"& nome &"', '" & endereco &"','" & bairro &"','" & cidade &"','" & estado &"',"

sql = sql & "'" & cep &"','" & telFixo &"','" & telCel &"','" & telComer &"','" & email &"','"

sql = sql & "'" & datanasc &"','" & formacao &"','" & areaformacao &"',"

sql = sql & "'" & anoconclusao &"','" & ultemprego &"','" & EmpresaUltEmprego &"','" & descrUltEmprego &"',"

sql = sql & "'" & MesAnoInicioUltEmp &"','" & MesAnoFimUltEmp &"','" & contatoUltimo &"','" & PenultEmprego &"','" & EmpresaPenEmpr &"',"

sql = sql & "'" & descPenultEmprego &"','" & MesAnoIniPenEmp &"','" & MesAnoFimPenEmp &"','" & contatoPenulEmprego &"',"

sql = sql & "'" & cursoAperfeicoamento &"','" & objetivo &"','" & referencia1 &"','" & referencia2 &"','" & referencia3 &"')"

set rs = db.execute(sql)

%>

&lt;script>

document.write("<br><br><br><br>")

document.write("<div align='center'><font color='red' size='2' face='Arial'><strong>Aguarde por favor seus dados estão sendo enviados</font></strong></div>")

window.location='default.asp'

</script>

[bareta]

isso não é muito legal de se achar mais.... veja a linha

sql = sql & "'" & cep &"','" & telFixo &"','" & telCel &"','" & telComer &"','" & email &"','"

[Aldan Nunes]

isso não é muito legal de se achar mais.... veja a linha

sql = sql & "'" & cep &"','" & telFixo &"','" & telCel &"','" & telComer &"','" & email &"','"

Não entendi o que você quis dizer.

[Aldan Nunes]

desculpe agora compreendi o que quis dizer.

O erro continua da mesma forma.

Microsoft OLE DB Provider for ODBC Drivers erro '80040e14'

[Microsoft][Driver ODBC para Microsoft Access] Número de valores da consulta e campos de destino não coincidem.

/insert.asp, line 102

[bareta]

isso não é muito legal de se achar mais.... veja a linha

sql = sql & "'" & cep &"','" & telFixo &"','" & telCel &"','" & telComer &"','" & email &"',' >>>>>>>>>>>>> deleta aspas simples a mais"

é tudo caso de observaçãoi ai.... tem campo que não tem valor...

rg, orgexp, cpf

[Aldan Nunes]

Vlw e me desculpe a ignorância. abraço