Galera. O negocio é o seguinte o banco já esta cong=figurado no ODBC com permissão e tudo mais. Mas eu já fiz de tudo, declarei as variaveis como nosso colega disse e nada o erro perciste. O que eu posso fazer? Tenho tambem este codigo mas tambem não funciona este por equanto não da erro mas não grava no banco. OBS: Os problemas com conexão já foram resolvidos. Por favor alguém me de uma luz. <% Option Explicit Response.Expires = 0 Dim objConn, objRs, strQuery, strConnection, nome, telefone, email, comentario, foto nome = Request.Form("nome") telefone = Request.Form("telefone") email = Request.Form("email") comentario = Request.Form("comentario") Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "DBQ=" & Server.MapPath(banco) & ";Driver={Microsoft Access Driver (*.mdb)}","username","password" strQuery = "INSERT INTO contato (nome,telefone,email,comentario) VALUES ('"&nome&"','"&telefone&"','"&email&"','"&comentario&"')" On error Resume Next Set ObjRs = objConn.Execute(strQuery) objConn.close Set objRs = Nothing Set objConn = Nothing if err = 0 Then response.redirect "sucesso.asp" end if %>