 |
<% If submit="" Then %>
| A
D D R E S S |
Central
Institute of Indian Languages
Department
of Secondary & Higher Education
Ministry of Human Resource Development
Government of India
Manasagangotri, Hunsur Road
Mysore - 570 006
Karnataka, INDIA.
Phone : (91-0821) 515820
Fax : (91-0821) 515032
E-mail : bhasha@sancharnet.in
Web : www.anukriti.net
|
<%
Else
Dim strTo, strFrom, strSubject, strBody
name=Request("name")
org=Request("org")
addr=Request("addr")
ph=Request("ph")
fax=Request("fax")
email=Request("email")
sugg=Request("sugg")
strTo="utcsmys@softhome.net"
'strTo="giridhar@ciil.stpmy.soft.net"
strFrom=Trim(request.Form("email"))
strSubject="Contact Us - Anukriti.Net"
strBody = strBody & "Name :" & name & vbCrLf
strBody = strBody & "Organisation :" & org & vbCrLf
strBody = strBody & "Address :" & addr & vbCrLf
strBody = strBody & "Phone :" & ph & vbCrLf
strBody = strBody & "Fax :" & fax & vbCrLf
strBody = strBody & "E-Mail :" & email & vbCrLf
strBody = strBody & "Suggestion :" & sugg & vbCrLf
set myMail = Server.CreateObject("CDONTS.NewMail")
myMail.To = strTo
myMail.From = strFrom
myMail.Subject = strSubject
myMail.Body = strBody
myMail.Send
Set myMail = Nothing
%>
Your Information is succesfully registered.
Click here to return to Home page
<% End If%>
|
 |