<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%> <% Response.CacheControl = "no-cache" Response.AddHeader "Pragma", "no-cache" Response.Expires = -1 %> <% Function CheckCAPTCHA(valCAPTCHA) SessionCAPTCHA = Trim(Session("CAPTCHA")) Session("CAPTCHA") = vbNullString if Len(SessionCAPTCHA) < 1 then CheckCAPTCHA = False exit function end if if CStr(SessionCAPTCHA) = CStr(valCAPTCHA) then CheckCAPTCHA = True else CheckCAPTCHA = False end if End Function %> Untitled Document <%if Request.ServerVariables("REQUEST_METHOD") = "POST" then names=Request.Form("txtname") caddress=Request.Form("txtaddress") telephone=Request.Form("txttelephone") service=Request.Form("service") channel=Request.Form("channel") comments=Request.Form("txtcomments") session("name")=names session("address")=caddress session("telephone")=telephone session("service")=service session("channel")=channel session("comments")=comments else names="" caddress="" telephone="" service="Television Initiatives" channel="" comments="" end if %>
<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then strCAPTCHA = Trim(Request.Form("strCAPTCHA")) if CheckCAPTCHA(strCAPTCHA) = true then if service = "Television Initiatives" then mailbody="Feedback form:" & vbcrlf & _ "Name: " & names & vbcrlf & _ "Address: " & caddress & vbcrlf & _ "Phone: " & telephone & vbcrlf & _ "Service: " & service & vbcrlf & _ "Channel: " & channel & vbcrlf &_ "Comments: " & comments else mailbody="Feedback form:" & vbcrlf & _ "Name: " & names & vbcrlf & _ "Address: " & caddress & vbcrlf & _ "Phone: " & telephone & vbcrlf & _ "Service: " & service & vbcrlf & _ "Comments: " & comments end if towho="mienquiry@MaxBPC.com" Dim mymail Set mymail=Server.CreateObject("CDONTS.Newmail") mymail.From="info@mgnmediainitiatives.com" mymail.To="mienquiry@MaxBPC.com" mymail.Subject="Online Query From Analyse Solutions " mymail.Body=mailbody mymail.Send response.redirect "form_thanks.htm" else session("item")=item %> <% end if end if %>
Name >
Address
Telephone No >
Services
Select Channel
Not Verified.
Please Retry.
Write the characters in the image above This Is CAPTCHA Image
Remarks