%@ Language=VBScript %> <% Option Explicit dim objConn dim objRs dim objRs1 dim strQ set objConn=Server.CreateObject("ADODB.Connection") objConn.Open application("ConnectionString") set objRs=Server.CreateObject("ADODB.Recordset") set objRs1=Server.CreateObject("ADODB.Recordset") strQ="select * from tblFAQ" objRs.Open strQ, objConn,3,3 objRs1.Open strQ, objConn,3,3 %>
|
|
|