<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% Dim Recordset1 Dim Recordset1_cmd Dim Recordset1_numRows Set Recordset1_cmd = Server.CreateObject ("ADODB.Command") Recordset1_cmd.ActiveConnection = MM_connsj_STRING Recordset1_cmd.CommandText = "SELECT * FROM user" Recordset1_cmd.Prepared = true Set Recordset1 = Recordset1_cmd.Execute Recordset1_numRows = 0 %> <% Dim Recordset2 Dim Recordset2_cmd Dim Recordset2_numRows Set Recordset2_cmd = Server.CreateObject ("ADODB.Command") Recordset2_cmd.ActiveConnection = MM_connsj_STRING Recordset2_cmd.CommandText = "SELECT * FROM ml" Recordset2_cmd.Prepared = true Set Recordset2 = Recordset2_cmd.Execute Recordset2_numRows = 0 %> 见证真神
主页------ 见证真神------- 文章列表
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

搜索WWW 搜索本站
各版本圣经下载
十个版本的中英文圣经
简体中文灵修版(二
原文圣经
中英文圣经
中英文圣经豪华版
天主教圣经思高版
 
 
 
8
9
10
11
12
13
14
15
16
17
18
末页

<% Recordset1.Close() Set Recordset1 = Nothing %> <% Recordset2.Close() Set Recordset2 = Nothing %>