Search
<% dim con set con=server.createobject("ADODB.Connection") ' con.open = "DRIVER=SQL Server;Server=;UID=; PWD=; DATABASE=" con.open = "DRIVER=SQL Server;Server=;UID=; PWD=; DATABASE=" if Request.QueryString("name")="exist" then%>
Email id already exists,Please choose another mail id
<% end if %>
*
User Id
(Your Email Id )
*
Password
(min 6 characters)
*
Confirm Password
*
FirstName
*
LastName
Sex
Male
Female
*
Date of Birth:
Month
Jan
Feb
Mar
Apr
May
Jun
Jul
Aug
Sep
Oct
Nov
Dec
Day
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Address
Street
City
Phone(Res)
-
-
( Eg : 999-999-9999 )
Phone(Off)
-
-
Mobile
-
-
Fax
-
-
<% set rs_states=server.createObject("ADODB.Recordset") state_SQL = "select state_code,state_name from states order by state_name" set rs_states=con.execute(state_SQL) %>
State
<% do while not rs_states.eof st_code=rs_states("state_code") st_name=rs_states("state_name") %>
<%=st_name%>
<% rs_states.movenext loop %>
*
Zip Code
* marked fields are to be filled
Powered By SITSCorp
<% rs_states.close set rs_states = nothing con.close set con=nothing %>