|
-
Jun 22nd, 2006, 07:11 PM
#1
Thread Starter
New Member
Form-submitted e-mail is blank
This is my first shot at VBscripting, so I'm having a few minor issues.
I have a form that I want submitted via e-mail. The 'send the e-mail' part of the code on the .asp page works fine, but the 'gather all the form data' part doesn't and I'm not entirely sure where the code is getting 'confused'.
Here's the code (I've left off the mailer parts, since I know those work):
it's kind of lengthy -
Code:
strMsgInfo = strMsgInfo &
MunLJ=request.querystring("MunLJ")
email=request.querystring("email")
charLJ=request.querystring("charLJ")
charname=request.querystring("charname")
response.write MunLJ & "<br />"
response.write email & "<br />"
response.write charLJ & "<br />"
response.write charname & "<br />"
<!--- Which IM client do you use --->
if request.form("IM1")="on" then
response.write "AIM <br />"
end if
AIMid=request.querystring("AIMid")
response.write AIMid & "<br />"
if request.form("IM2")="on" then
response.write "Y!H <br />"
end if
Yahid=request.querystring("Yahid")
response.write Yahid & "<br />"
if request.form("IM3")="on" then
response.write "MSN <br />"
end if
MSNid=request.querystring("MSNid")
response.write MSNid & "<br />"
if request.form("IM4")="on" then
response.write "ICQ <br />"
end if
ICQid=request.querystring("ICQid")
response.write ICQid & "<br />"
<!--- Character info Mark II --->
charcanon=request.querystring("charcanon")
canonlink=request.querystring("canonlink")
response.write charcanon & "<br />"
response.write canonlink & "<br />"
<!--- Character info Mark III - canon description I --->
comm=request.form("candesc1")
comm=replace(comm,vbcrlf,"<br />")
<!--- Character info Mark IV - canon description II --->
comm1=request.form("candesc2")
comm1=replace(comm,vbcrlf,"<br />")
<!--- Character info Mark V - character description I --->
comm2=request.form("chardesc")
comm2=replace(comm,vbcrlf,"<br />")
<!--- Which Dresden books have you read --->
if request.form("Dresden1")="on" then
response.write "Storm Front <br />"
end if
if request.form("Dresden2")="on" then
response.write "Fool Moon <br />"
end if
if request.form("Dresden3")="on" then
response.write "Grave Peril <br />"
end if
if request.form("Dresden4")="on" then
response.write "Summer Knight <br />"
end if
if request.form("Dresden5")="on" then
response.write "Death Masks <br />"
end if
if request.form("Dresden6")="on" then
response.write "Blood Rites <br />"
end if
if request.form("Dresden7")="on" then
response.write "Dead Beat <br />"
end if
if request.form("Dresden8")="on" then
response.write "Proven Guilty <br />"
end if
strMsgFooter = vbCrLf & "End of character app"
Mailer.BodyText = strMsgHeader & strMsgInfo & strMsgFooter
Thanks in advance...
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|