Solved

JMail - Limited characters?

Posted on 2002-04-29
37
483 Views
Last Modified: 2013-12-03
Does Jmail(.SMTPMail) limit characters passed to email..? My form is quite long but only some of the form comes through to email, the end usually gets cut off, depending on the forms answers. thats why I think its a character limit problem,. If so, how is this corrected?
0
Comment
Question by:Moysh
  • 18
  • 13
  • 4
  • +1
37 Comments
 
LVL 2

Expert Comment

by:zombeen
ID: 6979648
how ae you posting the form, it has got to do with the posting of data thru the form and not on mail component's limit.
Never use the GET method in form for lartge amount of data. My personal prefernece in these cases is always to use a text file

Zombeen
0
 
LVL 9

Expert Comment

by:AlfaNoMore
ID: 6979913
Zombeen, how would you write the form data to a text file, if you're not submitting the data via a form? Slightly confused here...
0
 
LVL 2

Expert Comment

by:zombeen
ID: 6980014
AlfaNoMore..
what I meant was to use POST method to submit a form which has a lot of data.

Regarding text files, they can be used if the data is not dynamic but static , in which case it is always advisable to store it in txt file format and call it in the body of your mail message

I hope there is no "confusion" left for now

Zombeen
0
 
LVL 9

Expert Comment

by:AlfaNoMore
ID: 6980038
:-)

Cheers. I know what you're talking about now...
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6980414
I would suggest the following:

Rather than sending the mail, post all of the form information to another page and use response.write to print it out. If the text is truncated, then you know that the problem does not lie with JMail. On the other hand, if all of the text arrives correctly, then you have narrowed the problem down somewhat.

Fritz the Blank
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6980421
I am wondering if there are some characters in the text that might be causing the truncation...

0
 

Author Comment

by:Moysh
ID: 6980842
Thanks all, Im not sure how to do the text part , but I will rmeove all special charaters and se eif that works.. I know at the point of cutoff .there was no special characters...but I do have some in the form output..

Problem is regular CDONTS doesnt work. so I opted to JMail. but I dont know how to send it to a text file for attaching to an email...
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6980935
I meant the following--instead of mailing your text, simply display it on a page. Let's say that the text body was in a field named strMessage. On the next page, then, do womething like:

