%
on error resume next
if Request.ServerVariables("REQUEST_METHOD")="GET" then
showWhat="Register"
end if
if Request.ServerVariables("REQUEST_METHOD")="POST" then
name=request("fname")
company=request("company")
email=request("email")
title=request("title")
url=request("url")
country=request("country")
phone=request("phone")
htmlBody=" Hi Annik,
We have recieved a registration for our demos with below details
Name: " & name
htmlBody=htmlBody & "
company: " & company
htmlBody=htmlBody & "
Country: " & country
htmlBody=htmlBody & "
Email address: " & email & "
Phone: " & phone
htmlBody=htmlBody & "
Web Url: " & url
htmlBody=htmlBody & "
For providing username and password for this registernt please use the below URL
"
htmlBody=htmlBody & "Flash Demos"
'htmlBody=htmlBody & "http://www.anniksystems.com/client_login.asp?uname=Annik06&password=Choicemodel06&r=log"
htmlBody=htmlBody & "
With Regards
Software Team"
' Create a email routine
' send an email
err.Clear
Dim objMail,myMail
set myMail=server.createObject("persits.mailsender")
if err.number <> 0 then
errMsg= "Error Occured :
Error Number: " & err.number & "Error Description: " & err.Description & "Please contact annikaimsdev@anniksystems.com with the above error message.
Thank you"
else
errMsg=""
end if
if errMsg="" then
Set objMail = Server.CreateObject("Persits.MailSender")
objMail.Timestamp = CDate("Nov 12, 2003 09:01:00 PM")
objMail.From = "feedback@yahoo.com"
objMail.FromName = "Web Master"
objMail.AddAddress "vineet.malhotra@anniksystems.com"
objMail.Subject = "Registration details for our online demos"
objMail.Body = htmlBody
objMail.IsHTML=true
objMail.Queue = True
objMail.Send
set objMail=nothing
If Err <> 0 Then
errMsg="Error while sending mail. Please contact us at Chinmaya.saxena@anniksystems.com"
else
errMsg=""
End If
end if
'
if errMsg="" then
showWhat="Thankyou"
else
showWhat="Register"
end if
end if
%>
![]()

 home
| pressroom
![]()
![]()
![]()
![]()
![]()
![]()



![]()
![]()
![]()
Login
![]()
![]()
![]()
![]()
![]()
Request for a demo (Register)
![]()
![]()
![]()
![]()
Home > Client
Login > Request for a demo (register)
![]()
![]()
![]()
<% if showWhat="Register" then%>
<% elseif showWhat="Thankyou" then%>
<% else%>
<%End if%>
Annik is going to be launching its newsletter soon. Fill up your details and sign-up in advance to receive them.
* Required Fields
![]()
![]()
![]()
© 2008 Annik Technology Services. All rights reserved
![]()