📄 list_news.asp
字号:
<%@language="VBscript"%>
<%Response.Expires=0%>
<!--#include file="./checkuser.asp" -->
<!--#include file="../../include/db_conn.asp" -->
<%
m_ver = "big5"
tmpUrl="../../big5/news_detail.asp"
%>
<!--#include file="../../include/search_code.asp" -->
<%
'Response.Write sqlstr
set myrs=server.CreateObject("adodb.recordset")
myrs.Open sqlstr,conn,1,1
%>
<!--#include file="./header.asp" -->
<script language="javascript">
function count_checked_items() {
var number_checked=0;
var box_count=document.frm_list.news_id.length;
if ( box_count==null ) {
if ( document.frm_list.news_id.checked==true ) {
number_checked=1;}else {
number_checked=0;}}
else {
for ( var i=0; i < (box_count); i++ ) {
if ( document.frm_list.news_id[i].checked==true ) {
number_checked++;}}}return number_checked;}
function add_to_edit() {
if (count_checked_items()>0){
document.frm_list.action="edit_news.asp";
document.frm_list.submit();
}
else
alert('叫眤
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -