<%@ language="VBScript" %><html><head><meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0"></head><body><%
FromName=request.Form("FromName")
EmailFrom=request.Form("EmailFrom")
EmailTo="sales@trisys.com.my"'request.Form("EmailTo")
CC=request.Form("CC")
Subject=request.Form("Subject")
Important=request.Form("Important")
Content=request.Form("Content")
myType=request.QueryString("myType")
'CC="trisys@trisys.com.my"
Important="1"
' Declare Variables
Dim objNewMail, strFilePath
' Create Instance of NewMail Object
Set objNewMail = Server.CreateObject("CDONTS.NewMail")
' Set Email Priority (1 = Normal)
objNewMail.Importance = 1
' Send plain text email
objNewMail.BodyFormat = 1
' Senders email address
objNewMail.From = EmailFrom
' Recipients email address
objNewMail.To = EmailTo
'objNewMail.CC = CC
' Email Subject
objNewMail.Subject = Subject
' Email Body
objNewMail.Body = "From:" & FromName & " " & vbcrlf & "Email:" & EmailFrom & vbcrlf & Content
' Send Email
objNewMail.Send()
' Destroy object to release it from memory
Set objNewMail = Nothing
'response.Write "send to:" & strEmailTo
'response.End
response.Redirect("Result.asp?myType=" & myType & "&AppMsg=<div align=center><font color=gray size=2><b><p><p><p>THANK YOU<br>Your enquiry has been sent via email.<br>We will contact you as soon as possible.</b></font></div>")
Hi, above is my company website coding from Inquirypro.aspx , which is page that processing all the form after user fill all the field frominquiry.asp . do i need to change CDONTS to CDOSYS to make it work? or is there any other problem with the coding? i'm just an internship student with not so much guide and after doing some "googling" i read that CDONTS component has been removed. if i need to change it can someone guide me where to change and is there any thing that i need to concern or change?please do help me...