<% dim name dim email dim subject dim message dim sent sent = false if request.Form("submit")<>"" then name = request.Form("name") email = name & "<" & request.Form("email") & ">" subject = request.Form("subject") message = message & "Name: " & name & VBCRLF message = message & "Email: " & request.Form("email") & VBCRLF message = message & "Subject: " & request.Form("subject") & VBCRLF message = message & "Message" & VBCRLF & VBCRLF & request.Form("message") SendMail sent = true end if Private Sub SendMail() dim cdo set cdo = server.CreateObject("cdonts.newmail") cdo.from = email cdo.to = "humayun_shabbir@hotmail.com, humayun@munirbrothers.net" cdo.subject = subject & " - Humayun's Programming Website" cdo.body = message 'cdo.BodyFormat = 0 cdo.send set cdo = nothing End Sub %> Contact


Contact Information

Humayun Shabbir Bhutta
Email Addresses:
humayun_sa@hotmail.com
<% if not sent then %>

If you have any comment, suggestion or question please fill out this form to let me know.

You can also post me your project details.

I can provide high quality services in ASP.NET, ASP, PHP and Graphic Design / Animation.

Contact Form

Name
Email
Subject
Message
 
<%else%> Thank you, your message is sent to me. <%end if%>

 
Sponsored Links
 
   
 
  Currently <%=application("onlinevisitors")%> visitors online
 
My website is hosted by Munir Brothers Inc. host@munirbrothers.com