Formulário ASP

Vagner Nunes · Outubro 2, 2008

Prezados,

Boa tarde.

Preciso da ajuda dos senhores.

Tenho um formulário de inscrição em ASP, e este formulário ao ser enviado é gravado no banco de dados Acces e carrega a página dizendo que foi gravado no banco, no meu caso é "Inscrição efetuada com sucesso!, daí tudo bem, como faço para meu formulário além de gravar e depois aparecer nesta página que foi gravado com sucesso alguns campos com os dados recem cadastrados do inscrito.

Ex.: nome: fulano de tal matric.: 0001100.

Seria um comprovante de inscrição.

Alguém poderia me ajudar nesta.

Sds,

jothaz · Outubro 2, 2008

você já têm algo pronto?

A inclusão já funciona ok?

A logica seria a mesma da gravação. você não recupera os campos do request.form pra grava no Access?

Então utilize estes mesmo campos para exibir as informações cadastradas.

Vagner Nunes · Outubro 2, 2008

Ok, eu insiro os campos campos na página de resposta?

Exemplo das páginas.

Inscricao.asp, quando efetuado o registro no banco, aparecerá a página pos_inscricao.asp, é neste aquivo que devo inserir o campo? e no formulário, tenho que modificá-lo?

Obrigado

Sds,

Rafael Spilki · Outubro 2, 2008

enbtão... nessa ultima pagina você faz uma query e imprime ela em tela...

uma consulta ao bd mesmo... barbadinha de fazer!

tem algo pronto aí?

Vagner Nunes · Outubro 3, 2008

Tenho sim, vou tentar fazer aqui.....

Obrigadão!

Rafael Spilki · Outubro 3, 2008

beleza... qualquer coisa posta aí!

[]'s

Vagner Nunes · Outubro 3, 2008

Prezado,

Tentei, testei mas não consegui.

Segue abaixo códigos de minhas páginas.

Inscricao.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%

' *** Edit Operations: declare variables

Dim MM_editAction

Dim MM_abortEdit

Dim MM_editQuery

Dim MM_editCmd

Dim MM_editConnection

Dim MM_editTable

Dim MM_editRedirectUrl

Dim MM_editColumn

Dim MM_recordId

Dim MM_fieldsStr

Dim MM_columnsStr

Dim MM_fields

Dim MM_columns

Dim MM_typeArray

Dim MM_formVal

Dim MM_delim

Dim MM_altVal

Dim MM_emptyVal

Dim MM_i

MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))

If (Request.QueryString <> "") Then

MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString)

End If

' boolean to abort record edit

MM_abortEdit = false

' query string to execute

MM_editQuery = ""

%>

<%

' *** Insert Record: set variables

If (CStr(Request("MM_insert")) = "form1") Then

MM_editConnection = MM_Conectar_STRING

MM_editTable = "seletivo"

MM_editRedirectUrl = "pos_inscricao.asp"

' 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)))

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

%>

<%

' *** Insert Record: construct a sql insert statement and execute it

Dim MM_tableValues

Dim MM_dbValues

If (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

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

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

%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<head>

<title>Processo Seletivo 2009/1</title>

<!--

body {

background-color: #F4F4F4;

}

.style1 {

font-family: Verdana, Arial, Helvetica, sans-serif;

font-weight: bold;

font-size: 16px;

}

.style3 {font-size: 11px}

.style4 {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; }

.style6 {

font-size: 5px;

color: #FFFFFF;

}

.style8 {font-size: 5px}

.style9 {color: #FFFFFF}

.style7 {color: #993300}

-->

</style></head>

<body>

<tr>

<tr>

</object>

</div></td>

</tr>

<tr>

<td bgcolor="#F6F811"><div align="center" class="style1">Processo Seletivo 2009/1 </div></td>

</tr>

<tr>

<form ACTION="<%=MM_editAction%>" METHOD="POST" name="form1">

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Nome completo:</span></div></td>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Endereço Completo:</span></div></td>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Número:</span></div></td>

</div></td>

</tr>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Bairro:</span></div></td>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Cidade:</span></div></td>

</div></td>

</tr>

(Ex: 333.333-33)</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Email:</span></div></td>

</div></td>

</tr>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Telefone residencial:</span></div></td>

(027) 3333-3333</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Telefone celular:</span></div></td>

(027) 3333-3333</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Telefone comercial:</span></div></td>

(027) 3333-3333</div></td>

</tr>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Data de Nascimento: </span></div></td>

(Ex: 14/05/1982) </div></td>

</tr>

<label>

<option value="feminino">Feminino</option>

<option value="masculino">Masculino</option>

</select>

</label>

</div></td>

</tr>

(somente números) </div></td>

</tr>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Estado Civil: </span></div></td>

<label>

<option value="Solteiro(a)">Solteiro(a)</option>

<option value="Casado(a)">Casado(a)</option>

<option value="Separado(a)">Separado(a)</option>

</select>

</label>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">É portador de necessidade especial?</span></div></td>

</select>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Qual necessidade?</span></div></td>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Escola que concluiu o Ensino Médio:</span></div></td>

</div></td>

</tr>

<td align="right" nowrap="nowrap" bgcolor="#8A9292"><div align="left" class="style4"><span class="style9">Ano de conclusão do ensino Médio:</span></div></td>

(Ex:2007)</div></td>

</tr>

</tr>

<p class="style9">Curso pretendido: <br />

</p>

<p class="style9"> <span class="style7">* Campo obrigatório </span></p>

</div></td>

<p>

<label>

Administração de Empresas (Noturno)</label>

<br />

<label>

Biblioteconomia (Noturno)</label>

<br />

<label>

Ciência Política (Noturno)</label>

<br />

<label>

Design (Projeto de Produto)</label>

<br />

<label>

Direito (Noturno)</label>

<br />

<label>

História (Noturno)</label>

<br />

<label>

Letras Português/Espanhol (Matutino)</label>

<br />

<label>

Letras Português/Inglês (Matutino)</label>

<br />

<label>

Matemática (Noturno)</label>

<br />

<label>

Pedagogia (Matutino)</label>

<br />

<label>

Secretariado Executivo Trilígüe (Noturno)</label>

<br />

</p>

</div></td>

</tr>

</tr>

<p class="style9">Fonte de Informação sobre o Processo Seletivo: </p>

<p class="style9"><span class="style7">* Campo obrigatório </span></p>

</div></td>

<p>

<label>

Outdoor</label>

<br />

<label>

Anúncio de Jornal</label>

<br />

<label>

Anúncio On Line</label>

<br />

<label>

Panfleto</label>

<br />

<label>

Anúncio de Televisão</label>

<br />

<label>

Rádio</label>

<br />

<label>

No próprio site do Cesat</label>

<br />

<label>

Indicação de Amigo</label>

<br />

<label>

Outro</label><br />

</p>

</div></td>

</tr>

</tr>

<p class="style9">Agendamento da Prova:</p>

<p class="style9"><span class="style7">* Campo obrigatório </span></p>

</div></td>

<option>--------------------------------- Terça-feira</option>

<option value="30 de outubro, das 8h ás 11h ">30 de outubro, das 8h às 11h </option>

<option value="30 de outubro, das 14h às 17h">30 de outubro, das 14h às 17h</option>

<option value="6 de novembro, das 8h ás 11h ">6 de novembro, das 8h às 11h </option>

<option value="6 de novembro, das 14h às 17h ">6 de novembro, das 14h às 17h </option>

<option value="13 de novembro, das 8h ás 11h ">13 de novembro, das 8h às 11h </option>

<option value="13 de novembro, das 14h às 17h ">13 de novembro, das 14h às 17h </option>

<option value="20 de novembro, das 8h ás 11h ">20 de novembro, das 8h às 11h </option>

<option value="20 de novembro, das 14h às 17h ">20 de novembro, das 14h às 17h </option>

<option value="27 de novembro, das 8h ás 11h ">27 de novembro, das 8h às 11h </option>

<option value="27 de novembro, das 14h às 17h ">27 de novembro, das 14h às 17h </option>

<option>------------------------------------------Quinta-feira</option>

<option value="25 de outubro das 8h às 11h">25 de outubro das 8h às 11h</option>

<option value="25 de outubro das 14h às 17h">25 de outubro das 14h às 17h</option>

<option value="1 de novembro, das 8h ás 11h ">1 de novembro, das 8h às 11h </option>

<option value="1 de novembro, das 14h às 17h ">1 de novembro, das 14h às 17h </option>

<option value="8 de novembro, das 8h ás 11h ">8 de novembro, das 8h às 11h </option>

<option value="8 de novembro, das 14h às 17h ">8 de novembro, das 14h às 17h </option>

<option value="22 de novembro, das 8h ás 11h ">22 de novembro, das 8h às 11h </option>

<option value="22 de novembro, das 14h às 17h ">22 de novembro, das 14h às 17h </option>

<option value="29 de novembro, das 8h ás 11h ">29 de novembro, das 8h às 11h </option>

<option value="29 de novembro, das 14h às 17h ">29 de novembro, das 14h às 17h </option>

<option>-----------------------------------------sábado</option>

<option value="27 de outubro, das 8h às 11h">27 de outubro, das 8h às 11h</option>

<option value="3 de novembro, das 8h às 11h">3 de novembro, das 8h às 11h</option>

<option value="10 de novembro, das 8h às 11h">10 de novembro, das 8h às 11h</option>

<option value="17 de novembro, das 8h às 11h">17 de novembro, das 8h às 11h</option>

<option value="24 de novembro, das 8h às 11h">24 de novembro, das 8h às 11h</option>

</select>

</div></td>

</tr>

</span> <span class="style3">

</span>

<label>

</div>

</div> </label></td>

</tr>

</table>

<br />

</form>

</div></td>

</tr>

<tr>

</tr>

</table></td>

</tr>

</table>

</body>

</html>

pos-inscricao.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%

Dim Recordset1

Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")

Recordset1.ActiveConnection = MM_Conectar_STRING

Recordset1.Source = "SELECT * FROM seletivo"

Recordset1.CursorType = 0

Recordset1.CursorLocation = 2

Recordset1.LockType = 1

Recordset1.Open()

Recordset1_numRows = 0

%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<head>

<title>Process Seletivo CESAT 2009/1</title>

<!--

body {

background-color: #F4F4F4;

}

.style1 {

font-family: Verdana, Arial, Helvetica, sans-serif;

font-weight: bold;

font-size: 16px;

}

.style2 {

font-family: Verdana, Arial, Helvetica, sans-serif;

font-weight: bold;

}

.style3 {font-family: Verdana, Arial, Helvetica, sans-serif}

.style5 {font-size: 12px}

.style7 {font-size: 12px; color: #FF0000; }

.style8 {color: #000000}

-->

</style></head>

<body>

<tr>

<tr>

</object></td>

</tr>

<tr>

<td bgcolor="#F6F811"><div align="center" class="style1">Processo Seletivo 2009/1 </div></td>

</tr>

<tr>

<tr>

Sua inscrição foi realizada com sucesso. </p>

<label><span class="style3"><span class="style7">Para realizar a prova do PROCESSO SELETIVO 2009/1 é obrigatório a apresentação do comprovante de inscrição. <br />

<br />

<span class="style8">Emitir comprovante de inscrição </span></span><br />

<br />

</span></label>

<label>

</label>

</span>

<br />

</form>

<p>

</p>

</div></td>

</tr>

<tr>

</tr>

<tr>

</tr>

</table>

<br />

</div></td>

</tr>

<tr>

</tr>

</table></td>

</tr>

</table>

</body>

</html>

<%

Recordset1.Close()

Set Recordset1 = Nothing

%>

Royweb-DF · Outubro 3, 2008

Bom dia brother, cara seu código tá estranho como se tivesse utilizando algum sistema pra gerar códigos automáticos, não tá muito claro mas tenta assim.

1º - Você precisa saber o nome dos campos que deseja mostrar (campos do formulário) tipo assim:

2º - Na página que é mostrada a mensagem de gravado com sucesso basta incluir os nomes dos campos do seu formulário utilizando request.form("nome_do_campo_do_formulario") tipo assim:

<%

response.write("Sua inscrição foi gravada com sucesso! Confira seus dados.")

inscricao = request.form("inscricao")

nome = request.form("nome_candidato")

'Após receber os valores do formulário basta escrever na tela os nomes das variaveis

response.write("inscricao")

response.write("nome")

%>

A saída será a mensagem de gravado com sucesso e logo abaixo os dados do candidato.

Espero ter ajudado!!

Rafael Spilki · Outubro 3, 2008

Tentei, testei mas não consegui.

ta bom, mas o que ta acontecendo? alguma mensagem de erro? qual a sua dúvida?

além disso, cade o codigo de: inscritos_comprovante.asp

última coisa ainda: quando fores postar codigos, procure sempre os postar dentro das tags code /code

assim

sacou?

botãozinho de cima o mais a direita...

fico no aguardo...

[]'s Rafael Spilki

Vagner Nunes · Outubro 3, 2008

Pessoal, valeu pela ajuda... Agora deu certo. Valeu...

Entrar

Formulário ASP

Pergunta

Vagner Nunes

Link para o comentário

Compartilhar em outros sites

9 respostass a esta questão

Posts Recomendados

jothaz

Link para o comentário

Compartilhar em outros sites

Vagner Nunes

Link para o comentário

Compartilhar em outros sites

Rafael Spilki

Link para o comentário

Compartilhar em outros sites

Vagner Nunes

Link para o comentário

Compartilhar em outros sites

Rafael Spilki

Link para o comentário

Compartilhar em outros sites

Vagner Nunes

Link para o comentário

Compartilhar em outros sites

Royweb-DF

Link para o comentário

Compartilhar em outros sites

Rafael Spilki

Link para o comentário

Compartilhar em outros sites

Vagner Nunes

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades