Ir para conteúdo
Fórum Script Brasil
  • 0

Formulario Por Email


Guest - Daniel -

Pergunta

Guest - Daniel -

Ola gostaria de saber como enviar informações usando um formulario simples com nome , email etc... Por email sem abrir o geenciador de email do usuario .

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

em asp ou php você faz tranquilamente! eu posso te adr um exmplo em php! e provalvelmete alguém sabe ensinar em asp! mas em js eu não sei se é possivel acho q não! ,mas posso me enganar! smile.gif

Link para o comentário
Compartilhar em outros sites

  • 0

Bom... eu criei aqui um asp que envia e-mail apartir da página... tirei os meus dados e coloquei uns ##### pra chamar a sua atenção... ali você modifica conforme os pedidos de pop, e e-mail....

Não se assuste com o tamanho...

<%@language=VBScript %>

<%

if request.form("destino")="" then

%>

<HTML><HEAD>

<style type=text/css>body{scrollbar-face-color: white; scrollbar-shadow-color: grey; scrollbar-highlight-color: white; scrollbar-3dlight-color: grey; scrollbar-darkshadow-color: white;scrollbar-track-color: #f7f7f7; scrollbar-arrow-color: #c0c0c0;}</style>

<TITLE>Formulário</TITLE><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</HEAD>

<BODY bgcolor="#FFFFFF"  background="pictures/icons/logotranp.jpg">

<div align="center">

  <%

    response.write "Este e_mail será enviado para: " & request.querystring("destino1")

  %>

  <br>

  <hr>

</div>

<table width=270 border=0 align="center" bgcolor="#FFFFFF" >

  <tr><td width="264" align=center bordercolor="#FFFFFF" bgcolor="#FFFFFF">

<FORM METHOD='POST' ACTION='contato.asp'>

<input type=hidden name='obr' value='E-mail,Nome'><input type=hidden name='ordem' value='E-mail,Nome,Fone Comercial,Fone Residencial,Fax,Mensagem,Contato Fone,Contato E-mail,Enviarprom'>

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

        <INPUT type=hidden name='assunto' value='Formulário Home Page'>

        <INPUT type=hidden name='destino' value='##################seu-email################'>

        <INPUT type=hidden name='destino1' value='<%=request.querystring("destino1")%>'>

        <INPUT type=hidden name='pagina' value='##################http://sua-página################'>

        </font>

        <TABLE border=0 bgcolor=#FFFFFF width="260" height="299">

          <!--<%

          response.write "Este e_mail será enviado para:" & request.form("destino1")

          %>

          <hr>

          --><TR bgcolor="#FFFFFF">

            <TD width="125" height="25" align="right"><div align="left"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">

  <font color="#000000">Nome:</font> <font size="1">Obrigat&oacute;rio</font>

  <input type=text name='email' value='' size="25"></font></div></TD>

            <TD width="125" height="25" align="right"><div align="left"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">

  <font color="#000000">E-mail:</font> <font size="1">Obrigat&oacute;rio</font>

            <input type=text name='nome' value='' size="25"></font></div></TD>

          </TR>

          <TR bgcolor="#FFFFFF">          </TR>

          <TR bgcolor="#FFFFFF">

            <TD width="125" height="25" align="right"><div align="left"><font color="#000000" face="Verdana, Arial, Helvetica, sans-serif" size="2">Fone

                Comercial:<br>

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

                <input type=text name='fonecomercial' value='' size="11">

              </font></div></TD>

            <TD width="125" height="25"><font color="#000000" face="Verdana, Arial, Helvetica, sans-serif" size="2">Fone Residencial:&nbsp;<br>

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

              <input type=text name='foneresidencial' value='' size="11">

            </font></TD>

          </TR>

          <TR bgcolor="#FFFFFF">

            <TD width="125" height="25" align="right"><div align="left"><font color="#000000" face="Verdana, Arial, Helvetica, sans-serif" size="2">FAX:</font><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><br>

              <input type=text name='fax' value='' size="11">

            </font></div></TD>

            <TD width="125" height="25"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">&nbsp;

              </font></TD>

          </TR>

          <TR bgcolor="#FFFFFF">

            <TD height="25" colspan="2" align="right"><div align="left"><font color="#000000" face="Verdana, Arial, Helvetica, sans-serif" size="2">Mensagem:</font>    <font face="Verdana, Arial, Helvetica, sans-serif" size="2">

              <textarea rows="8" name="mensagem" cols="43"></textarea>

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

            </font></div></TD>

          </TR>

          <TR align=center bgcolor="#FFFFFF">

          </TR>

          <TR align=center bgcolor="#FFFFFF">

          </TR>

          <TR align=center bgcolor="#FFFFFF">

            <TD height="19" colspan=2><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><br>

              <INPUT type=submit value='Enviar'>

              &nbsp;&nbsp;&nbsp;

              <INPUT type=reset value='Limpar'>

              </font> </TD>

          </TR>

        </TABLE>

</FORM>

</table>

</BODY>

<%

else

texto22="fone comercial:" &request.form("fonecomercial") & vbcrlf

texto22=texto22&"fone residencial:" &request.form("foneresidencial") & vbcrlf

texto22=texto22&"fax:"  &request.form("fax") & vbcrlf

texto22=texto22&"mensagem : "  &request.form("mensagem") & vbcrlf

texto22=texto22&"Contato Fone : "  &request.form("Contato Fone") & vbcrlf

texto22=texto22&"Contato E-mail : "  &request.form("Contato E-mail") & vbcrlf

texto22=texto22&"enviarprom : "  &request.form("enviarprom") & vbcrlf

texto22=texto22&"Nome : "  &request.form("nome") & vbcrlf

        Set Mail = CreateObject("Persits.MailSender")

        Mail.Host = "##################seu-pop################"

        Mail.From = "##################seu-email################"

        if request.form("destino1")<>"" then

'            Mail.AddAddress request.form("destino")

            Mail.AddAddress request.form("destino1")

        else

            Mail.AddAddress request.form("destino")

        end if

        Mail.Subject = "Página"

        Mail.Body = texto22

        Mail.Send

        Set Mail = Nothing

        response.write "<center><br><br><br><br><center>E_mail enviado com sucesso para<br><br>"  &";"& request.form("destino1") & "</center>"

end if

%>

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,5k
×
×
  • Criar Novo...