<%@ language="vbscript"%> <%'option explicit %> <% Dim rs Dim rs1 Dim strsql Dim strsql1 Set rs=server.CreateObject("adodb.recordset") set rs1=server.CreateObject("adodb.recordset") strsql="select pppname, products, markets from ppp_master where pppcode = " & Request.QueryString("pppcode") & "" strsql1="select convert(char(10),pppdate,103) pppdate from ppp_schedule where pppcode = " & Request.QueryString("pppcode") & "" on error resume next rs.Open strsql,objconn if err.number <> 0 then Response.Redirect "/inc/commoninc/error.asp?errorno=err.number" Response.End end if on error goto 0 on error resume next rs1.Open strsql1,objconn if err.number <> 0 then Response.Redirect "/inc/commoninc/error.asp?errorno=err.number" Response.End end if on error goto 0 %> Product Promotion Programme Registration - <%=Application("Title")%>
Home>Calendar>Program Calendar>Product Promotion Programme  
Preliminary Application for participation in
Product Promotion Programme
Name of Program <%=rs("pppname")%>
Approx Dates
(dd/mm/yyyy)		 <%do while not rs1.EOF %> <%=rs1("pppdate")%> <%if not rs1.EOF then rs1.MoveNext end if if not rs1.EOF then%> , <%end if loop%>
Products <%=rs("Products")%>
Markets <%=rs("Markets")%>
Company Details
Company Name *
Contact Executive *
First Name *
Second Name *
Designation *
Contact Address *

Phone(s) + - - *
(Country Code - Area Code - Phone No.)
Fax + - -
(Country Code - Area Code - Fax No.)
Email *
Website URL http://
Business Details
Products Manufactured *
Products to be promoted during the programme *
Demand Draft Details
Amount remitted by Draft
Draft Number
Draft Date
Bank Name
">
* Mandatory Fields