counseling and testing services
<% Dim SQL, objRS Call ConnectToDatabase SQL = "sectionSelect " & 4 Set objRS = Server.CreateObject("ADODB.Recordset") Set objRS = cn.Execute(SQL) Response.Write(objRS("sectionContent")) DisConnectFromDatabase %>
|
|
|
|
|
|
|
|
|
|
|
counseling and testing services |
||||
|
|
|
<% Dim SQL, objRS Call ConnectToDatabase SQL = "sectionSelect " & 4 Set objRS = Server.CreateObject("ADODB.Recordset") Set objRS = cn.Execute(SQL) Response.Write(objRS("sectionContent")) DisConnectFromDatabase %> |
||||