📄 ltlm.asp
字号:
<!--#include file="BBSLib.asp"-->
<%
if Request.Cookies("NC")="" or Request.Cookies("NC")="访客" then
Response.Write("对不起，您不是社区用户，请先注册！")
Response.End
end if
dim StarTime,EndTime
StarTime=timer()
'CheckLogin
if Request.QueryString("ID") = "" then
ShowError 2,"对不起，该论坛不存在！"
Response.End
end if
if Request.QueryString("PAGE") = "" then
PAGE = 1
else
PAGE = Int(Request.QueryString("PAGE"))
end if
Dim ret
ret = CommandEx("302|"&Request.QueryString("ID")&"|"&PAGE&"|"&IIF(Request.QueryString("JS") = "0","0","1")&"|"&Request.QueryString("MM")&"|"&Request.QueryString("ACT")&"|"&Request.QueryString("KEY"))
if GetPart(ret(0),1) <> "0" then
select case Int(GetPart(ret(0),1))
case 1,2,3
ShowError 1,GetPart(ret(0),2)
case 4
Response.Write("<SCRIPT LANGUAGE=javascript>"&Chr(13)&Chr(10))
Response.Write("<!--"&Chr(13)&Chr(10))
Response.Write("l = screen.width/2-250/2;"&Chr(13)&Chr(10))
Response.Write("t = screen.height/2-150/2;"&Chr(13)&Chr(10))
Response.Write("fLTDL = window.open('','fLTDL','scrollbar=no,toolbar=no,menubar=no,location=no,status=no,resizable=no,width=250,height=150,left='"&"+l+"&"',top='"&"+t);"&Chr(13)&Chr(10))
Response.Write("fLTDL.location.replace('ltdl.asp?ID="&Request.QueryString("ID")&"');"&Chr(13)&Chr(10))
Response.Write("fLTDL.opener = window;"&Chr(13)&Chr(10))
Response.Write("//-->"&Chr(13)&Chr(10))
Response.Write("</SCRIPT>"&Chr(13)&Chr(10))
end select
Response.End
end if
lt = Command("306|"&Request.QueryString("ID")&"|0")
if GetPart(lt,1) <> "0" then
ShowError 1,GetPart(lt,2)
Response.End
end if
if Int(GetPart(ret(0),2)) < 1 then
TOTALPAGE = 1
else if Int(GetPart(lt,10)) mod Int(Application("MYWZS")) = 0 then
TOTALPAGE = Int(Int(GetPart(lt,10))/Int(Application("MYWZS")))
else
TOTALPAGE = Int(Int(GetPart(lt,10))/Int(Application("MYWZS")))+1
end if
end if
'SQGG = CommandEx("316|1")
'if GetPart(SQGG(0),1) <> "0" then
' ShowError 1,GetPart(SQGG(0),2)
' Response.End
'end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<title><%=GetPart(lt,2)%></title>
<style type="text/css">
<!--
td { font-family: "宋体"; font-size: 12px}
body { font-family: "宋体"; font-size: 12px}
.p9 { font-family: "宋体"; font-size: 12px}
.p10 { font-family: "宋体"; font-size: xx-small;COLOR:#999999}
.14{ line-height:22px;font-size:12px}
.TButton { font-family: "宋体"; font-size: 12px;cursor:hand;HEIGHT: 20px; WIDTH: 66px}
A:link{font-size:12px;COLOR:black;TEXT-DECORATION: none}
A:visited {font-size:12px;COLOR:black;TEXT-DECORATION: none}
A:hover {font-size:12px;COLOR: red; TEXT-DECORATION: underline}
-->
</style>
<script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--
var p=0;
q=0;
function bFH_onclick() {
window.parent.location.replace('list.asp?ID=<%=GetPart(lt,18)%>&PAGE=<%=Request.QueryString("页")%>');
}
function ShowLTZLXG(id) {
l = screen.width/2-450/2;
t = screen.height/2-310/2;
fLTGL = window.open('','fLTGL','scrollbars=no,toolbar=no,menubar=no,location=no,status=no,resizable=no,width=450,height=310,left='+l+',top='+t);
fLTGL.location.replace('ltgl.asp?ID='+id);
}
function tYS_onkeypress() {
if (event.keyCode<45 || event.keyCode>57) {
if (event.keyCode == 13) {
if (tYS.value > <%=TOTALPAGE%>) {
tYS.value = 1;
}
else {
if (tYS.value <= 0) {
tYS.value = '1';
}
}
ShowPage(tYS.value);
}
else {
event.returnValue = false;
}
}
}
function ShowYHZC() {
l = screen.width/2-450/2;
t = screen.height/2-310/2;
window.open('hyzc.asp','fHYZC','scrollbars=no,toolbar=no,menubar=no,location=no,status=no,resizable=no,width=450,height=310,left='+l+',top='+t);
}
function ShowYHZLXG() {
l = screen.width/2-450/2;
t = screen.height/2-310/2;
fYHZLXG = window.open('','fYHZLXG','scrollbars=no,toolbar=no,menubar=no,location=no,status=no,resizable=no,width=450,height=310,left='+l+',top='+t);
fYHZLXG.location.replace('yhzlxg.asp?NC=<%=Request.Cookies("NC")%>');
}
function ShowFBWZ(id) {
l = screen.width/2-600/2;
t = screen.height/2-300/2;
fFBWZ = window.open('','fFBWZ','scrollbars=no,toolbar=no,menubar=no,location=no,status=no,resizable=no,width=600,height=300,left='+l+',top='+t);
fFBWZ.location.replace('fbwz.asp?ID='+id);
fFBWZ.opener = window;
}
function ShowGRZL(nc) {
l = screen.width/2-500/2;
t = screen.height/2-250/2;
fGRZL = window.open('','fGRZL','scrollbars=no,toolbar=no,menubar=no,location=no,status=no,resizable=no,width=500,height=250,left='+l+',top='+t);
fGRZL.location.replace('grzl.asp?NC='+nc);
}
function ShowHelp() {
window.open('help.asp','fHELP','scrollbars=yes,toolbar=no,menubar=no,location=no,status=no,resizable=no,left=0,top=0');
}
function ShowPage(page) {
window.location.replace('ltlm.asp?ID=<%=Request.QueryString("ID")%>&JS=0&PAGE='+page+'&ACT='+sSS.selectedIndex+'&KEY='+tGJZ.value+'&页=<%=Request.QueryString("页")%>');
}
function SQGG() {
fSQGG = window.open('','fSQGG','scrollbars=yes,toolbar=no,menubar=no,location=no,status=no,resizable=yes,left=1,top=1,width=600,height=400');
fSQGG.location.replace('ggl.asp');
}
function sSS_onchange() {
if (sSS.selectedIndex == 0) {
window.location.replace('ltlm.asp?ID=<%=Request.QueryString("ID")%>&JS=0&PAGE=1&ACT=0&MM=<%=Request.QueryString("MM")%>');
}
if (sSS.selectedIndex == 3) {
window.location.replace('ltlm.asp?ID=<%=Request.QueryString("ID")%>&JS=0&PAGE=1&ACT=3&MM=<%=Request.QueryString("MM")%>');
}
}
function bSS_onclick() {
window.location.replace('ltlm.asp?ID=<%=Request.QueryString("ID")%>&JS=0&PAGE=1&ACT='+sSS.selectedIndex+'&KEY='+tGJZ.value+'&MM=<%=Request.QueryString("MM")%>');
}
function window_onload() {
sSS.selectedIndex = <%=IIF(Request.QueryString("ACT") = "",0,Request.QueryString("ACT"))%>;
tGJZ.value = '<%=Request.QueryString("KEY")%>';
}
function ShowHF(m) {
window.location.replace('ltlm.asp?target=100&WZID='+m);
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -