Ir para conteúdo

POWERED BY:

Arquivado

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

cerburus

Apos confirmar dados Exibir pagina de confimação

Por , em ASP Clássico

Recommended Posts

cerburus    0

cerburus
Postado

Galera seguinte esse form meu qndo confirmamos os dados! ele exibe um javascript dizendo que os dados foram enviados! porem muita gente nao ve esse java! e para resolver isso queria que quando confirma-se ele abri-se uma outra pagina com a mensagem! alguem pode me ajudar!

segue o codigo completo, alis a bagunça completa! hauha

 

<%@Language="VBScript"%>
<%Response.Expires = 0%>

<%
        Dim i
        Dim ii
        Dim varCont
        
        If Request.Form("txtDe") <> "" Then
                Dim objConn
                Dim varConn
                Dim varSql
                Dim rsIncluir
                Dim varMensagem
                Dim arrayCarinhas(14)
                
                'Cria a conexão com a base de dados
                Set objConn = Server.CreateObject("ADODB.Connection")
                varConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("BDMuralRecados.mdb") & ";Persist Security Info=False;Jet OLEDB:Database Password="
                objConn.Open varConn
        
                arrayCarinhas(0) = "(1)"
                arrayCarinhas(1) = "(2)"
                arrayCarinhas(2) = "(3)"
                arrayCarinhas(3) = "(4)"
                arrayCarinhas(4) = "(5)"
                arrayCarinhas(5) = "(6)"
                arrayCarinhas(6) = "(7)"
                arrayCarinhas(7) = "(8)"
                arrayCarinhas(8) = "(9)"
                arrayCarinhas(9) = "(10)"
                arrayCarinhas(10) = "(11)"
                arrayCarinhas(11) = "(12)"
                arrayCarinhas(12) = "(13)"
                arrayCarinhas(13) = "(14)"
                arrayCarinhas(14) = "(15)"
                
                varSql = "SELECT * "
                varSql = varSql & "FROM MuralRecados "
                
                Set rsIncluir = Server.CreateObject("ADODB.Recordset")
                rsIncluir.CursorType = 0
                rsIncluir.CursorLocation = 2
                rsIncluir.LockType = 3
                rsIncluir.Open varSql, objConn
                
                
                rsIncluir.AddNew
                rsIncluir.Fields("DataInclusao") = Date()
                rsIncluir.Fields("HoraInclusao") = Time()
                rsIncluir.Fields("De") = Request.Form("txtDe")
                rsIncluir.Fields("Email") = Request.Form("txtEmail")
                rsIncluir.Fields("Para") = Request.Form("txtPara")
                
                
                
                varMensagem = Request.Form("areaMensagem")
                varMensagem = replace(varMensagem, chr(13), "<br>")
                For i = 0 to 14
                        varMensagem = Replace(varMensagem, arrayCarinhas(i), "<img src=Imagens/Carinhas/" & i+1 & ".gif>")
                Next
                
                rsIncluir.Fields("Mensagem") = varMensagem
                rsIncluir.Fields("IPConexao") = Request.ServerVariables("REMOTE_ADDR")
                rsIncluir.Update
                
                rsIncluir.Close
                Set rsIncluir = Nothing
                
                objConn.Close
                Set objConn = Nothing
        End If
%>

<html>
<head>
                <title>Enviar nomes para Lista VIP</title>
                <style type="text/css">
                <!--
                        a:active{
                                text-decoration: none;
                                color: #333333;
                        }
                        a:hover{
                                text-decoration: none;
                                color: #000000;
                        }
                        a:link{
                                text-decoration: none;
                                color: #333333;
                        }
                        a:visited{
                                text-decoration: none;
                                color: #333333;
                        }
                        .Texto1{
                                font-family: Verdana;
                                font-size: 10px;
                                font-weight: none;
                                color: #000000;
                                text-decoration: none;
                        }
                        .Texto2{
                                font-family: Verdana;
                                font-size: 10px;
                                font-weight: bold;
                                color: #000000;
                                text-decoration: none;
                        }
                        .Borda1{
                                border: 1px solid #999999;
                        }
                        .Form1{
                                border: 1px solid #999999;
                                font-family: Verdana;
                                font-size: 12px;
                                color: #000000;
                                text-decoration: none;
                                background-color: #FFF4CA;
                        }
body {
        margin-left: 0px;
        margin-top: 0px;
        margin-right: 0px;
        margin-bottom: 0px;
        background-color: #333333;
        color: #999;
}
.style3 {font-family: Verdana; font-size: 10px; font-weight: bold; color: #FFFFFF; text-decoration: none; }
.style5 {font-family: Verdana; font-size: 12px; text-decoration: none; background-color: #FFF4CA; border: 1px solid #999999;}
.style6 {color: #FFFFFF}
.APAGAO {
        font-weight: bold;
        font-family: "Arial Black", Gadget, sans-serif;
}
.style9 {
        color: #FFFFFF;
        font-size: 12px;
}
.style3 em {
        font-size: 11px;
}
.style11 {
        color: #FFFFFF;
        font-family: Arial, Helvetica, sans-serif;
        font-size: 10px;
}
                -->
                </style>
<script language="Javascript">
<!--
                        <%If Request.Form("txtDe") <> "" Then%>
                                opener.location.reload();
                                alert('Dados enviados com SUCESSO!');
                                window.close();
                        <%End If%>
                        
                        function Incluir(varForm){
                                if (varForm.txtDe.value == ""){
                                        window.alert ("Preencha o campo SEU NOME");
                                        varForm.txtDe.focus();
                                        return false;
                                }
                                if (varForm.txtPara.value == ""){
                                        window.alert ("Falta preencher o campo SEU EMAIL");
                                        varForm.txtPara.focus();
                                        return false;
                                }
                                if (varForm.areaMensagem.value == ""){
                                        window.alert ("Falta preencher o campo MENSAGEM");
                                        varForm.areaMensagem.focus();
                                        return false;
                                }
                                varForm.submit();
                        }
                        
                        function Carinhas(varForm, varCarinha){
                                var arrayCarinhas = new Array("(1)", "(2)", "(3)", "(4)", "(5)", "(6)", "(7)", "(8)", "(9)", "(10)", "(11)", "(12)", "(13)", "(14)", "(15)")
                                
                                varCarinha = varCarinha - 1;
                                
                                varForm.areaMensagem.value = varForm.areaMensagem.value + " " + arrayCarinhas[varCarinha] + " ";

                        }
//-->
        </script>
        


<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head>
<body onload="Javascript:document.formIncluir.txtDe.focus();">
                <table cellpadding="0" cellspacing="0" border="0" width="100%" height="100%" align="center">
                        <tr>
                                <td valign="top">
                                        <table border="0" align="center">
                                                <form name="formIncluir" method="post" action="mural_new.asp">
                                                        <tr>
                                                          <td colspan="2" align="center" class="APAGAO">SMIRNOFF EXPERIENCE OPEN</td>
                                                  </tr>
                                                        <tr>
                                                          <td colspan="2" align="center" class="style3">QUI|05|AGOSTO</td>
                                                        </tr>
                                                        <tr>
                                                                <td> </td>
                                                                <td>
                                                                        <input name="txtPara" type="hidden" class="style5" size="42" maxlength="35" value="sim">                                                                <input type="hidden" name="txtEmail" value="sim">
                                                                        <input name="txtDe" type="hidden" class="style5" size="42" maxlength="35" value="sim">
                                                                        Enviar nome completo!</td>
                                                        </tr>
                                                        <tr>
                                                                <td><font class="style3">Nomes:</font></td>
                                                                <td><textarea name="areaMensagem" cols="42" rows="6" class="style5" id="areaMensagem"></textarea>
                                                                  <br>
                                                          <span class="style9"> Chegue cedo!!! Alista encerra às 1:30h da manhã</span></td>
                                                  </tr>
                                                        <tr>
                                                                <td><span class="style6"></span> </td>
                                                                <td>
                                                                        <input name="btnColar" type="button" class="style5" onclick="Javascript:Incluir(formIncluir)" value="CONFIRMAR NOMES"></td>
                                                        </tr>
                                                        <tr>
                                                          <td> </td>
                                                          <td><span class="style11">Lista VIP vale somente como entrada! Não da direito ao openbar!</span></td>
                                                  </tr>
                                                </form>
                                        </table>
                          </td>
                        </tr>
                </table>
        </body>
</html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

crie outra página apenas com as variaveis que recebem os dados, que seria o

 

taInclusao = Date()
HoraInclusao = Time()
De = Request.Form("txtDe")
Email = Request.Form("txtEmail")
Para = Request.Form("txtPara")

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