Send web page usng ASP

RICHARD BROMBERG

unread,

Mar 19, 2005, 4:34:32 PM3/19/05

to

I am already using ASP/Cdonts to send the contents of a Form by e-mail and
would like to include a link on my page to send the page itself by e-mail
to a named recipient.

Can anyone start me in the right direction. ?

Steven Burn

unread,

Mar 19, 2005, 4:39:09 PM3/19/05

to

<%
Dim sTemp, sSubject, sRecipient
sTemp = Request.ServerVariables("url") & "?" & Request.Querystring
sSubject = "Whatever"
sRecipient = "som...@example.com"
%>

<a href="mailto:<%=sRecipient%>?subject=<%=sSubject%>&body=<%=sTemp%>"><%=sTemp%></a>

--
Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!

"RICHARD BROMBERG" <dick...@worldnet.att.net> wrote in message news:IV0%d.419442$w62....@bgtnsc05-news.ops.worldnet.att.net...

RICHARD BROMBERG

unread,

Mar 19, 2005, 7:09:55 PM3/19/05

to

Thanks Steve

I didn't express myself clearly (as usual).

I want is the person looking at the web page to enter (into a form) his/her
name and the e-mail address of another person, the recipient.

The ASP program will read these and set up the "From" and "To" fields for
the Cdonts object . Then I will use Cdonts to send the e-mail.

I want to send the content of the actual page or at least the URL of the
page to the recipient.

I will try to convert my ASP code that reads a form and e-mails the content
of the form to a program that reads the senders name and the recipients
e-mail address and sends the page or the URL of the page.

Again Thanks.
R Bromberg

"Steven Burn" <some...@in-time.invalid> wrote in message
news:ekFX%23wMLF...@TK2MSFTNGP15.phx.gbl...

Steven Burn

unread,

Mar 20, 2005, 10:26:07 AM3/20/05

to

Oh right....... in that case;

<%
'// thispage.asp

Dim bConf
bConf = Request.Querystring("s")
Select Case bConf
Case "1"
sSendTo = Request.Form("txtTo") '// To name
sSendToMail = Request.Form("txtToMail") '// To e-mail
sSendFrom = Request.form("txtFrom") '// From name
sSendFromMail = Request.Form("txtFromMail") '// From mail
sSubject = "I sent this"
sPageURL = "<a href=" & Request.Form("txtURL") & ">" & Request.Form("txtURL") & "</a>"

Case Else
'// Body is stored in a hidden field
Body = Request.ServerVariables("sBody") & "?" & Request.Querystring
%>
<form action="thispage.asp?bconf=1" method="post">
<input type="hidden" name="txtURL" value="<%=Body%>">
Recipient Name: <input type="text" name="txtTo" value="">
Recipient Addr: <input type="text" name="txtToMail" value="">
Your name: <input type="text" name="txtFrom" value="">
Your Addr: <input type="text" name="txtFromMail" value="">
<input type="Submit" value="submit" name="btnSubmit">
</form>
<%
End Select
%>

--
Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!

"RICHARD BROMBERG" <dick...@worldnet.att.net> wrote in message news:nb3%d.153618$Th1....@bgtnsc04-news.ops.worldnet.att.net...

RICHARD BROMBERG

unread,

Mar 21, 2005, 11:35:12 AM3/21/05

to

Steve

Many thanks .

Dick Bromberg

"Steven Burn" <some...@in-time.invalid> wrote in message

news:O0mHMFWL...@TK2MSFTNGP12.phx.gbl...

Steven Burn

unread,

Mar 21, 2005, 11:58:22 AM3/21/05

to

Your welcome ;o)

--
Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!

"RICHARD BROMBERG" <dick...@worldnet.att.net> wrote in message news:4JC%d.159361$Th1....@bgtnsc04-news.ops.worldnet.att.net...