Esta tá F. de conseguir

[jcdesigner 0]

Amigos e companheiros

 

Me ajudem, preciso disso com maxima urgencia>

 

Como fazer (se possível com um exemplo, mesmo que bem simples) para que se possa enviar uma página ( Refiro-me a uma página de consulta em um banco de dados, por exemplo: em uma loja virtual busca-se por carros até 10 mil, então gera-se uma pagina de resultado de acordo com o que existir na base de dados).

 

Então o internauta teria a opção de enviar a página exibida (resultado da busca) por email a alguém que ele quisesse. E esta página fosse enviada exatamente como esta sendo exibida na tela do navegador.

 

Para se ter uma ideia melhor: Experimente ir no google e realizar uma busca qualquer, depois clique em Arquivo > Enviar > Página por e-mail em seu navegador (Internet Explorer, Netscape etc...) envie para você mesmo.

 

A página será exibida na sua Caixa Postal exatamente como você a viu no google, mesmo se você limpar o seu cache ou desligar e religar seu micro.

 

 

E isso gente, tô desesperado, já me falaram para usar um tal de xmlhttp , se não me engano, mas sem exemplos e não consuigui nem na web nenhuma documentação ou material que mostrasse como usar.

 

Alguém pode me dar uma luz

 

Obrigado a todos

[mkboy 1]

Cara, a página que você listou, no caso o automóvel tem um ID, correto?

 

Então, crei um link: Enviar página

 

Tipo: enviar_pagina.asp?id=<%=rs("b_id")%>

 

Aqui você ta enviando o id do teu produto pela query string! Sacou?

 

Na pagina enviar_pagina.asp você grava este ID numa variável e coloca num campo hidden, e ao enviar o formulário você manda este id.

 

No email que o usuário receber você coloca um link e neste link você coloca o id que você mandou pelo formulario.

 

E na pagina que você vai abrir a respectiva indicação, você faz um select * from tabela where produto = Request.QueryString ("id_que_veio_pela_query")

 

Pronto, ele vai exibir exatamente o que você pediu!

 

Veja este que fiz semana passada:

 

http://www.guiaibiuna.com.br/baladas.asp, selecione uma foto e envie ela para seu email e teste, veja se é isto, se for é o que postei acima.

 

É simples!

 

Qualquer duvida grita ae!

[jcdesigner 0]

Cara, a página que você listou, no caso o automóvel tem um ID, correto?Então, crei um link: Enviar páginaTipo: enviar_pagina.asp?id=<%=rs("b_id")%>Aqui você ta enviando o id do teu produto pela query string! Sacou?Na pagina enviar_pagina.asp você grava este ID numa variável e coloca num campo hidden, e ao enviar o formulário você manda este id.No email que o usuário receber você coloca um link e neste link você coloca o id que você mandou pelo formulario.E na pagina que você vai abrir a respectiva indicação, você faz um select * from tabela where produto = Request.QueryString ("id_que_veio_pela_query")Pronto, ele vai exibir exatamente o que você pediu!Veja este que fiz semana passada:http://www.guiaibiuna.com.br/baladas.asp, selecione uma foto e envie ela para seu email e teste, veja se é isto, se for é o que postei acima.É simples!Qualquer duvida grita ae!

AMIGÃO AGRADEÇO IMENSAMENTE SUA DICA, E CONTINUO A PEDIR AOS AMIGOS OUTRAS SUGESTÕES COMO A QUE você ME DEU.O QUE NECESSITO MESMO SERIA ALGO QUE FIZESSE COM QUE AO CLICAR ATIVASSE O PROGRAMA DE E-MAIL DO USUARIO AUTOMATICAMENTE JÁ COM O BODY PREENCHIDO PELA PÁGINA, DA MESMA FORMA QUE ACONTECE AO CLICAR EM E-MAIL OU ARQUIVO > ENVIAR PAGINA POR E-MAIL NO NAVEGADOR.SE NÃO ME ENGANO ACHO QUE É POSSÍVEL EM ASP MESMO OU JAVASCRIPT, MAS ATÉ AGORA NÃO ACHEI A FUNÇÃO QUE REALIZA TAL PROEZA.GRATO A TODOS MAIS UMA VEZ

[FabricioGomes 0]

