<%@ Language=VBScript %> <% set cn = Server.CreateObject("ADODB.Connection") cn.ConnectionTimeout = 6000000 cn.CommandTimeout = 6000000 cn.Open "DSN=Kidsnet_Parent;uid=sa;PWD=sgmkj;APP=ASP Script;DATABASE=Kidsnet" Set rs = Server.CreateObject("ADODB.Recordset") set cn2 = Server.CreateObject("ADODB.Connection") cn2.ConnectionTimeout = 6000000 cn2.CommandTimeout = 6000000 cn2.Open "DSN=Kidsnet_Parent;uid=sa;PWD=sgmkj;APP=ASP Script;DATABASE=Kidsnet" Set rs2 = Server.CreateObject("ADODB.Recordset") id = session("id") sid = session("sid") rs.Open "Select * from parent where ParentID = '" & id & "'",cn %>
Parent Information

Parent ID: 

<%=rs("ParentID")%>

E-mail address: 

" id="email" name="email" size="20">

Name: 

" id="Name" name="Name" size="20">

Address: 

" id="Address" name="Address" size="20">

City: 

" id="CITY" name="CITY" size="20">

State: 

" id="STATE" name="STATE" size="20">

Zip: 

" id="ZIP" name="ZIP" size="20">