Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Djwagg

[Resolvido] Problema ficha de inscricao banco em access

Por , em ASP Clássico

Recommended Posts

Djwagg    0

Djwagg
Postado

estou tentando criar uma ficha de inscricao no meu site com banco de dados em access

mais estou tendo um porblema quando envio os dados da esse erro ai

 

 

erro na pagina

 

Microsoft JScript compilation error '800a03ee'

 

Expected ')'

 

/Connections/conexao.asp, line 9

 

var MM_conexao_STRING =("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("contatos.accdb");

---------------------------------------------------------------------------------------------------------^

 

se eu tirar essa virgula do final da erro em outra parte:

 

Microsoft JScript compilation error '800a03ee'

 

Expected ')'

 

/inscricao.asp, line 7

 

var MM_editAction = Request.ServerVariables("SCRIPT_NAME");

^

 

 

 

codigo da pagina com erro

 

<%
// FileName="Connection_odbc_conn_dsn.htm"
// Type="ADO" 
// DesigntimeType="ADO"
// HTTP="false"
// Catalog=""
// Schema=""
var MM_conexao_STRING =("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("contatos.accdb");
%>

 

Ficha de inscrição

 

<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%>
<!--#include file="Connections/conexao.asp" -->
<%
// *** Edit Operations: declare variables

// set the form action variable
var MM_editAction = Request.ServerVariables("SCRIPT_NAME");
if (Request.QueryString) {
  MM_editAction += "?" + Server.HTMLEncode(Request.QueryString);
}

// boolean to abort record edit
var MM_abortEdit = false;
%>
<%
if (String(Request("MM_insert")) == "form1") {
  if (!MM_abortEdit) {
    // execute the insert
	
    var MM_editCmd = Server.CreateObject ("ADODB.Command");
    MM_editCmd.ActiveConnection = MM_conexao_STRING;
    MM_editCmd.CommandText = "INSERT INTO Contatos (Nome, Sobrenome, [Endereço de Email], [Telefone Residencial], [Telefone Celular], [Endereço], Cidade, [Estado/Província], CEP, [País/Região], [Página da Web (orkut, twitter, facebook e etc)], [Primeira ano que deseja Cantar no Festival?], [Como soube do festival?], Comentario) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)";
    MM_editCmd.Prepared = true;
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param1", 202, 1, 50, Request.Form("Nome"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param2", 202, 1, 50, Request.Form("Sobrenome"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param3", 202, 1, 50, Request.Form("Endereo_de_Email"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param4", 202, 1, 25, Request.Form("Telefone_Residencial"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param5", 202, 1, 25, Request.Form("Telefone_Celular"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param6", 203, 1, 1073741823, Request.Form("Endereo"))); // adLongVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param7", 202, 1, 50, Request.Form("Cidade"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param8", 202, 1, 50, Request.Form("EstadoProvncia"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param9", 202, 1, 15, Request.Form("CEP"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param10", 202, 1, 50, Request.Form("PasRegio"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param11", 203, 1, 1073741823, Request.Form("Pgina_da_Web_orkut_twitter_facebook_e_etc"))); // adLongVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param12", 5, 1, -1, (String(Request.Form("Primeira_ano_que_deseja_Cantar_no_Festival")) != "undefined" && String(Request.Form("Primeira_ano_que_deseja_Cantar_no_Festival")) != "") ? "Y" : "N")); // adDouble
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param13", 202, 1, 255, Request.Form("Como_soube_do_festival"))); // adVarWChar
    MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param14", 203, 1, 1073741823, Request.Form("Comentario"))); // adLongVarWChar
    MM_editCmd.Execute();
    MM_editCmd.ActiveConnection.Close();

    // append the query string to the redirect URL
    var MM_editRedirectUrl = "sucesso.asp";
    if (MM_editRedirectUrl && Request.QueryString && Request.QueryString.Count > 0) {
      MM_editRedirectUrl += ((MM_editRedirectUrl.indexOf('?') == -1) ? "?" : "&") + Request.QueryString;
    }
    Response.Redirect(MM_editRedirectUrl)
  }
}
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>ficha de inscrição</title>
<style type="text/css">
<!--
body,td,th {
	color: #FFF;
	font-family: Verdana, Geneva, sans-serif;
}
body {
	background-color: #000;
}
-->
</style></head>

<body>
<form action="<%=MM_editAction%>" method="post" name="form1" id="form1">
  <table border="0" align="center" cellpadding="3" cellspacing="3">
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Nome:</td>
      <td align="left"><input type="text" name="Nome" value="" size="18" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Sobrenome:</td>
      <td align="left"><input type="text" name="Sobrenome" value="" size="32" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Endereço de Email:</td>
      <td align="left"><input type="text" name="Endereo_de_Email" value="" size="40" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Telefone Residencial:</td>
      <td align="left"><input type="text" name="Telefone_Residencial" value="" size="13" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Telefone Celular:</td>
      <td align="left"><input type="text" name="Telefone_Celular" value="" size="13" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Endereço:</td>
      <td align="left"><input type="text" name="Endereo" value="" size="50" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Cidade:</td>
      <td align="left"><input type="text" name="Cidade" value="" size="20" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Estado/Província:</td>
      <td align="left"><input type="text" name="EstadoProvncia" value="" size="8" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">CEP:</td>
      <td align="left"><input type="text" name="CEP" value="" size="13" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">País/Região:</td>
      <td align="left"><input type="text" name="PasRegio" value="Brasil" size="13" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Página da Web (orkut, twitter, facebook e etc):</td>
      <td align="left"><input type="text" name="Pgina_da_Web_orkut_twitter_facebook_e_etc" value="" size="40" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Primeira ano que deseja Cantar no Festival?:</td>
      <td align="left"><select name="Primeira_ano_que_deseja_Cantar_no_Festival">
        <option value="Y"  selected="selected">Sim</option>
        <option value="N" >Não</option>
      </select></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Como soube do festival?:</td>
      <td align="left"><input type="text" name="Como_soube_do_festival" value="" size="32" /></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left">Comentario:</td>
      <td align="left"><textarea name="Comentario" cols="32"></textarea></td>
    </tr>
    <tr valign="baseline">
      <td nowrap="nowrap" align="left"> </td>
      <td align="left"><input type="submit" value="Enviar" />
      <input name="Redefinir" type="reset" value="Limpar" /></td>
    </tr>
  </table>
  <input type="hidden" name="MM_insert" value="form1" />
</form>
<p> </p>
</body>
</html>

Alguem pode me ajudar a resolver esse problema?

Compartilhar este post

Link para o post
Compartilhar em outros sites

NetHand Soluções Web    0

NetHand Soluções Web
Postado 

<%
// FileName="Connection_odbc_conn_dsn.htm"
// Type="ADO" 
// DesigntimeType="ADO"
// HTTP="false"
// Catalog=""
// Schema=""
var MM_conexao_STRING =("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("contatos.accdb")[b][color="#FF0000"])[/color];[/b]
%>

;)

Compartilhar este post

Link para o post
Compartilhar em outros sites

Djwagg    0

Djwagg
Postado

<%

// FileName="Connection_odbc_conn_dsn.htm"

// Type="ADO"

// DesigntimeType="ADO"

// HTTP="false"

// Catalog=""

// Schema=""

var MM_conexao_STRING =("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("contatos.accdb"));

%>

 

;)

 

 

cara agora ficou assim

 

ADODB.Command error '800a0bb9'

 

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

 

/inscricao.asp, line 21

 

 

linha 21: MM_editCmd.ActiveConnection = MM_conexao_STRING;

Compartilhar este post

Link para o post
Compartilhar em outros sites

NetHand Soluções Web    0

NetHand Soluções Web
Postado

tenta assim

 

<%
// FileName="Connection_odbc_conn_dsn.htm"
// Type="ADO" 
// DesigntimeType="ADO"
// HTTP="false"
// Catalog=""
// Schema=""
var MM_conexao_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("contatos.accdb")
%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Djwagg    0

Djwagg
Postado

tenta assim

 

<%

// FileName="Connection_odbc_conn_dsn.htm"

// Type="ADO"

// DesigntimeType="ADO"

// HTTP="false"

// Catalog=""

// Schema=""

var MM_conexao_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("contatos.accdb")

%>

 

 

 

 

mesmo erro ainda :(

sera porque o caminho do banco nao ta completo?

mais ele esta na raiz, acho q nao daria problema.

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

verifiwue se o caminho esta correto Server.MapPath("contatos.accdb")

Compartilhar este post

Link para o post
Compartilhar em outros sites

Djwagg    0

Djwagg
Postado

verifiwue se o caminho esta correto Server.MapPath("contatos.accdb")

 

 

esta sim certinho. :(

sou novo nessa area ainda, nem entendo muito.

mais verifiquei tudo e esta certinho.

nao sei o que pode ser...

Compartilhar este post

Link para o post
Compartilhar em outros sites

Djwagg    0

Djwagg
Postado

qual erro está dando após a sugestão do nosso amigo NetHand?

 

em qual linha?

 

 

 

esse erro ai:

 

ADODB.Command error '800a0bb9'

 

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

 

/inscricao.asp, line 21

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

verifique se você tem o include do arquivo ADOJAVAS.INC

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito