Ir para conteúdo
Fórum Script Brasil

Camilla

Membros
  • Total de itens

    56
  • Registro em

  • Última visita

Sobre Camilla

Perfil

  • Gender
    Female

Camilla's Achievements

0

Reputação

  1. O erro é esse: Tipo de erro: Erro de tempo de execução do Microsoft VBScript (0x800A01A8) Objeto necessário: ''
  2. Tudo bem Rafael, não passou mais vazaio!!! Só que os dados naõ são inseridos no banco!!! Está assim: <% data=request.form("data") nome=request.form("nome") nascimento=request.form("nascimento") endereco=request.form("endereco") bairro=request.form("bairro") ddd=request.form("ddd") representante=request.form("representante") orgaoemissor=request.form("orgaoemissor") Set Connect = Server.CreateObject("ADODB.Connection") Connect.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=social;USER=social;PASSWORD=123456;OPTION=3;" SQL1 = "INSERT INTO ficha (data, nome, nascimento, endereco, bairro, ddd, representante, orgaoemissor) values ('"&data&"', '"&nome&"', '"&nascimento&"', '"&endereco&"', '"&bairro&"', '"&ddd&"', '"&representante&"', '"&orgaoemissor&"')" response.write SQL1 response.end response.write "sucessooooooooo" %> Se deixo assim: <% data=request.form("data") nome=request.form("nome") nascimento=request.form("nascimento") endereco=request.form("endereco") bairro=request.form("bairro") ddd=request.form("ddd") representante=request.form("representante") orgaoemissor=request.form("orgaoemissor") Set Connect = Server.CreateObject("ADODB.Connection") Connect.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=social;USER=social;PASSWORD=123456;OPTION=3;" SQL1 = "INSERT INTO ficha (data, nome, nascimento, endereco, bairro, ddd, representante, orgaoemissor) values ('"&data&"', '"&nome&"', '"&nascimento&"', '"&endereco&"', '"&bairro&"', '"&ddd&"', '"&representante&"', '"&orgaoemissor&"')" Connect.execute(SQL1) response.write "sucessooooooooo" %> Dá erro nessa linha: Connect.execute(SQL1)
  3. form <body> <div class="tdo"> <form name="form1" method="post" action="total.asp"> <div class="barracinza"></div> <div class="formulario"> <table border="0" width="720"> <td valign="top" align="right" width="30%"> <tr> <td align="center" colspan="2"><br><b><h3>Informações Cadastrais</h3></b></td> </tr> <tr><td></td> <td style="text-align:left; float:left; display:inline;"><div class="txtobrigatorio">*Todos os campos são obrigatórios, preencha com atenção.</div> <br></td> </tr> </td> </table> <table style="margin-left:auto; margin-right:auto;"> <td> <tr> <td class="direita"> <label for="nome">Nome:</label> </td> <td> <input type="text" name="nome" id="nome"/> </td> </tr> <tr> <td class="direita"><label for="nascimento">Data Nasc.:</label></td> <td class="direita"><input type="text" name="nascimento" id="nascimento" style="width:100" MAXLENGTH="10" /> <label for="naturalidade" style="margin-left:10px; font-size: 9px; color: #000;">Ex:DD/MM/AAAA</label></td> </tr> <tr> <td class="direita"><label for="endereco">Endereço:</label></td> <td><input type="text" name="endereco" id="endereco" /></td> </tr> <tr> <td class="direita"><label for="bairro">Bairro:</label></td> <td><input type="text" name="bairro" id="bairro" /></td> </tr> <tr> <td class="direita"> <label for="dddtel">Tel/Cel:</label> </td> <td class="direita"> <input type="text" class="ddd" name="ddd" id="ddd" size="1" MAXLENGTH="2" />-<input type="text" class="tel" name="tel" id="tel" size="10" MAXLENGTH="10" /> <label for="email">Email:</label> <input type="text" name="email" style="width:200px; margin-left:20px;" size="1" MAXLENGTH="80" /> </td> </tr> <tr> <td class="direita"><span class="direita1"> <label for="representante">Representante:</label> </span></td> <td><input type="text" name="representante" id="representante" /></td> </tr> <tr> <td class="direita"><span style="margin-left:0px;">Candidato a Delegado?</span></td> <td class="direita"><select name="orgaoemissor" class="uf"> <option value="Sim">Sim</option> <option value="Não">Não</option> </select> </td> </tr> </td> </table> <table border="0" width="720"> <td width="30%"></td> </table> </div> <div class="botaook"> <input type="button" style="width: 56px; height: 15px;" onClick="valida_envia()" class="enviar"/> </form></div> </body> total.asp <% data=request.form("data") nome=request.form("nome") nascimento=request.form("nascimento") endereco=request.form("endereco") bairro=request.form("bairro") ddd=request.form("ddd") representante=request.form("representante") orgaoemissor=request.form("orgaoemissor") Set Connect = Server.CreateObject("ADODB.Connection") Connect.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=social;USER=social;PASSWORD=123456;OPTION=3;" SQL1 = "INSERT INTO ficha (data, nome, nascimento, endereco, bairro, ddd, representante, orgaoemissor) values ('"&data&"', '"&nome&"', '"&nascimento&"', '"&endereco&"', '"&bairro&"', '"&ddd&"', '"&representante&"', '"&orgaoemissor&"')" response.write SQL1 response.end response.write "sucessooooooooo" %>
  4. Rafael, Tirei as virgulas e não deu mais erro, Está vazio INSERT INTO ficha (data, nome, nascimento, endereco, bairro, ddd, representante, orgaoemissor) values ('', '', '', '', '', '', '', '') como fazer agora pra esses dados ser inseridos no banco?? []'s
  5. Rafael, vou postar o código pra você ver comoi ficou... ainda está com erro <% data=request.form("data"), nome=request.form("nome"), nascimento=request.form("nascimento"), endereco=request.form("endereco"), bairro=request.form("bairro"), ddd=request.form("ddd"), representante=request.form("representante"), orgaoemissor=request.form("orgaoemissor"), 'Set Connect = Server.CreateObject("ADODB.Connection") 'Connect.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=social;USER=social;PASSWORD=123456;OPTION=3;" SQL1 = "INSERT INTO ficha (data, nome, nascimento, endereco, bairro, ddd, representante, orgaoemissor) values ('"&data&"', '"&nome&"', '"&nascimento&"', '"&endereco&"', '"&bairro&"', '"&ddd&"', '"&representante&"', '"&orgaoemissor&"')" response.write SQL1 response.end response.write "sucessooooooooo" %> Tipo de erro: Erro de compilação do Microsoft VBScript (0x800A0401) Fim da instrução esperado /groupmail/total.asp, line 11, column 25 data=request.form("data"), Linha 11 data=request.form("data"), Espero que possa me ajudar []'s
  6. Rafael, Retornou assim: INSERT INTO ficha (data, nome, nascimento, endereco, bairro, ddd, representante, orgaoemissor) values ('', '', '', '', '', '', '', '') mas e pra inserir no banco??? []'s
  7. Ops passou despercebido a aspas mas mesmo assim continua com erro!!! Vou postar o erro!!! Tipo de erro: Erro de tempo de execução do Microsoft VBScript (0x800A01A8) Objeto necessário: '' /groupmail/total.asp, line 17 Linha 17->Connect.execute(SQL1)
  8. Boa Tarde Pessoal!!! Estou eu aqui novamente precisando de um help de você's Tenho um form e preciso inserir os dados do form em um banco mysql, mais está dando um erro nessa linha: Connect.execute(SQL1) Vou postar os dois códigos que tenho assim fica mais facil de você's me ajudarem. index.asp <body> <div class="tdo"> <form name="form1" method="post" action="total.asp"> <div class="barracinza"></div> <div class="formulario"> <table border="0" width="720"> <td valign="top" align="right" width="30%"> <tr> <td align="center" colspan="2"><br><b><h3>Informações Cadastrais</h3></b></td> </tr> <tr><td></td> <td style="text-align:left; float:left; display:inline;"><div class="txtobrigatorio">*Todos os campos são obrigatórios, preencha com atenção.</div> <br></td> </tr> </td> </table> <table style="margin-left:auto; margin-right:auto;"> <td> <tr> <td class="direita"> <label for="nome">Nome:</label> </td> <td> <input type="text" name="nome" id="nome"/> </td> </tr> <tr> <td class="direita"><label for="nascimento">Data Nasc.:</label></td> <td class="direita"><input type="text" name="nascimento" id="nascimento" style="width:100" MAXLENGTH="10" /> <label for="naturalidade" style="margin-left:10px; font-size: 9px; color: #000;">Ex:DD/MM/AAAA</label></td> </tr> <tr> <td class="direita"><label for="endereco">Endereço:</label></td> <td><input type="text" name="endereco" id="endereco" /></td> </tr> <tr> <td class="direita"><label for="bairro">Bairro:</label></td> <td><input type="text" name="bairro" id="bairro" /></td> </tr> <tr> <td class="direita"> <label for="dddtel">Tel/Cel:</label> </td> <td class="direita"> <input type="text" class="ddd" name="ddd" id="ddd" size="1" MAXLENGTH="2" />-<input type="text" class="tel" name="tel" id="tel" size="10" MAXLENGTH="10" /> <label for="email">Email:</label> <input type="text" name="email" style="width:200px; margin-left:20px;" size="1" MAXLENGTH="80" /> </td> </tr> <tr> <td class="direita"><span class="direita1"> <label for="representante">Representante:</label> </span></td> <td><input type="text" name="representante" id="representante" /></td> </tr> <tr> <td class="direita"><span style="margin-left:0px;">Candidato a Delegado?</span></td> <td class="direita"><select name="orgaoemissor" class="uf"> <option value="Sim">Sim</option> <option value="Não">Não</option> </select> </td> </tr> </td> </table> <table border="0" width="720"> <td width="30%"></td> </table> </div> <div class="botaook"> <input type="button" style="width: 56px; height: 15px;" onClick="valida_envia()" class="enviar"/> </form></div> </body> total.asp <% ficha=request.querystring("form1") Set Connect = Server.CreateObject("ADODB.Connection") Connect.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=social;USER=social;PASSWORD=123456;OPTION=3;" SQL1 = "INSERT INTO ficha (data, nome, nascimento, endereco, bairro, ddd, representante, orgaoemissor) values ("&data&"', '"&nome&"', '"&nascimento&"', '"&endereco&"', '"&bairro&"', '"&ddd&"', '"&representante&"', '"&orgaoemissor&"')" Connect.execute(SQL1) response.write "dados gravados com sucesso" %>
  9. Esse código abaixo é para o clique!!! index <a href="http://boomproducoes.com.br/arquivo1.asp?mail=!*EMAIL*!"> Clique Aqui!!!</a> arquivo1 <% email=request.querystring("mail") Set Connect = Server.CreateObject("ADODB.Connection") Connect.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=groupmail;USER=groupmail;PASSWORD=123456;OPTION=3;" SQL1 = "INSERT INTO news (email) values ('"&email&"')" Connect.execute(SQL1) response.redirect "http://www.aastra.com.br" %> E esse é para a visualização do email sem clique!!! index2 <img src="http://boomproducoes.com.br/arquivo2.asp?mail=!*EMAIL*!" width="1" height="1" style="border:0px solid #00F; display:block;" /> arquivo2 <% email=request.querystring("mail") Set Connect = Server.CreateObject("ADODB.Connection") Connect.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=groupmail;USER=groupmail;PASSWORD=123456;OPTION=3;" SQL1 = "INSERT INTO newsletter (email) values ('"&email&"')" Connect.execute(SQL1) response.write "Email cadastrado com sucesso!!!" %> Vlw Bareta, agora acho que você pode fechar o tópico []'s
  10. Bareta e NoNaMexD!!! Vlw pela força de você's.. já está tudo funcionando o que preciso já podem encerrar esse tópico []'s
  11. Então!! Acho que deve estar acontecendo algum "bug" porque quando fiz o primeiro teste funcionou, agora não funciona mais!! você sabe o que pode ser??
  12. Então Amigo que eu preciso é um asp que lê carregamento de uma imagem!! Como posso estar fazendo isso? Me ajuda []'s
  13. Amigo, Não deu certo, porque eu não quero um link na imagem!! O que eu preciso é quando as pessoas clicarem no email recebido automaticamente salvar o email no banco etendeu?? []'s
  14. Bareta!!! Funfou ... rsrs .. já está inserindo corretamente o email no banco, quando clicamos no XXX !!! Agora Bareta o que preciso é que quando as pessoas abrem o email inserir em uma outra tabela novamente o email!! Conclusão vou ter uma tabela quando a pessoa clica no XXX E uma outra quando a pessoa abrem os emails[sPAM] Mas uma vez Bareta você tem alguma ideia de como fazer isso? rsrsrs Desculpa o encomodo .. []'s
×
×
  • Criar Novo...