voce teria que criar um objeto de imap e atualizar o body, assunto, de, para... porem so sei fazer isso em linguagem aplicativo (VFP), nao sei se com javascript voce conseguiria fazer...quanto a mandar um email da propria pagina, se voce tem o codigo que cria a pagina, crie da mesma forma mas ao inves de fazerResponse.Write "codigos e codigos"coloquecorpoemail = corpoemail & "codigos e codigos"e envie essa variavel no email como corpo (.Body)Espero ter ajudado.

[Mário Monteiro 179]

voce teria que criar um objeto de imap e atualizar o body, assunto, de, para... porem so sei fazer isso em linguagem aplicativo (VFP), nao sei se com javascript voce conseguiria fazer...quanto a mandar um email da propria pagina, se voce tem o codigo que cria a pagina, crie da mesma forma mas ao inves de fazerResponse.Write "codigos e codigos"coloquecorpoemail = corpoemail & "codigos e codigos"e envie essa variavel no email como corpo (.Body)Espero ter ajudado.

Creio que de pra fazer assim, montando o Body do email com a pagina que seria carregada, ai quando for mandado o email´a pagina já iria montada em html e não necessitaria de uma nova consulta

[jcdesigner 0]

se você usar o XMLHttp sa pra fazer oq você quer sim.

 

e exemplos tem aos montes na net...

 

como esse aqui: http://www.freecode.com.br/drArtigos/art_d...HCYX18145DPXMLS

 

eh soh você jogar o conteudo do HTML processado dentro do seu email e next!!

 

[]'s

Amigos consegui montar esta aplicação, tá quase funcionando, parece que falta pouco agora, mas na hora que clico em enviar, fica um tempão sem a página ser enviada ou sem a msg de erro correspondente ela fica como se estivesse carregando e nunca terminasse.

 

 

colcoquei o código abaixo para facilitar, encontrar o erro.

 

PAGINA COM O SCRIPT DE ENVIO

 

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

<%

endereco = "http://www.MeuSite.com.br/popups/promocoes.asp" 'ESTA É A PAGINA QUE DEVE SER ENVIADA

Set PegaHTML = Server.CreateObject("Microsoft.XMLHTTP")

PegaHTML.open "GET", endereco, false

PegaHTML.send()

Corpo = PegaHTML.ResponseText

 

' change to address of your own SMTP server

strHost = "smtp.MEU SERVIDOR.com.br"

If Request("Send") <> "" Then

Set Mail = Server.CreateObject("Persits.MailSender")

' enter valid SMTP host

Mail.Host = strHost

 

Mail.From = Request("From")

Mail.FromName = Request("FromName")

Mail.AddAddress Request("To")

 

' message subject

Mail.Subject = Request("Subject")

Mail.Body ="corpo"

strErr = ""

bSuccess = False

On Error Resume Next

Mail.Send

If Err <> 0 Then

strErr = Err.Description

else

bSuccess = True

End If

End If

%>

 

PÁGINA COM O FORM QUE CHAMA O SCRIPT DE ENVIO: SIMPLE.ASP

 

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

<HTML>

<BODY BGCOLOR="#FFFFFF">

<FORM METHOD="get" ACTION="teste.asp">

<TABLE CELLSPACING=0 CELLPADDING=2 BGCOLOR="#E0E0E0">

<TR>

<TD><B><% = strHost %></B></TD>

</TR>

<TR>

<TD>De:</TD>

<TD><INPUT TYPE="TEXT" NAME="From"></TD>

</TR>

<TR>

<TD>Nome::</TD>

<TD><INPUT TYPE="TEXT" NAME="FromName"></TD>

</TR>

<TR>

<TD>Para:</TD>

<TD><INPUT TYPE="TEXT" NAME="To"></TD>

</TR>

<TR>

<TD>Assunto:</TD>

<TD><INPUT TYPE="TEXT" NAME="Subject"></TD>

</TR>

<TR>

<TD COLSPAN=2><div align="center">

<INPUT TYPE="SUBMIT" NAME="Send" VALUE="Enviar">

</div></TD>

</TR>

</TABLE>

</FORM>

</BODY>

</HTML>

 

E AÊEE GENTE ALGUEM TEM MAIS ALGUMA LUZ ?