Ir para conteúdo

POWERED BY:

Arquivado

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

ythalorossy

Dulvido encontrarem o erro desse ASP!

Por , em ASP Clássico

Recommended Posts

ythalorossy    0

ythalorossy
Postado

Olá Amigos!

 

Estou fazendo um cadastro online, onde o usuario se cadastra no formulario abaixo:

 

 

<form name="form1" method="post" action="enviando.asp">

  <table width="618" border="1" cellspacing="1" cellpadding="2" align="center" bordercolor="#FFCCCC">

    <tr bgcolor="#FF6666" align="center" bordercolor="#000000">

      <td valign="middle" colspan="4"><font face="Arial, Helvetica, sans-serif"><img src="logo.gif" height="110" width="250"></font></td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" width="72"><font face="Arial, Helvetica, sans-serif" size="2"><b>Nome</b></font></td>

      <td align="left" width="195"><font face="Arial, Helvetica, sans-serif" size="2">

        <input type="text" name=nome size="50" style="background:FFBFBF;font-size:4"  >

        </font></td>

      <td align="right" colspan="2" bgcolor="#FFDFDF"><font face="Arial, Helvetica, sans-serif" size="2"><b><font size="1">Data

        Nasc.</font></b> <font size="1">

        <input type="text" name="datanascimento" style="background:FFBFBF;font-size:4" size="20" value="99/99/9999">

        </font> </font></td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" width="72"><font face="Arial, Helvetica, sans-serif" size="2"><b>Endereço</b></font></td>

      <td align="left" colspan="3"><font face="Arial, Helvetica, sans-serif" size="2">

        <input type="text" name="endereco" size="50" style="background:FFBFBF;font-size:4">

        </font><font face="Arial, Helvetica, sans-serif" size="2"><b>Complemento</b></font><font face="Arial, Helvetica, sans-serif" size="2">

        <input type="text" name="complemento" style="background:FFBFBF;font-size:4" size="31">

        </font></td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" width="72"><font face="Arial, Helvetica, sans-serif" size="2"><b>Bairro</b></font></td>

      <td align="left" width="195"><font face="Arial, Helvetica, sans-serif" size="2">

        <input type="text" name="bairro" size="50" style="background:FFBFBF;font-size:4">

        </font></td>

      <td align="right" colspan="2"><font face="Arial, Helvetica, sans-serif" size="2"><b><font size="1">Cidade</font></b>

        <font size="1">

        <input type="text" name="cidade" style="background:FFBFBF;font-size:4">

        </font> </font><font face="Arial, Helvetica, sans-serif" size="1"><b>UF</b>

        <input type="text" name="estado" size="5" style="background:FFBFBF;font-size:4">

        </font></td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" width="72"><font face="Arial, Helvetica, sans-serif" size="2"><b>Fone</b></font></td>

      <td align="left" colspan="2"><font face="Arial, Helvetica, sans-serif" size="2">

        <input type="text" name="telefone" size="50" style="background:FFBFBF;font-size:4">

        </font></td>

      <td align="left" width="92"> </td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" width="72"><font face="Arial, Helvetica, sans-serif" size="2"><b>Fax</b></font></td>

      <td align="left" colspan="2"><font face="Arial, Helvetica, sans-serif" size="2"><font color="#FFFFFF">

        <input type="text" name="fax" size="50" style="background:FFBFBF;font-size:4">

        </font></font></td>

      <td align="left" width="92"> </td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" width="72"><font face="Arial, Helvetica, sans-serif" size="2"><b>Email</b></font></td>

      <td align="left" colspan="2"><font face="Arial, Helvetica, sans-serif" size="2">

        <input type="text" name="email" size="50" style="background:FFBFBF;font-size:4">

        </font></td>

      <td align="left" width="92"> </td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" width="72"><font face="Arial, Helvetica, sans-serif" size="2"><b>Paróquia</b></font></td>

      <td align="left" colspan="2"><font face="Arial, Helvetica, sans-serif" size="2">

        <input type="text" name="textfield" size="50" style="background:FFBFBF;font-size:4">

        </font></td>

      <td align="left" width="92"> </td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" colspan="4"> <font face="Arial, Helvetica, sans-serif" size="1"><font size="2"><b><br>

        Quais os sacramentos que você recebeu?<br>

        </b></font></font><font face="Arial, Helvetica, sans-serif" size="2">

        <select name="sacramentos" style="background:FFBFBF;font-size:4">

          <option>---------------------------</option>

          <option value="batismo">Batismo</option>

          <option value="eucaristia">Eucaristia</option>

          <option value="crisma">Crisma</option>

          <option value="matrimonio">Matrimônio</option>

        </select>

        <br>

        <br>

        </font></td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" colspan="4">

        <p><font face="Arial, Helvetica, sans-serif" size="2"><b><font color="#000000">Você

          é engajado em algum movimeto da igreja? Qual?<br>

          </font></b></font><font face="Arial, Helvetica, sans-serif" size="2" color="#000000">

          <select name="movimento" style="background:FFBFBF;font-size:4">

            <option>------</option>

            <option value="sim">Sim</option>

            <option value="nao">Não</option>

          </select>

           <b><font size="1">Movimento</font></b>  

          <input type="text" name="detalhes_movimento" style="background:FFBFBF;font-size:4" size="50">

          <br>

          <br>

          </font></p>

      </td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" colspan="4">

        <p><font face="Arial, Helvetica, sans-serif" size="2"><b>Você é

          dizimista?<br>

          </b></font>

          <select name="dizimista" style="background:FFBFBF;font-size:4">

            <option>------</option>

            <option value="sim"><font face="Arial, Helvetica, sans-serif" size="2">Sim</font></option>

            <option value="nao"><font face="Arial, Helvetica, sans-serif" size="2">Não</font></option>

          </select>

          <font face="Arial, Helvetica, sans-serif" size="2" color="#000000"> 

          <b><font size="1">Paróquia</font></b>   

          <input type="text" name="detalhes_dizimista" style="background:FFBFBF;font-size:4" size="50">

          <br>

          <br>

          </font> </p>

      </td>

    </tr>

    <tr valign="middle" bgcolor="#FFDFDF">

      <td align="left" colspan="3">

        <p><font face="Arial, Helvetica, sans-serif" size="2"><b>Você conhece

          alguma TV, Rádio ou Site católico?<br>

          </b></font><font face="Arial, Helvetica, sans-serif"> <font size="2">

          <font color="#000000">

          <select name="tvradio" style="background:FFBFBF;font-size:4">

            <option>------</option>

            <option value="sim">Sim</option>

            <option value="nao">Não</option>

          </select>

            <b><font size="1">Quais?</font></b>      

          </font></font></font>

          <input type="text" name="detalhes_tvradio" style="background:FFBFBF;font-size:4" size="50">

          <br>

        </p>

      </td>

      <td align="center"> <font face="Arial, Helvetica, sans-serif" size="1" color="#000000">Confira

        os dados!</font><br>

        <input type="submit" name="Submit" value="Enviar" style="background:FFBFBF;font-size:4">

        <input type="reset" name="Submit2" value="Reset" style="background:FFBFBF;font-size:4">

      </td>

    </tr>

  </table>

