ONLINE APPLICATION

W
H
A
T
'
S

M
O
R
E

   
   
All About Ties
   
<% ferr=false if(request.form("da")="s")then stitle=request.form("stitle") icno=request.form("icno") familyname=request.form("familyname") givenname=request.form("givenname") cardname=request.form("cardname") nationality=request.form("nationality") gender=request.form("gender") mth1=request.form("mth1") day1=request.form("day1") yr1=request.form("yr1") if(mth1<>"")then mth1=CInt(mth1) end if if(day1<>"")then day1=CInt(day1) end if if(yr1<>"")then yr1=CInt(yr1) end if birthdate=request.form("mth1") & "/" & request.form("day1") & "/" & request.form("yr1") gender=request.form("gender") emailaddress=request.form("emailaddress") designation=request.form("designation") companyname=request.form("companyname") officeaddress1=request.form("officeaddress1") officeaddress2=request.form("officeaddress2") officecity=request.form("officecity") officeregion=request.form("officeregion") officecountry=request.form("officecountry") officephoneno=request.form("officephoneno") officefaxno=request.form("officefaxno") homeaddress1=request.form("homeaddress1") homeaddress2=request.form("homeaddress2") homecity=request.form("homecity") homeregion=request.form("homeregion") homecountry=request.form("homecountry") homephoneno=request.form("homephoneno") homefaxno=request.form("homefaxno") mobilephoneno=request.form("mobilephoneno") mailingto=request.form("mailingto") if(icno="")then s_icno="*" ferr=true end if if(stitle="")then s_stitle="*" ferr=true end if if(icno="")then s_icno="*" ferr=true end if if(familyname="")then s_familyname="*" ferr=true end if if(givenname="")then s_givenname="*" ferr=true end if if(cardname="")then s_cardname="*" ferr=true end if if(nationality="")then s_nationality="*" ferr=true end if if(gender="")then s_gender="*" ferr=true end if if(not isDate(birthdate))then s_birthdate="*" ferr=true end if if(emailaddress="")then s_emailaddress="*" ferr=true end if if(designation="")then s_designation="*" ferr=true end if if(companyname="")then s_companyname="*" ferr=true end if if(mailingto="")then s_mailingto="*" ferr=true end if if(mailingto="office")then if(officeaddress1="")then s_officeaddress1="*" ferr=true end if if(officecountry="")then s_officecountry="*" ferr=true end if if(officephoneno="")then s_officephoneno="*" ferr=true end if end if if(mailingto="home")then if(homeaddress1="")then s_homeaddress1="*" ferr=true end if if(homecountry="")then s_homecountry="*" ferr=true end if if(homephoneno="")then s_homephoneno="*" ferr=true end if end if if(mobilephoneno="")then s_mobilephoneno="*" ferr=true end if if(ferr=false)then emailstr=emailstr&"" & vbCrLf emailstr=emailstr&"" & vbCrLf emailstr=emailstr&"Receipt Generator" & vbCrLf emailstr=emailstr&"" & vbCrLf emailstr=emailstr&"" & vbCrLf emailstr=emailstr&"" & vbCrLf emailstr=emailstr&"" & vbCrLf emailstr=emailstr&"

The Executive Wear Member Registration

" & vbCrlf emailstr=emailstr&"
" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"
Personal Particulars
 Title " & ff(title) & " 
 NRIC/FIN/Passport No " & ff(icno) & " 
 Family Name " & ff(familyname) & " 
 Given Name " & ff(givenname) & " 
 Name (to appear on the card) " & ff(cardname) & " 
 Nationality " & ff(nationality) & " 
 Gender " & ff(gender) & " 
 Birth Date " & ff(birthdate) & " 
 E-mail Address " & ff(emailaddress) & " 
 Designation " & ff(designation) & " 
 Company Name " & ff(companyname) & " 
" & vbCrlf emailstr=emailstr&"
" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"
 Preferred Mailing Address " & ff(mailingto) & " 
" & vbCrlf emailstr=emailstr&"
" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&" " & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"
Office Contact
 Address " & ff(officeaddress1) & " 
 " & ff(officeaddress2) & " 
 City " & ff(officecity) & " 
 Region " & ff(officeregion) & " 
 Country " & ff(cct(officecountry)) & " 
 Phone Number " & ff(officephoneno) & " 
 Fax Number " & ff(officefaxno) & " 
" & vbCrlf emailstr=emailstr&"
" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"" & vbCrlf emailstr=emailstr&"
Home Contact
 Address " & ff(homeaddress1) & " 
 " & ff(homeaddress2) & " 
 City " & ff(homecity) & " 
 Region " & ff(homeregion) & " 
 Country " & ff(cct(homecountry)) & " 
 Phone Number" & ff(homephoneno) & " 
 Fax Number" & ff(homefaxno) & " 
 Mobile Phone" & ff(mobilephoneno) & " 
" & vbCrlf emailstr=emailstr&"" & vbCrLf emailstr=emailstr&"" & vbCrLf msgfrom="email-daemon " msgto="sales@goldlink.com.sg" msgsubject="The Executive Wear Member Registration" msgcontent=emailstr msgpriority=1 Call sendmail(msgfrom,msgto,msgsubject,msgcontent,msgpriority) end if end if %> <%if(request.form("da")="" or ferr=true)then%>

Kindly complete this form for the application of The Executive Privilege Card.
We will contact you once the card is ready for collection. S$20.00 memerbship fee is payable upon collection of card.

*mandatory fields are indicated by an asterisk

Personal Particulars
 Title <%=s_stitle%>
 NRIC/FIN/Passport No <%=s_icno%>
 Family Name <%=s_familyname%>
 Given Name <%=s_givenname%>
 Name (to appear on the card) <%=s_nameoncard%>
 Nationality <%=s_nationality%>
 Gender <%=s_gender%> > Male > Female
 Birth Date <%=s_birthdate%>
 E-mail Address <%=s_emailaddress%>
 Designation <%=s_designation%>
 Company Name <%=s_companyname%>

 Preferred Mailing Address <%=s_mailingto%> > Office > Home

Office Contact
 Address <%=s_officeaddress1%>
 
 City <%=s_officecity%>
 Region <%=s_officeregion%>
 Country <%=s_officecountry%> <%=scountry(officecountry,"officecountry")%>
 Phone Number <%=s_officephoneno%>
 Fax Number <%=s_officefaxno%>

Home Contact
 Address <%=s_homeaddress1%>
 
 City <%=s_homecity%>
 Region <%=s_homeregion%>
 Country <%=s_homecountry%> <%=scountry(homecountry,"homecountry")%>
 Phone Number
 Fax Number
 Mobile Phone <%=s_mobilephoneno%>



<%elseif(request.form("da")="s" or ferr=false)then%>

Thank You


Customer Service will confirm your receipt of your registration and will contact you in 2-3 working days.

If you have not hear from us within 2-3 working days, please contact us at 65 6732 5778 and our customer care will attend to your request.

Thank you for your registration.


The Executive Wear Member Registration
<%end if%>
      Copyright 2006 Goldlink. All rights reserved