Portal Fórum iMasters Enterprise Mídia & Conferences Venture E-Commerce Brasil AI Brasil

Criar conta Entrar

Início do Fórum

Ajuda Sobre Contato

Redes sociais

Entrar Criar conta

Sobre o iMasters

Política de Privacidade

Fale conosco

Quero ser autor

Fórum

Contatos e Oportunidades Comerciais

faleconosco@imasters.com.br https://imasters.com.br

Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.

Início
›
Microsoft JET Database Engine (0x80040E14) ASP Erro

V

Publicado em 23 de set.

Microsoft JET Database Engine (0x80040E14) ASP Erro

Gostaria de ajuda, criei uma pagina para fazer cadastro em asp com banco de dados Access, mas quando e execultado da o seguinte erro.

Microsoft JET Database Engine (0x80040E14)

Erro de sintaxe na instrução INSERT INTO.

/cadastro.asp, line 115

por favor ajude-me

<%@LANGUAGE="VBSCRIPT"%><%' Edit Operations: declare variablesDim MM_editActionDim MM_abortEditDim MM_editQueryDim MM_editCmdDim MM_editConnectionDim MM_editTableDim MM_editRedirectUrlDim MM_editColumnDim MM_recordIdDim MM_fieldsStrDim MM_columnsStrDim MM_fieldsDim MM_columnsDim MM_typeArrayDim MM_formValDim MM_delimDim MM_altValDim MM_emptyValDim MM_iMM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString)End If' boolean to abort record editMM_abortEdit = false' query string to executeMM_editQuery = ""%><%' Insert Record: set variablesIf (CStr(Request("MM_insert")) = "form1") Then MM_editConnection = MM_db_STRING MM_editTable = "cadastro" MM_editRedirectUrl = "resultadodecadastro.asp" MM_fieldsStr = "nome|value|apelido|value|email|value|nasc|value|telefone|value|celular|valu|login|value|sanha|value" MM_columnsStr = "nome|',none,''|apelido|',none,''|email|',none,''|datanascimento|',none,''|telefone|',none,''|celular|',none,''|login|',none,''|password|',none,''" ' create the MM_fields and MM_columns arrays MM_fields = Split(MM_fieldsStr, "|") MM_columns = Split(MM_columnsStr, "|") ' set the form values For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i))) Next ' append the query string to the redirect URL If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End IfEnd If%><%' *** Insert Record: construct a sql insert statement and execute itDim MM_tableValuesDim MM_dbValuesIf (CStr(Request("MM_insert")) <> "") Then ' create the sql insert statement MM_tableValues = "" MM_dbValues = "" For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_formVal = MM_fields(MM_i+1) MM_typeArray = Split(MM_columns(MM_i+1),",") MM_delim = MM_typeArray(0) If (MM_delim = "none") Then MM_delim = "" MM_altVal = MM_typeArray(1) If (MM_altVal = "none") Then MM_altVal = "" MM_emptyVal = MM_typeArray(2) If (MM_emptyVal = "none") Then MM_emptyVal = "" If (MM_formVal = "") Then MM_formVal = MM_emptyVal Else If (MM_altVal <> "") Then MM_formVal = MM_altVal ElseIf (MM_delim = "'") Then ' escape quotes MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'" Else MM_formVal = MM_delim + MM_formVal + MM_delim End If End If If (MM_i <> LBound(MM_fields)) Then MM_tableValues = MM_tableValues & "," MM_dbValues = MM_dbValues & "," End If MM_tableValues = MM_tableValues & MM_columns(MM_i) MM_dbValues = MM_dbValues & MM_formVal Next MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")" If (Not MM_abortEdit) Then ' execute the insert Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close If (MM_editRedirectUrl <> "") Then Response.Redirect(MM_editRedirectUrl) End If End IfEnd If%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">http-equiv="content-type" content="text/html; charset=iso-8859-1"/><meta name="description" content="description"/><meta name="keywords" content="keywords"/> <meta name="author" content="author"/> <link rel="stylesheet" type="text/css" href="default.css" media="screen"/><title>Dark Ritual</title></head><body><div class="container"> <div class="header">Dark Ritual</div> <div class="main_right"> <div class="padded"> <h1 align="justify">O grupo</h1> <p align="justify"> </p> <p align="justify">Criando por Pommer, Julio e Renato em junho de 2007.</p> <p align="justify"> </p> <h1 align="justify">Objetivo</h1> <h1 align="justify"> </h1> <p align="justify">Imortaliza o nome do grupo e<br /> membros, para que este não seja apenas mais um grupo.</p> <p align="justify"> </p> <h1 align="justify">Participantes</h1> <h1 align="justify"> </h1> <p align="justify">Todos aqueles que estejam interessados a participar, mas sendo a capaz de levar o grupo com seriedade</p> <h1> </h1> </div> </div> <div class="subnav"> <h1>Canais</h1> <ul> <li><a href="index.html">Home</a></li> <li><a href="index.html">Eventos</a></li> <li><a href="index.html">Galerias</a></li> </ul> <h1>Mais Canais </h1> <ul> <ul> <li><a href="index.html">Chat</a></li> </ul> <li><a href="index.html">Forum</a></li> <li><a href="index.html">Radio</a></li> <li><a href="index.html">Blog</a></li> </ul> <h1>Suporte</h1> <ul> <li><a href="index.html">Cadastro</a></li> <li><a href="index.html">Cadastro de Eventos </a></li> <li><a href="index.html">Contato</a></li> </ul> </div> <div class="main"> <div class="padded"> <h1>Cadastro</h1> <p> </p> <form name="cadastro" id="cadastro" method="POST" action="<%=MM_editAction%>">Nome: <label> <input name="nome" type="text" id="nome" size="30" /> </label>Apelido:<label> <input name="apelido" type="text" id="apelido" /> </label> <p> </p> <p>E-mail: <label> <input name="email" type="text" id="email" /> </label> Data de Nasc: <label> <input name="nasc" type="text" id="nasc" /> </label></p> <p><br /> Telefone:<label> <input name="telefone" type="text" id="telefone" /> </label> Celular:<label> <input name="celular" type="text" id="celular" /> </label></p> <p><br />Login:<label><input name="login" type="text" id="login" /></label>Senha:<label><input name="sanha" type="text" id="sanha" /></label> </p> <p> </p> <p align="center"> <label> <input name="Cadastrar" type="submit" id="Cadastrar" value="Cadastrar" /> </label> <label></label> <input name="Limpar" type="reset" id="Limpar" value="Limpar" /> <br /> <br /> </p> <input type="hidden" name="MM_insert" value="form1"></form> <p> </p> <p> </p> <blockquote>Veja se os campos estão coretamente preenchidos. </blockquote> </div> </div> <div class="clearer"><span></span></div> <div class="footer"> <span class="left">© 2005 Tec Vaitor Desenvolvimento </span> <span class="right"><a href="[http://templates.arcsin.se">Website template</a> by <a href="http://arcsin.se">Arcsin <div class="clearer"><span></span></div> </div></div></body></html>

Discussão (2)

Entre ou cadastre-se para participar da discussão

Entrar Criar conta

Carregando comentários...

Victor Pommer

Patrocinadores

Acontecendo agora

Ainda não há conversas fervendo. Comece uma discussão →

Dev NewsStack Overflow

As perguntas em alta do Stack Overflow aparecem aqui.

Microsoft JET Database Engine (0x80040E14) ASP Erro | Fórum iMasters