%
Dim rs1
Dim rs1_cmd
Dim rs1_numRows
Set rs1_cmd = Server.CreateObject ("ADODB.Command")
rs1_cmd.ActiveConnection = MM_miracle_db1_STRING
rs1_cmd.CommandText = "SELECT Pageid, imghead, nav, desc2, links FROM content WHERE pageid = 20 LIMIT 0 , 30 "
rs1_cmd.Prepared = true
Set rs1 = rs1_cmd.Execute
rs1_numRows = 0
Dim rs2
Dim rs2_cmd
Dim rs2_numRows
Set rs2_cmd = Server.CreateObject ("ADODB.Command")
rs2_cmd.ActiveConnection = MM_miracle_db1_STRING
rs2_cmd.CommandText = "SELECT Desc1 FROM content WHERE pageid = 20 LIMIT 0 , 30 "
rs2_cmd.Prepared = true
Set rs2 = rs2_cmd.Execute
rs2_numRows = 0
%>
|
<%= rs2("desc1")%>
<%= rs1("desc2")%>
|
|
|
|
<%= rs1("nav")%> |
<%= rs1("Links")%>

|
|