View Single Post
  #1 (permalink)  
Old December 26th, 2004, 02:51 PM
shankhan shankhan is offline
Authorized User
 
Join Date: Dec 2004
Location: Multan, Punjab, Pakistan.
Posts: 32
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via MSN to shankhan Send a message via Yahoo to shankhan
Default Need help related CDO.Message

i want to know that i'm using the following code to send e-mail from my local computer as i have installed IIS and using windows XP. i tried to send many mails but 1 or 2 has sent while other r in queue folder and could not be sent. plz see the code below

<%
dim subject
dim fro
dim tot
dim myMail
dim bod

bod = request.form("body")
subject = request.form("sub")
fro = request.form("from")
tot = request.form("to")

Set myMail=CreateObject("CDO.Message")
myMail.Subject= subject
myMail.From= fro
myMail.To= tot
myMail.TextBody = bod
myMail.Send
response.write "Ok Mail has sent"
%>
nothing wrong with the code because 2 mails have been reached to their destination using this code.
thanx

Reply With Quote