</form>

O arquivo enviando.asp é esse!

 

<%

 

Dim NOME, NASCIMENTO, ENDERECO, ENDERECOMPLE, BAIRRO, FONE, FAX, EMAIL, PAROQUIA, SACRAMENTOS, MOVIMENTOS, DETMOVIMENTOS, DIZIMISTA, DETDIZIMISTA,RADIOTV, RADIOTVDET

 

seuNOME    =  request("nome")

seuNASCIMENTO  =  request("datanascimento")

 

 

seuENDERECO      =  request("endereco")

seuENDERECOMPLE    =  request("complemento")

 

IF (seuENDERECOMPLE)<> "" THEN

endereco01 = seuENDERECO + " " + seuENDERECOMPLE

END IF

 

 

seuBAIRRO  =  request("bairro")

seuFONE  =  request("fone")

seuFAX  =  request("fax")

seuEMAIL  =  request("email"

seuPAROQUIA  =  request("paroquia")

 

 

seuSACRAMENTOS  =  request("sacramentos")

 

SELECT CASE seuSACRAMENTOS

CASE "batismo"

seuSACRAMENTOS = "Batismo"

 

CASE "eucaristia"

seuSACRAMENTOS = "Eucaristia"

 

CASE "crisma"

seuSACRAMENTOS = "crisma"

 

CASE "matrimonio"

seuSACRAMENTOS = "matrimonio"

 

END SELECT

 

 

 

seuMOVIMENTOS  =  request("movimentos")

seuDETMOVIMENTOS  =  request("detalhes_movimentos")

 

IF (seuMOVIMENTOS) = "sim" THEN

seuMOVIMENTOS = seuMOVIMENTOS + " " + seuDETMOVIMENTOS

  IF (seuDETMOVIMENTOS) = "" THEN

  seuMOVIMENTOS = seuMOVIMENTOS + "Sem Detalhes"

  END IF

 

END IF

 

 

 

seuDIZIMISTA  =  request("dizimistas")

seuDETDIZIMISTA  =  request.Form("detalhes_dizimistas"

 

IF (seuDIZIMISTA) = "sim" THEN

seuDIZIMISTA = seuDIZIMISTA + " " + seuDETDIZIMISTA

  IF (seuDETDIZIMISTA) = "" THEN

  seuDIZIMISTA = seuDIZIMISTA + "Sem Detalhes"

  END IF

END IF

 

 

seuRADIOTV  =  request("tvradio")

seuRADIOTVDET  =  request("detalhes_tvradio")

 

IF (seuRADIOTV) = "sim" THEN

seuRADIOTV = seuRADIOTV + " " + seuRADIOTVDET

  IF (seuRADIOTVDET) = "" THEN

  seuRADIOTV = seuRADIOTV + "Sem Detalhes"

  END IF

END IF

 

 

 

set Conn = Server.CreateObject("ADODB.Connection")

Conn.CursorLocation = 12 'adUseClientBatch

Conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.mappath("dbclients.mdb")

Conn.Execute "INSERT INTO usuarios (nome,endereco,bairro,fone,fax,email,paroquia,datanascimento,sacramento,moviment

 

o,dizimista,radiotv)

 

values('"& seuNOME &"','"& seuENDERECO &"','"& seuBAIRRO &"','"& seuFONE &"','"& seuFAX &"','"& seuEMAIL &"','"& seuPAROQUIA &"','"& seuNASCIMENTO &"','"& seuSACRAMENTO &"','"& seuMOVIMENTO &"','"& seuDIZIMISTA &"','"& seuRADIOTV & "')"

 

 

response.write "<center>"+"<br><font size=2 face=Arial>"+"Cadastro efetuado com sucesso!" & "<br>" & "<a href=cadastro.htm target=palcocadastro>Cadastrar-se!</a></font></center>"

 

 

%>

O nome do "*.mdb" é dbclients.mdb

 

 

Lembrando que sou iniciante em ASP, e esse é meu primeiro projeto com ASP!

 

Espero receber a sua ajuda!

 

 

Ythalo Rossy! :D

Compartilhar este post

Link para o post
Compartilhar em outros sites

ythalorossy    0

ythalorossy
Postado

Ola Amigos!A algumas horas tinhapostado o topico acima, mas voltei aqui agora´para dizer que consegui solucionar o problema.Havia muito comando errados, e espaços onde não deveria...Coloquei o código em ASp para testa no PWS, e ele mostrou todos os erros!Muito Obrigado!

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