Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Gostaria que alguem me ajudase nesse codigo pq nao sei mais o que fazer...
Desde ja Agradeço http://forum.imasters.com.br/public/style_emoticons/default/sick.gif
ERRO
Tipo de erro:
Microsoft JET Database Engine (0x80004005)
A operação deve usar uma consulta atualizável.
/insert_into.asp, line 22
CODIGO
<%
Option Explicit
Response.Expires = 0
Dim adodbConn, sql ,connStr, dbname ,strQuery, strConnection, nome, telefone, email, comentario
nome = Request.Form("nome")
telefone = Request.Form("telefone")
email = Request.Form("email")
comentario = Request.Form("comentario")
'tableToFind = "contato"
dbname = "contato.mdb"
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;data source="
ConnStr = ConnStr & server.mappath(dbname)
set adodbConn = CreateObject("ADODB.Connection")
adodbConn.open ConnStr
sql = "INSERT INTO contato (nome,telefone,email,comentario) VALUES ('"&nome&"','"&telefone&"','"&email&"','"&comentario&"')"
set rs = adodbConn.Execute(sql)
found = rs(0)
if found then
response.write("Dados cadastrados com sucesso")
else
response.write("Houve problemas nao inserção dos dados.")
end if
%>
Carregando comentários...