<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%> <% var SO = 'DESC'; var SF = 'NgayCap'; if (String(Request.QueryString("so")) != "undefined" && String(Request.QueryString("so")) != "") { SO = String(Request.QueryString("so")); } if (String(Request.QueryString("sf")) != "undefined" && String(Request.QueryString("sf")) != "") { SF = String(Request.QueryString("sf")); } var rsLib = Server.CreateObject("ADODB.Recordset"); rsLib.ActiveConnection = MM_conn_QCM_STRING; rsLib.CursorType = 3; rsLib.CursorLocation = 3; rsLib.LockType = 1; if (Request.QueryString('audio') == 'true') { rsLib.Source = "SELECT tblThuVien.Ten as Ten, tblThuVien.Chuong, tblTacGia.Ten as TacGia, tblLoai.Media as TheLoai, tblThuVien.NgayCap as NgayCap, tblThuVien.TenFile, tblThuVien.ZipFile FROM (tblThuVien INNER JOIN tblTacGia ON tblThuVien.TacGia = tblTacGia.AuthorID) INNER JOIN tblLoai ON tblThuVien.TheLoai = tblLoai.MediaID WHERE (tblThuVien.TenFile <> NULL AND tblThuVien.Duyet = TRUE)"; } else { rsLib.Source = "SELECT tblThuVien.Ten as Ten, tblThuVien.Chuong, tblTacGia.Ten as TacGia, tblLoai.Media as TheLoai, tblThuVien.NgayCap as NgayCap, tblThuVien.TenFile, tblThuVien.ZipFile FROM (tblThuVien INNER JOIN tblTacGia ON tblThuVien.TacGia = tblTacGia.AuthorID) INNER JOIN tblLoai ON tblThuVien.TheLoai = tblLoai.MediaID WHERE (tblThuVien.Ten <> NULL AND tblThuVien.Duyet = TRUE)"; } rsLib.Open(); rsLib.Sort=SF + ' ' + SO; //rsLib.Sort='NgayCap desc, Ten asc'; var rsLib_numRows = 0; %> <% var Repeat1__numRows = 500; var Repeat1__index = 0; rsLib_numRows += Repeat1__numRows; %> <% // *** Recordset Stats, Move To Record, and Go To Record: declare stats variables // set the record count var rsLib_total = rsLib.RecordCount; // set the number of rows displayed on this page if (rsLib_numRows < 0) { // if repeat region set to all records rsLib_numRows = rsLib_total; } else if (rsLib_numRows == 0) { // if no repeat regions rsLib_numRows = 1; } // set the first and last displayed record var rsLib_first = 1; var rsLib_last = rsLib_first + rsLib_numRows - 1; // if we have the correct record count, check the other stats if (rsLib_total != -1) { rsLib_numRows = Math.min(rsLib_numRows, rsLib_total); rsLib_first = Math.min(rsLib_first, rsLib_total); rsLib_last = Math.min(rsLib_last, rsLib_total); } %> <% var MM_paramName = ""; %> <% // *** Move To Record and Go To Record: declare variables var MM_rs = rsLib; var MM_rsCount = rsLib_total; var MM_size = rsLib_numRows; var MM_uniqueCol = ""; MM_paramName = ""; var MM_offset = 0; var MM_atTotal = false; var MM_paramIsDefined = (MM_paramName != "" && String(Request(MM_paramName)) != "undefined"); %> <% // *** Move To Record: handle 'index' or 'offset' parameter if (!MM_paramIsDefined && MM_rsCount != 0) { // use index parameter if defined, otherwise use offset parameter r = String(Request("index")); if (r == "undefined") r = String(Request("offset")); if (r && r != "undefined") MM_offset = parseInt(r); // if we have a record count, check if we are past the end of the recordset if (MM_rsCount != -1) { if (MM_offset >= MM_rsCount || MM_offset == -1) { // past end or move last if ((MM_rsCount % MM_size) != 0) { // last page not a full repeat region MM_offset = MM_rsCount - (MM_rsCount % MM_size); } else { MM_offset = MM_rsCount - MM_size; } } } // move the cursor to the selected record for (var i=0; !MM_rs.EOF && (i < MM_offset || MM_offset == -1); i++) { MM_rs.MoveNext(); } if (MM_rs.EOF) MM_offset = i; // set MM_offset to the last possible record } %> <% // *** Move To Record: if we dont know the record count, check the display range if (MM_rsCount == -1) { // walk to the end of the display range for this page for (var i=MM_offset; !MM_rs.EOF && (MM_size < 0 || i < MM_offset + MM_size); i++) { MM_rs.MoveNext(); } // if we walked off the end of the recordset, set MM_rsCount and MM_size if (MM_rs.EOF) { MM_rsCount = i; if (MM_size < 0 || MM_size > MM_rsCount) MM_size = MM_rsCount; } // if we walked off the end, set the offset based on page size if (MM_rs.EOF && !MM_paramIsDefined) { if ((MM_rsCount % MM_size) != 0) { // last page not a full repeat region MM_offset = MM_rsCount - (MM_rsCount % MM_size); } else { MM_offset = MM_rsCount - MM_size; } } // reset the cursor to the beginning if (MM_rs.CursorType > 0) { if (!MM_rs.BOF) MM_rs.MoveFirst(); } else { MM_rs.Requery(); } // move the cursor to the selected record for (var i=0; !MM_rs.EOF && i < MM_offset; i++) { MM_rs.MoveNext(); } } %> <% // *** Move To Record: update recordset stats // set the first and last displayed record rsLib_first = MM_offset + 1; rsLib_last = MM_offset + MM_size; if (MM_rsCount != -1) { rsLib_first = Math.min(rsLib_first, MM_rsCount); rsLib_last = Math.min(rsLib_last, MM_rsCount); } // set the boolean used by hide region to check if we are on the last record MM_atTotal = (MM_rsCount != -1 && MM_offset + MM_size >= MM_rsCount); %> <% // *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters // create the list of parameters which should not be maintained var MM_removeList = "&index="; if (MM_paramName != "") MM_removeList += "&" + MM_paramName.toLowerCase() + "="; var MM_keepURL="",MM_keepForm="",MM_keepBoth="",MM_keepNone=""; // add the URL parameters to the MM_keepURL string for (var items=new Enumerator(Request.QueryString); !items.atEnd(); items.moveNext()) { var nextItem = "&" + items.item().toLowerCase() + "="; if (MM_removeList.indexOf(nextItem) == -1) { MM_keepURL += "&" + items.item() + "=" + Server.URLencode(Request.QueryString(items.item())); } } // add the Form variables to the MM_keepForm string for (var items=new Enumerator(Request.Form); !items.atEnd(); items.moveNext()) { var nextItem = "&" + items.item().toLowerCase() + "="; if (MM_removeList.indexOf(nextItem) == -1) { MM_keepForm += "&" + items.item() + "=" + Server.URLencode(Request.Form(items.item())); } } // create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL + MM_keepForm; if (MM_keepBoth.length > 0) MM_keepBoth = MM_keepBoth.substring(1); if (MM_keepURL.length > 0) MM_keepURL = MM_keepURL.substring(1); if (MM_keepForm.length > 0) MM_keepForm = MM_keepForm.substring(1); %> <% // *** Move To Record: set the strings for the first, last, next, and previous links var MM_moveFirst="",MM_moveLast="",MM_moveNext="",MM_movePrev=""; var MM_keepMove = MM_keepBoth; // keep both Form and URL parameters for moves var MM_moveParam = "index"; // if the page has a repeated region, remove 'offset' from the maintained parameters if (MM_size > 1) { MM_moveParam = "offset"; if (MM_keepMove.length > 0) { params = MM_keepMove.split("&"); MM_keepMove = ""; for (var i=0; i < params.length; i++) { var nextItem = params[i].substring(0,params[i].indexOf("=")); if (nextItem.toLowerCase() != MM_moveParam) { MM_keepMove += "&" + params[i]; } } if (MM_keepMove.length > 0) MM_keepMove = MM_keepMove.substring(1); } } // set the strings for the move to links if (MM_keepMove.length > 0) MM_keepMove += "&"; var urlStr = Request.ServerVariables("URL") + "?" + MM_keepMove + MM_moveParam + "="; MM_moveFirst = urlStr + "0"; MM_moveLast = urlStr + "-1"; MM_moveNext = urlStr + (MM_offset + MM_size); MM_movePrev = urlStr + Math.max(MM_offset - MM_size,0); %> Thien Vien Quang Chieu: Bang Giang

Băng Giảng

Xin vui lòng liên lạc Thiền Viện để thỉnh những băng giảng, kinh sách và dụng cụ tọa thiền ở số (817-483-8670) hoặc gởi Email đến quangchieuzen@yahoo.com. Quí vị có thể nghe những bài Pháp Thọai đã được cập nhật (dạng Windows Media Audio WMA) bằng cách nhấn trỏ vào dấu hiệu , hoặc bấm vào hình bên cạnh tựa bài để lưu trữ vào máy vi tính của quí vị.

<% while ((Repeat1__numRows-- != 0) && (!rsLib.EOF)) { %> <% Repeat1__index++; rsLib.MoveNext(); } %>
Tựa Tác Giả
Thể Loại
Số Lượng
<%=(rsLib.Fields.Item("Ten").Value)%> <% if (rsLib.Fields.Item("TenFile").Value != null) { %> Nghe Pháp <% } else {%>   <%}%> <% if (rsLib.Fields.Item("ZipFile").Value != null) { %> download <% } else {%>   <%}%>  <%=(rsLib.Fields.Item("TacGia").Value)%> 
<%=(rsLib.Fields.Item("NgayCap").Value)%> 
<%=(rsLib.Fields.Item("TheLoai").Value)%> 
<%=(rsLib.Fields.Item("Chuong").Value)%> 

<% if (MM_offset != 0) { %> Trang Đầu <% } // end MM_offset != 0 %>
<% if (MM_offset != 0) { %> Trang Trước <% } // end MM_offset != 0 %>
<% if (!MM_atTotal) { %> Trang Kế <% } // end !MM_atTotal %>
<% if (!MM_atTotal) { %> Trang Cuối <% } // end !MM_atTotal %>
> >

 

 

<% rsLib.Close(); %>