response.write(request.form("strMessage))

This will help you to isolate the problem

Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6981354
Yes but this is like a feddback form, the information needs to be "emailed" to the client....
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6981406
Moysh, I understand. I am not saying to do this a way to fix your code, but rather, as a test to isolate the problem.

The idea is as follows:

-we know that the text is truncated, but we don't know for certain why

-two likely candidates are a possible limitation of JMail or some problem with the form posting data

-ideally, it would be great to isolate each of these issues for testing purposes

-by posting the data to a test page and displaying it, we will be able to determine if it is a posting issue

Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6981706
its posting to another page, but email doesnt come thru properly, the form is quite long.. and depending on if feidls are filled out, then that how much of the result comes through to the email, every time it seems to cut off at a certain limit..but i did a word count in Word and no set limit its also different every time..

0
 

Author Comment

by:Moysh
ID: 6981728
also files can be seen here..
I've renamed them to txt, so you can view source.

requestform.txt is the actual form
SendRequest.txt is the asp file that outputs it.

http://www.city-card.net/requestform.txt
http://www.city-card.net/SendRequest.txt
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6981850
You could try this:

mail.Body =  "Application Type: " & a &_
                "<p> Business Name: " & b &_
                "<br> Merchant ID: " & c &_
                "<br> Business Address: " & d & "  " & e & "  " & f & "  " & g &_
                "<br> Business Phone: " & h &_
                "<br> Business Fax: " & i &_
                "<br> Email: " & Email &_
                "<br> Contact Name: " & j & "  " & k &_
                "<p> Corporation Name if different: " & l &_
                "<br> Address: " & m & "  " & n & "  " & o & "  " & p &_
                "<br> Phone: " & q & "<br> Fax: " & r &_
                "<br> Contact Name: " & s & "  " & t &_
                "<br> Fax retreival requests mail chargebacks to: " & u &_
                "<br> Statement Billing Address: " & v &_
                "<br> Time Zone: " & w &_
                "<p><br>Ownership Information<p>Name: " & x & "  " & y &_
                "<br> DOB: " & z &_
                "<br> SSN: " & aa &_
                "<br> Title: " & bb &_
                "<br> Phone: " & cc &_
                "<br> Ownership Percent: " & dd &_
                "<br> Home Address: " & ee & "  " & ff & "  " & gg & "  " & hh &_
                "<br> Established: " & ii &_
                "<br> Length of Current Ownership: " & jj &_
                " Years and  " & kk & " Months<br> Prior experience and If yes how many years " & ll & " Years: " & mm &_
                "<br> Services: " & nn
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6981859
Also, you might try this:

for each strField in Request.Form
   Response.write(strField & ":  " and request.form(strField)
next

This will show you all of your field names and values to make sure that everything is passed correctly.

Fritz the Blank
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6981870
Finally, just to make sure that you don't have illegal apostrophes, your variable declarations should be :

a =replace(request.form("ApplicationType"),"'","''")

Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6982605
Copied all your commments. and NO LUCK.. here's the result: (see end is cut off..)


Application Type: New Application
Business Name: test
Merchant ID: test
Business Address: test test NY 11225
Business Phone: test
Business Fax: test
Email: moshe@braintoaster.com
Contact Name: test test

Corporation Name if different: test
Address: test test test test
Phone: test
Fax: test
Contact Name: test test
Fax retreival requests mail chargebacks to: Business
Statement Billing Address: Business
Time Zone: EST


Ownership Information

Name: test test
DOB: test
SSN: test
Title: test
Phone: test
Ownership Percent: test
Home Address: test test test test
Established: test
Length of Current Ownership: test Years and test Months
Prior experience and If yes how many years Yes Years: test
Services: test
Business Structure: Closely Held Corp
Tax ID or SSN: test
Current Bankcard Processor: test
Claims or lawsuits: Yes
Declared bankruptcy: Yes

Card Acceptance Method (must equal 1
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6983356
This is a long shot, but your text dies at the appearance of the first % sign. Just for testing purposes, what happens if you temporarily remove the percent sign or replace it with &#37; ?

Fritz the Blank

0
 

Author Comment

by:Moysh
ID: 6983432
I tried that yesterday, as well as this was one example  other times, the form  comes through with more.. and some less...i've had the form complete except for last field coming through... (that is if I leave all fields empty and just enter my email for submission..)
0
Highfive Gives IT Their Time Back

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6983534
But what if you remove the % sign from the page altogether, fill out all of the fields and then submit?

Fritz the Blank
0
 
LVL 9

Expert Comment

by:AlfaNoMore
ID: 6983597
Have you tried a simple Response.Write Request.Form()

It will print the entire Form Request Collection as  a string onto the page, as if it were a querystring.

Sometiomes helpful for debugging?
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6983609
I suggested that above, and one step further:

for each strField in Request.Form
  Response.write(strField & ":  " and request.form(strField)
next


Fritz the Blank
0
 
LVL 9

Expert Comment

by:AlfaNoMore
ID: 6983626
Sorry, this is a long thread.

RE your comment "Rather than sending the mail, post all of the form information to another page and use response.write to print it out.", maybe my little tip is a bit more explanatory, as it sounds like Myosh never got round to doing as you asked?

Just a thought
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6983866
Good point--most often people respond more favourably to a concrete plan rather than a generalized suggestion.


I have looked at the code, and this problem is a wee bit strange though...

Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6984018
ok,  response.write to print worked fine all data came through to next page...
I also tried the form without any %.. no luck..i dont think its a weird character thats causing it as the cutoff is always different..
maybe  there another way to pass thorught to an email with CDONT either. for some reason the host im using has errors if I use CDONTS.



 
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6984027
Try using ASPeMail from www.persits.com. I have had very good luck with it, and the basic version is free.

Fritz the Blank
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6984030
You may be getting errors with CDONTS if you do not have SMTP services running on the SAME server as the web site.

Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6984107
I found this by ASPEmail FAQ..
could this apply for JMail as well..
if so I dont really understand their answer..
how does that fit in my code..




Q6. When I try to send a message longer than a few hundred characters, the received message seems truncated and sometimes contains stray characters such as '!'. Does AspEmail have a limitation on the length of a message body?

A6. This occurs because your mail server imposes a restriction on the length of individual lines in a message body. According to SMTP specifications, this limit is 76 characters per line. To ensure that your message does not contain lines longer than 76 characters, you can:

1. Insert the end-of-line character pairs chr(13) & chr(10) into your message body as follows: Mail.Body = "line 1" & chr(13) & chr(10) & "line 2" etc.

or

2. Use the Quoted-Printable feature of AspEmail by setting
Mail.ContentTransferEncoding = "Quoted-Printable"
which will format your message automatically to conform to the 76-character-per-line restriction.
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6984649
Or you could use :

"Some Text: " & strText & VBCrLF

Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6986009
I tried adding the VBCrLF but got a Page cannot be displayed error, did I do something wrong? see snippet here..:

mail.Body =  "Application Type: " & a & VBCrLF
               "<p> Business Name: " & b & VBCrLF
               "<br> Merchant ID: " & c & VBCrLF
               "<br> Business Phone: " & h & VBCrLF
               "<br> Business Fax: " & i


I also tried:

mail.Body =  "Application Type: " & a & VBCrLF &
               "<p> Business Name: " & b & VBCrLF &
               "<br> Merchant ID: " & c & VBCrLF &
               "<br> Business Phone: " & h & VBCrLF &
               "<br> Business Fax: " & i
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6986552
Okay, instead of VBCrLf, try carriage return and line feed:

 & chr(13) & chr(10)



Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6986570
Same error, page cannot be displayed..
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6986590
Do you get a line number indicating where the error is?

Please post the code for the second page in its entirety.

Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6986757
no line just an default IE error, just like a page not found..

heres the code..





<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>
<head>
<title>A1 Merchant Accounts. Credit card merchant accounts to accept credit cards for processing, including all cards services - City Card International</title>
<meta name="DESCRIPTION" content="98% application approval rate for establishing credit card merchant accounts. Process &amp; accept credit cards visa mastercard amex. Merchant accounts software to securely accept credit cards online.">
<meta name="KEYWORDS" content="merchant accounts, accept credit cards, credit card processing, bank card">
</head>

<map name="navside">
<area alt="Credit / Debit Card Processing" coords="9,9,184,31" href="processing.html">
<area alt="Accept Check by Fax, Email or by Phone" coords="7,47,148,73" href="acceptchecks.html">
<area alt="Same Day Funding of Credit Card Sales" coords="7,89,146,118" href="sameday.html">
<area alt="EFT Electronic Funds Transfer" coords="3,134,184,152" href="eft.html">
<area alt="Equipment Sales or Lease and Supplies" coords="4,164,172,198" href="equipment.html">
<area alt="ATM Machines" coords="7,212,101,233" href="atm.html">
<area alt="EBT Provider" coords="4,242,112,265" href="ebt.html">
<area alt="Price List" coords="5,277,85,297" href="pricelist.html">
</map>


<body bgcolor="#EBEBEB" marginheight="0" marginwidth="0" topmargin="0" rightmargin="0" leftmargin="0" bottommargin="0">





<%
' Put your SMTP Mail server here. If you do not know, ask your network administrator
smtpServer = "mailhost.netmart.com"
smtpPort = 25

' ---
dim ApplicationType, Business_Name, Merchant_ID, Business_Address, Business_City, Business_State, Business_Zip, Business_Phone, Business_Fax, Email, First_Name, Last_Name, Corp_Name, Corp_Address, Corp_City, Corp_State, Corp_Zip, Corp_Phone, Corp_Fax, First_Name_2, Last_Name_2, Chargebacks, Statement_Billing_Address, Timezone, Ownership_First_Name, Ownership_Last_Name, Ownership_DateofBirth, Ownership_SSN, Ownership_Title, Ownership_Phone, Ownership_Percentage, Ownership_Home_Address, Ownership_City, Ownership_State, Ownership_Zip, Year_Established, Ownership_Length_Years, Ownership_Length_Months, Prior_Exp, Prior_Exp_Years, Services, Business_Structure, Tax_ID_or_SSN, Bankcard_Processor, Lawsuits, Bankruptcy, Card_Acceptance_Card_Present_Swipe, Card_Acceptance_Card_Present_NoSwipe, Card_Acceptance_Mail_Order, Card_Acceptance_Tel_Order, Card_Acceptance_Internet, Avr_CreditCard_Ticket, CreditCard_Volume, smtpServer, smtpPort
' Now gets the data from Form




a = replace(request.form("ApplicationType"),"'","''")
b = replace(request.form("Business_Name"),"'","''")
c = replace(request.form("Merchant_ID"),"'","''")
d = replace(request.form("Business_Address"),"'","''")
e = replace(request.form("Business_City"),"'","''")
f = replace(request.form("Business_State"),"'","''")
g = replace(request.form("Business_Zip"),"'","''")
h = replace(request.form("Business_Phone"),"'","''")
i = replace(request.form("Business_Fax"),"'","''")
Email = replace(request.form("Email"),"'","''")
j = replace(request.form("First_Name"),"'","''")
k = replace(request.form("Last_Name"),"'","''")
l = replace(request.form("Corp_Name"),"'","''")
m = replace(request.form("Corp_Address"),"'","''")
n = replace(request.form("Corp_City"),"'","''")
o = replace(request.form("Corp_State"),"'","''")
p = replace(request.form("Corp_Zip"),"'","''")
q = replace(request.form("Corp_Phone"),"'","''")
r = replace(request.form("Corp_Fax"),"'","''")
s = replace(request.form("First_Name_2"),"'","''")
t = replace(request.form("Last_Name_2"),"'","''")
u = replace(request.form("Chargebacks"),"'","''")
v = replace(request.form("Statement_Billing_Address"),"'","''")
w = replace(request.form("Timezone"),"'","''")
x = replace(request.form("Ownership_First_Name"),"'","''")
y = replace(request.form("Ownership_Last_Name"),"'","''")
z = replace(request.form("Ownership_DateofBirth"),"'","''")
aa = replace(request.form("Ownership_SSN"),"'","''")
bb = replace(request.form("Ownership_Title"),"'","''")
cc = replace(request.form("Ownership_Phone"),"'","''")
dd = replace(request.form("Ownership_Percentage"),"'","''")
ee = replace(request.form("Ownership_Home_Address"),"'","''")
ff = replace(request.form("Ownership_City"),"'","''")
gg = replace(request.form("Ownership_State"),"'","''")
hh = replace(request.form("Ownership_Zip"),"'","''")
ii = replace(request.form("Year_Established"),"'","''")
jj = replace(request.form("Ownership_Length_Years"),"'","''")
kk = replace(request.form("Ownership_Length_Months"),"'","''")
ll = replace(request.form("Prior_Exp"),"'","''")
mm = replace(request.form("Prior_Exp_Years"),"'","''")
nn = replace(request.form("Services"),"'","''")
oo = replace(request.form("Business_Structure"),"'","''")
pp = replace(request.form("Tax_ID_or_SSN"),"'","''")
qq = replace(request.form("Bankcard_Processor"),"'","''")
rr = replace(request.form("Lawsuits"),"'","''")
ss = replace(request.form("Bankruptcy"),"'","''")
tt = replace(request.form("Card_Acceptance_Card_Present_Swipe"),"'","''")
uu = replace(request.form("Card_Acceptance_Card_Present_NoSwipe"),"'","''")
vv = replace(request.form("Card_Acceptance_Mail_Order"),"'","''")
ww = replace(request.form("Card_Acceptance_Tel_Order"),"'","''")
xx = replace(request.form("Card_Acceptance_Internet"),"'","''")
yy = replace(request.form("Avr_CreditCard_Ticket"),"'","''")
zz = replace(request.form("CreditCard_Volume"),"'","''")


Set mail = CreateObject ("JMail.SMTPMail")
mail.ServerAddress = smtpServer & ":" & smtpPort
mail.Sender = Email
mail.Subject = "Application Request from City Card Web site"
mail.AddRecipient "moshe@braintoaster.com"
mail.ContentType = "text/html" ' or you can put 'text/plain' for plain text email
mail.ISOEncodeHeaders = false
mail.ContentTransferEncoding = "8bit"
mail.Body =  "Application Type: " & a & chr(13) & chr(10)
               "<p> Business Name: " & b & chr(13) & chr(10)
               "<br> Merchant ID: " & c & chr(13) & chr(10)
               "<br> Business Address: " & d & "  " & e & "  " & f & "  " & g & chr(13) & chr(10)
               "<br> Business Phone: " & h & chr(13) & chr(10)
               "<br> Business Fax: " & i & chr(13) & chr(10)
               "<br> Email: " & Email & chr(13) & chr(10)
               "<br> Contact Name: " & j & "  " & k & chr(13) & chr(10)
               "<p> Corporation Name: " & l & chr(13) & chr(10)
               "<br> Address: " & m & "  " & n & "  " & o & "  " & p & chr(13) & chr(10)
               "<br> Phone: " & q & "<br> Fax: " & r & chr(13) & chr(10)
               "<br> Contact Name: " & s & "  " & t & chr(13) & chr(10)
               "<br> Fchargebacks to: " & u & chr(13) & chr(10)
               "<br> Billing Address: " & v & chr(13) & chr(10)
               "<br> Time Zone: " & w & chr(13) & chr(10)
               "<p><br>Ownership Info<p>Name: " & x & "  " & y & chr(13) & chr(10)
               "<br> DOB: " & z & chr(13) & chr(10)
               "<br> SSN: " & aa & chr(13) & chr(10)
               "<br> Title: " & bb & chr(13) & chr(10)
               "<br> Phone: " & cc & chr(13) & chr(10)
               "<br> Ownership Percent: " & dd & chr(13) & chr(10)
               "<br> Home Address: " & ee & "  " & ff & "  " & gg & "  " & hh & chr(13) & chr(10)
               "<br> Established: " & ii & chr(13) & chr(10)
               "<br> Current Ownership: " & jj & chr(13) & chr(10)
               " Years and  " & kk & " Months<br> Prior experience and years " & ll & " Years: " & mm & chr(13) & chr(10)
               "<br> Services: " & nn & chr(13) & chr(10)
                     "<br> Business Structure: " & oo & chr(13) & chr(10)
                     "<br> Tax ID or SSN: " & pp & chr(13) & chr(10)
                     "<br> Current Bankcard Processor: " & qq & chr(13) & chr(10)
                     "<br> Claims or lawsuits: " & rr & chr(13) & chr(10)
                     "<br> Declared bankruptcy: " & ss & chr(13) & chr(10)
                     "<p> Card Acceptance Method<br>Card Present swipe: " & tt & chr(13) & chr(10)
                        "<br> Card Present no swipe: " & uu & chr(13) & chr(10)
                        "<br> Mail Order: " & vv & chr(13) & chr(10)
                        "<br>Telephone Order: " & ww & chr(13) & chr(10)
                        "<br> Internet: " & xx & chr(13) & chr(10)
                        "<br> Average Credit Card Ticket ($ amount): " & yy & chr(13) & chr(10)
                        "<br> Monthly Credit Card Volume ($ amount): " & zz


' 1 - highest priority (Urgent) ' 3 - normal ' 5 - lowest
mail.Priority = 3


' Add sender's IP address (not required, but useful for web-based email)
mail.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR")

' Actually send mail
mail.Execute
set mail = nothing

%>




<table width="100%" cellspacing="0" cellpadding="0" border="0">
<tr>
    <td valign="top"><img src="images/navside.gif" width="183" height="310" border="0" usemap="#navside"></td>
    <td valign="top"><!-- white box content starts -->
<div align="center"><img src="images/spacer.gif" width="1" height="5" border="0"><br>
      <table bgcolor="#FFFFFF" width="530" cellspacing="0" cellpadding="5" border="1">
<tr>
    <td valign="top"><font face="Arial,Helvetica,sans-serif" size="2"><img src="images/spacer.gif" width="530" height="1" border="0"><br><img src="images/hd_requestform.gif" width="316" height="29" alt="Request Form" border="0"><br><blockquote><b><br><div align="center">Thank you for your information.<p>
A representative will contact you shortly regarding your request.<p><br><br><br><br></div></b>




</blockquote><br></td>
</tr>
</table></div>

      
      <!-- white box content ends --></td>
</tr>
</table>


</body>
</html>
0
 
LVL 46

Accepted Solution

by:
fritz_the_blank earned 100 total points
ID: 6986777
1) you can't continue lines after a line feed without a line continuation character, so do this:

dim ApplicationType, Business_Name, Merchant_ID, Business_Address, Business_City, Business_State, Business_Zip
dim Business_Phone, Business_Fax, Email, First_Name, Last_Name, Corp_Name, Corp_Address, Corp_City, Corp_State
dim Corp_Zip, Corp_Phone, Corp_Fax, First_Name_2, Last_Name_2, Chargebacks, Statement_Billing_Address, Timezone
dim Ownership_First_Name, Ownership_Last_Name, Ownership_DateofBirth, Ownership_SSN, Ownership_Title, Ownership_Phone
dim Ownership_Percentage, Ownership_Home_Address, Ownership_City, Ownership_State, Ownership_Zip, Year_Established
dim Ownership_Length_Years, Ownership_Length_Months, Prior_Exp, Prior_Exp_Years, Services, Business_Structure
dim Tax_ID_or_SSN, Bankcard_Processor, Lawsuits, Bankruptcy, Card_Acceptance_Card_Present_Swipe, Card_Acceptance_Card_Present_NoSwipe
dim Card_Acceptance_Mail_Order, Card_Acceptance_Tel_Order, Card_Acceptance_Internet, Avr_CreditCard_Ticket
dim CreditCard_Volume, smtpServer, smtpPort


2)Ditto for your mail body--should be like:

mail.Body =  "Application Type: " & a & chr(13) & chr(10)  &_
              "<p> Business Name: " & b & chr(13) & chr(10) &_
              "<br> Merchant ID: " & c & chr(13) & chr(10) &_


Fritz the Blank
0
 

Author Comment

by:Moysh
ID: 6987001
GOT IT WORKING..

I started from scratch, for some reason when i would seperate the dim . it would give me an error and also the CHr would give me an error. so i tired the VBCrlf but without line breaks in the editior, justy continous, and WIOLA! its seems to work.. see code below..



<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>
<head>
<title>A1 Merchant Accounts. Credit card merchant accounts to accept credit cards for processing, including all cards services - City Card International</title>
<meta name="DESCRIPTION" content="98% application approval rate for establishing credit card merchant accounts. Process &amp; accept credit cards visa mastercard amex. Merchant accounts software to securely accept credit cards online.">
<meta name="KEYWORDS" content="merchant accounts, accept credit cards, credit card processing, bank card">
</head>

<map name="navside">
<area alt="Credit / Debit Card Processing" coords="9,9,184,31" href="processing.html">
<area alt="Accept Check by Fax, Email or by Phone" coords="7,47,148,73" href="acceptchecks.html">
<area alt="Same Day Funding of Credit Card Sales" coords="7,89,146,118" href="sameday.html">
<area alt="EFT Electronic Funds Transfer" coords="3,134,184,152" href="eft.html">
<area alt="Equipment Sales or Lease and Supplies" coords="4,164,172,198" href="equipment.html">
<area alt="ATM Machines" coords="7,212,101,233" href="atm.html">
<area alt="EBT Provider" coords="4,242,112,265" href="ebt.html">
<area alt="Price List" coords="5,277,85,297" href="pricelist.html">
</map>


<body bgcolor="#EBEBEB" marginheight="0" marginwidth="0" topmargin="0" rightmargin="0" leftmargin="0" bottommargin="0">





<%
' Put your SMTP Mail server here. If you do not know, ask your network administrator
smtpServer = "mailhost.netmart.com"
smtpPort = 25

' ---
dim a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z, aa, bb, cc, dd, ee, ff, gg, hh, ii, jj, kk, ll, mm, nn, oo, pp, qq, rr, ss, tt, uu, vv, ww, xx, yy, zz,  ApplicationType, Business_Name, Merchant_ID, Business_Address, Business_City, Business_State, Business_Zip, Business_Phone, Business_Fax, Email, First_Name, Last_Name, Corp_Name, Corp_Address, Corp_City, Corp_State, Corp_Zip, Corp_Phone, Corp_Fax, First_Name_2, Last_Name_2, Chargebacks, Statement_Billing_Address, Timezone, Ownership_First_Name, Ownership_Last_Name, Ownership_DateofBirth, Ownership_SSN, Ownership_Title, Ownership_Phone, Ownership_Percentage, Ownership_Home_Address, Ownership_City, Ownership_State, Ownership_Zip, Year_Established, Ownership_Length_Years, Ownership_Length_Months, Prior_Exp, Prior_Exp_Years, Services, Business_Structure, Tax_ID_or_SSN, Bankcard_Processor, Lawsuits, Bankruptcy, Card_Acceptance_Card_Present_Swipe, Card_Acceptance_Card_Present_NoSwipe, Card_Acceptance_Mail_Order, Card_Acceptance_Tel_Order, Card_Acceptance_Internet, Avr_CreditCard_Ticket, CreditCard_Volume, smtpServer, smtpPort
' Now gets the data from Form



a = request.form("ApplicationType")
b = request.form("Business_Name")
c = request.form("Merchant_ID")
d = request.form("Business_Address")
e = request.form("Business_City")
f = request.form("Business_State")
g = request.form("Business_Zip")
h = request.form("Business_Phone")
i = request.form("Business_Fax")
Email = request.form("Email")
j = request.form("First_Name")
k = request.form("Last_Name")
l = request.form("Corp_Name")
m = request.form("Corp_Address")
n = request.form("Corp_City")
o = request.form("Corp_State")
p = request.form("Corp_Zip")
q = request.form("Corp_Phone")
r = request.form("Corp_Fax")
s = request.form("First_Name_2")
t = request.form("Last_Name_2")
u = request.form("Chargebacks")
v = request.form("Statement_Billing_Address")
w = request.form("Timezone")
x = request.form("Ownership_First_Name")
y = request.form("Ownership_Last_Name")
z = request.form("Ownership_DateofBirth")
aa = request.form("Ownership_SSN")
bb = request.form("Ownership_Title")
cc = request.form("Ownership_Phone")
dd = request.form("Ownership_Percentage")
ee = request.form("Ownership_Home_Address")
ff = request.form("Ownership_City")
gg = request.form("Ownership_State")
hh = request.form("Ownership_Zip")
ii = request.form("Year_Established")
jj = request.form("Ownership_Length_Years")
kk = request.form("Ownership_Length_Months")
ll = request.form("Prior_Exp")
mm = request.form("Prior_Exp_Years")
nn = request.form("Services")
oo = request.form("Business_Structure")
pp = request.form("Tax_ID_or_SSN")
qq = request.form("Bankcard_Processor")
rr = request.form("Lawsuits")
ss = request.form("Bankruptcy")
tt = request.form("Card_Acceptance_Card_Present_Swipe")
uu = request.form("Card_Acceptance_Card_Present_NoSwipe")
vv = request.form("Card_Acceptance_Mail_Order")
ww = request.form("Card_Acceptance_Tel_Order")
xx = request.form("Card_Acceptance_Internet")
yy = request.form("Avr_CreditCard_Ticket")
zz = request.form("CreditCard_Volume")



Set mail = CreateObject ("JMail.SMTPMail")
mail.ServerAddress = smtpServer & ":" & smtpPort
mail.Sender = email
mail.Subject = "ApplicationForm Request from City Card Web site"
mail.AddRecipient "moshe@braintoaster.com"
mail.ContentType = "text/html" ' or you can put 'text/plain' for plain text email
mail.ISOEncodeHeaders = false
mail.ContentTransferEncoding = "8bit"
mail.Body =  "Application Type: " & a & VBCrLF & "<p> Business Name: " & b & VBCrLF & "<br> Merchant ID: " & c & VBCrLF & "<br> Business Address: " & d & " " & e & " " & f & " " & g & VBCrLF & "<br> Business Phone: " & h & VBCrLF & "<br> Business Fax: " & i & VBCrLF & "<br> Email: " & Email & VBCrLF & "<br> Contact Name: " & j & " " & k & VBCrLF & "<p> Corporation Name: " & l & VBCrLF & "<br> Address: " & m & " " & n & " " & o & " " & p & VBCrLF & "<br> Phone: " & q & "<br> Fax: " & r & VBCrLF & "<br> Contact Name: " & s & " " & t & VBCrLF & "<br> Fchargebacks to: " & u & VBCrLF & "<br> Billing Address: " & v & VBCrLF & "<br> Time Zone: " & w & VBCrLF & "<p><br>Ownership Info<p>Name: " & x & " " & y & VBCrLF & "<br> DOB: " & z & VBCrLF & "<br> SSN: " & aa & VBCrLF & "<br> Title: " & bb & VBCrLF & "<br> Phone: " & cc & VBCrLF & "<br> Ownership Percent: " & dd & VBCrLF & "<br> Home Address: " & ee & " " & ff & " " & gg & " " & hh & VBCrLF & "<br> Established: " & ii & VBCrLF & "<br> Current Ownership: " & jj & VBCrLF & " Years and " & kk & " Months<br> Prior experience and years " & ll & " Years: " & mm & VBCrLF & "<br> Services: " & nn & VBCrLF & "<br> Business Structure: " & oo & VBCrLF & "<br> Tax ID or SSN: " & pp & VBCrLF & "<br> Current Bankcard Processor: " & qq & VBCrLF & "<br> Claims or lawsuits: " & rr & VBCrLF & "<br> Declared bankruptcy: " & ss & VBCrLF & "<p> Card Acceptance Method<br>Card Present swipe: " & tt & VBCrLF & "<br> Card Present no swipe: " & uu & VBCrLF & "<br> Mail Order: " & vv & VBCrLF & "<br>Telephone Order: " & ww & VBCrLF & "<br> Internet: " & xx & VBCrLF & "<br> Average Credit Card Ticket ($ amount): " & yy & VBCrLF & "<br> Monthly Credit Card Volume ($ amount): " & zz



' 1 - highest priority (Urgent) ' 3 - normal ' 5 - lowest
mail.Priority = 3


' Add sender's IP address (not required, but useful for web-based email)
mail.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR")

' Actually send mail
mail.Execute
set mail = nothing

%>




<table width="100%" cellspacing="0" cellpadding="0" border="0">
<tr>
    <td valign="top"><img src="images/navside.gif" width="183" height="310" border="0" usemap="#navside"></td>
    <td valign="top"><!-- white box content starts -->
<div align="center"><img src="images/spacer.gif" width="1" height="5" border="0"><br>
      <table bgcolor="#FFFFFF" width="530" cellspacing="0" cellpadding="5" border="1">
<tr>
    <td valign="top"><font face="Arial,Helvetica,sans-serif" size="2"><img src="images/spacer.gif" width="530" height="1" border="0"><br><img src="images/hd_requestform.gif" width="316" height="29" alt="Request Form" border="0"><br><blockquote><b><br><div align="center">Thank you for your information.<p>
A representative will contact you shortly regarding your request.<p><br><br><br><br></div></b>




</blockquote><br></td>
</tr>
</table></div>

      
      <!-- white box content ends --></td>
</tr>
</table>


</body>
</html>
0
 

Author Comment

by:Moysh
ID: 6987003
Thanks for all your help you deserve the points!
0
 
LVL 46

Expert Comment

by:fritz_the_blank
ID: 6987036
Glad to have helped.

Fritz the Blank
0

Featured Post

Why You Should Analyze Threat Actor TTPs

After years of analyzing threat actor behavior, it’s become clear that at any given time there are specific tactics, techniques, and procedures (TTPs) that are particularly prevalent. By analyzing and understanding these TTPs, you can dramatically enhance your security program.

Join & Write a Comment

I recently decide that I needed a way to make my pages scream on the net.   While searching around how I can accomplish this I stumbled across a great article that stated "minimize the server requests." I got to thinking, hey, I use more than one…
Hello, all! I just recently started using Microsoft's IIS 7.5 within Windows 7, as I just downloaded and installed the 90 day trial of Windows 7. (Got to love Microsoft for allowing 90 days) The main reason for downloading and testing Windows 7 is t…
It is a freely distributed piece of software for such tasks as photo retouching, image composition and image authoring. It works on many operating systems, in many languages.
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…

706 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

11 Experts available now in Live!

Get 1:1 Help Now