Não Estou Conseguindo Solucionar O Erro

[PRISCILA STOCHINI]

ERRO--

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'AbreConn'

/TESTE_ASP/visualiza_cadastro.asp, line 25

Codigo---

<%

sql = "SELECT empresa, depart, contato, cargo FROM colaborador"

Set rs = bco.Execute(sql)

%>

<%rs.MoveFirst : do while not rs.eof%>

Empresa: <%=rs("empresa")%><br>

Depart: <%=rs("depart")%><br>

Contato: <%=rs("contato")%><br>

Cargo: <%=rs("cargo")%><br>

<%rs.MoveNext : Loop

Call FechaConn()%>

[Luiz Guilherme]

Ola,

Onde você esta chamando a função ABRECONN?

Como você define ABRECONN??

[PRISCILA STOCHINI]

Esse é um outro problema...mas pelo meu entender é parecido...

Abro a minha conexão com um include...

INCLUDE de CONEXÃO --

<%

Dim bco, sql, rs

Set bco = server.CreateObject("ADODB.connection")

bco.open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("Bancos\formularios.mdb"))

%>

ENVIA DADOS --

<!--#include file="conexao.asp"-->

<%

Vempresa = Request.Form("empresa")

Vdepartamento = Request.Form("departamento")

Vcontato = Request.Form("contato")

Vcargo = Request.Form("cargo")

Vendereco = Request.Form("endereco")

Vnum = Request.Form("num")

Vcompl = Request.Form("compl")

Vcep = Request.Form("cep")

Vestado = Request.Form("estado")

Vcidade = Request.Form("cidade")

Vddd = Request.Form("ddd")

Vtel = Request.Form("tel")

Vfax = Request.Form("fax")

Vcel = Request.Form("cel")

Vemail = Request.Form("email")

Vhomepage = Request.Form("homepage")

Vatividade = Request.Form("atividade")

sql = "INSERT into colaborador(empresa, departamento, contato, cargo, endereco, num, compl, cep, estado, cidade, ddd, tel, fax, cel, email, homepage, atividade) values ('"&Vempresa&"','"&Vdepartamento&"','"&Vcontato&"','"&Vcargo&"', '"&Vendereco&"', '"&Vnum&"', '"&Vcompl&"', '"&Vcep&"', '"&Vestado&"', '"&Vcidade&"', '"&Vddd&"', '"&Vtel&"', '"&Vfax&"', '"&Vcel&"', '"&Vemail&"', '"&Vhomepage&"', '"&Vatividade&"')"

Set rs = bco.Execute(sql)

Response.Write(sql)

bco.Close

Set bco = Nothing

URL = "cadastrando.asp"

response.redirect(URL)

%>

ERRO --

Microsoft JET Database Engine error '80040e07'

Data type mismatch in criteria expression.

/TESTE_ASP/enviando.asp, line 23

[Luiz Guilherme]

Batendo o olho assim é meio dificil de te dizer,

mas quando da type mismatch, é porque você está tentando salvar um tipo de dados em cima de outro,

EXEMPLO:

Você tenta salvar um variavel chamado v_data do tipo string, em cima de um campo na sua tabela chamado data só que do tipo data....

Intendeu?

[Belmonte SC]

Olá Priscila, acho que você está chamando 2 vezes para abrir a conexao, com call (que n aparece no código acima) e com include... coloque o código onde está o call

[Marcos-rj]

tira o Abreconn e FechaConn e testa para ver.

Não vejo no código nenhuma referencia a eles.

[Marcos-rj]

Tipos incompativeis em sua SQL, verifique se não existe nenhum campo numérico sendo pesquisado como texto ou data sendo pesquisado como texto ou numero ou text sendo pesquisado como numero.

[PRISCILA STOCHINI]

Pessoal tem tanto numero quanto texto no meu banco...como faço pra definir se é num ou texto no meu codigo????-

[Marcos-rj]

Por exemplo, vê o seguinte:

No campo Num como está na tabela? é numero ou texto?

qual tipo de dado você tá gravando nele?

[PRISCILA STOCHINI]

Num, é numero no bco...

gravo o numero de um endereço

tem problema se eu colocar como texto no bco????

[Marcos-rj]

não, eu sempre coloco assim e não me lembro de ter tipo ploblemas com isso.

[PRISCILA STOCHINI]

Microsoft JET Database Engine error '80040e14'

Number of query values and destination fields are not the same.

/TESTE_ASP/enviando.asp, line 23

está dando esse erro...

Bom, preciso ao mesmo tempo que enviar dados de formulario preciso "cadastrar" tambem o dia e a hora do servidor no bco...como faço isso...acho que é isso que está fazendo dar esse erro...

[Marcos-rj]

Isso que eu ia te perguntar, se tinha alguma data.

Posta o código que você está usando.

você está enviando campo a + para a tabela.