📄 showbbs.asp

📁 树型ASP论坛下载
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!--#include file="opendb.asp" -->
<!--#include file="char.asp" -->
<%
indexid=request("indexid")
if indexid<>"" then
 indexid=cint(indexid)
else%>
  <script language="javascript"> 
  alert("非法进入，请退出！");
  //document.location.href="/index.asp"
  history.go(-1);
  </script>
<%end if

visit="update yfindex set visit=visit+1 where indexid="&indexid&"" '点击+1
conn.execute(visit)

sql="select * from bbs_board where bid="&request("board")
set rscust=Server.Createobject("ADODB.Recordset")
rscust.open sql,conn,1,3
boardname=rscust("board")
set rscust=nothing

'取子板块名
sql="select * from bbs_suboard where subid="&request("suboard")
set rscust=Server.Createobject("ADODB.Recordset")
rscust.open sql,conn,1,3
suboardname=rscust("suboard")
set rscust=nothing
%>
<%

adm=session("level")
submit=request("Submit")

'管理员删除首帖文章-----------
if  request("del_indexid")<>"" then

   delsql="delete from yfrep where indexid="&request("del_indexid")
   conn.execute(delsql)
   delsql="delete from yfindex where indexid="&request("del_indexid")
   conn.execute(delsql)
  Response.redirect "main.asp?page_code="&request("page_code")&"&board="&request("board")&"&suboard="&request("suboard")
end if
'删除结束---------------

'管理员删除回复文章-----------
if  request("del_repid")<>"" then
   delsql="delete from yfrep where repid="&request("del_repid")
   conn.execute(delsql)
   repsql="update yfindex set renum=renum-1 where indexid="&indexid&""
   conn.execute(repsql)
end if
'删除结束---------------


%> 
<%url="showbbs.asp"%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="bbs.css" rel="stylesheet" type="text/css">

<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}
//-->
</script>
<% If session("userid")="" Then %>
<script language="JavaScript">
<!--
function validata_form() {
validity=true;

if (!check_empty(document.form1.nickname.value))
{ validity=false;
 alert('请填写你的大名!');
document.form1.nickname.focus();
 return validity; }
 
if (!check_email(document.form1.email.value))
{ validity=false;
 alert('您的E-mail呢？');
document.form1.email.focus();
 return validity; }
 

 if (!check_empty(document.form1.content.value))
{ validity=false;
 alert('请填写回复内容!');
document.form1.content.focus();
 return validity; }

 if (!check_empty(document.form2.username.value))
{ validity=false;
 alert('请输入用户名!');
document.form1.username.focus();
 return validity; }

 if (!check_empty(document.form2.password.value))
{ validity=false;
 alert('请输入密码!');
document.form1.password.focus();
 return validity; }

function check_empty(text) {
return (text.length > 0); // returns false if empty
}

function check_email(address) {
if ((address == "")
|| (address.indexOf ('@') == -1)
|| (address.indexOf ('.') == -1))
return false;
return true;
}

}
-->
</script>
<script language="JavaScript">
<!--
function c_form() {
validity=true;

 if (!check_empty(document.form2.username.value))
{ validity=false;
 alert('请输入用户名!');
document.form2.username.focus();
 return validity; }

 if (!check_empty(document.form2.password.value))
{ validity=false;
 alert('请输入密码!');
document.form2.password.focus();
 return validity; }

function check_empty(text) {
return (text.length > 0); // returns false if empty
}

}
-->
</script>
<% End If %>
<% If session("level")="3" Then %>
<script language="JavaScript">
<!--
function cform(){
 if(!confirm("您确认删除吗? 请注意删除后无法恢复!"))
 return false;
}//-->
</script>
<% End If %>

<script>
function smilieopen() {var MainWindow = window.open ('smilies.htm',"_blank","toolbar=no,location=no,menubar=no,scrollbars=yes,width=400,height=400,resizeable=yes,status=no");}
function viewubb() {msg=window.open("ubbcode.htm","","height=500,width=500,left=5,top=5,scrollbars=yes,toolbar=no,directories=no,status=no,menubar=no,resizable=yes");}
function afp() {msg=window.open("afp.htm","","height=310,width=420,left=5,top=5,scrollbars=no,toolbar=no,directories=no,status=no,menubar=no,resizable=yes");}
helpstat = false;
stprompt = true;
basic = false;
function thelp(swtch){
if (swtch == 1){
basic = false;
stprompt = false;
helpstat = true;
} else if (swtch == 0) {
helpstat = false;
stprompt = false;
basic = true;
} else if (swtch == 2) {
helpstat = false;
basic = false;
stprompt = true;
}
}
function AddText(NewCode) {
document.form1.content.value+=NewCode
}
function yemail() {
if (helpstat) {
alert("Email标签\n将一个Email地址转换成Email链接。\n用法一：[email]someone@anywhere.com[/email]\n用法二：[email=someone@anywhere.com]Email链接信息[/email]");
} else if (basic) {
AddTxt="[email][/email]";
AddText(AddTxt);
} else { 
txt2=prompt("输入在Email链接中想要显示的信息，如：David的Email\n您若希望直接显示Email地址，就空着不要填写，然后点确定按钮！",""); 
if (txt2!=null) {
txt=prompt("请输入Email地址.","name@domain.com");
if (txt!=null) {
if (txt2=="") {
AddTxt="[email]"+txt+"[/email]";
} else {
AddTxt="[email="+txt+"]"+txt2;
AddText(AddTxt);
AddTxt="[/email]";
} 
AddText(AddTxt);
}
}
}
}
function ybold() {
if (helpstat) {
alert("粗体标签\n将文本字体加粗显示\n用法： [b]需要加粗显示的文本[/b]");
} else if (basic) {
AddTxt="[b][/b]";
AddText(AddTxt);
} else {
txt=prompt("加粗显示","输入想要加粗显示的文本");
if (txt!=null) {
AddTxt="[b]"+txt;
AddText(AddTxt);
AddTxt="[/b]";
AddText(AddTxt);
}
}
}
function italicize() {
if (helpstat) {
alert("斜体标签\n将文本字体设置为斜体\n用法： [i]需要设置为斜体的文本[/i]");
} else if (basic) {
AddTxt="[i][/i]";
AddText(AddTxt);
} else {
txt=prompt("设置为斜体","输入需要设置为斜体的文本");     
if (txt!=null) {
AddTxt="[i]"+txt;
AddText(AddTxt);
AddTxt="[/i]";
AddText(AddTxt);
}
}
}
function hyperlink() {
if (helpstat) {
alert("超级链接标签\n将网址转换为超级链接。\n用法一： [url]http://www.www.com[/url]\n用法二： [url=http://www.anywhere.com]超级链接信息[/url]");
} else if (basic) {
AddTxt="[url][/url]";
AddText(AddTxt);
} else {
txt2=prompt("需显示的超级链接信息。\n您若希望直接显示网址，就空着不要填写，然后按确定按钮！",""); 
if (txt2!=null) {
txt=prompt("请输入超级链接的网址.","输入HTTP或者FTP地址");
if (txt!=null) {
if (txt2=="") {
AddTxt="[url]"+txt+"[/url]";
AddText(AddTxt);
} else {
AddTxt="[url="+txt+"]"+txt2;
AddText(AddTxt);
AddTxt="[/url]";
AddText(AddTxt);
}
}
}
}
}
function image() {
if (helpstat){
alert("图片标签\n在帖子中插入一个图片。\n用法： [img]http:\www.www.com\image.gif[/img]");
} else if (basic) {
AddTxt="[img][/img]";
AddText(AddTxt);
} else {
txt=prompt("请输入图片链接的网址","http://");    
if(txt!=null) {
AddTxt="\r[img]"+txt;
AddText(AddTxt);
AddTxt="[/img]";
AddText(AddTxt);
}
}
}
function setfly() {
if (helpstat){
alert("飞翔标记\n使文字飞行.\n用法:  [FLY]飞翔文字[/FLY]");
} else if (basic) {
AddTxt="[FLY][/fly]";
AddText(AddTxt);
} else {
txt=prompt("飞翔文字","请在这里输入你要的飞翔文字");
if (txt!=null) {
AddTxt="\r[fly]"+txt;
AddText(AddTxt);
AddTxt="[/fly]";
AddText(AddTxt);
}
}
}
function move() {
if (helpstat){
alert("飞翔标记\n使文字飞行.\n用法:  [MOVE]移动文字[/MOVE]");
} else if (basic) {
AddTxt="[move][/move]";
AddText(AddTxt);
} else {
txt=prompt("移动文字","请在这里输入你要的移动文字");
if (txt!=null) {
AddTxt="\r[move]"+txt;
AddText(AddTxt);
AddTxt="[/move]";
AddText(AddTxt);
}
}
}
function underline() {
if (helpstat) {
alert("下划线标签\n将指定文字加上下划线\n用法： [u]需加上下划线的文本[/u]");
} else if (basic) {
AddTxt="[u][/u]";
AddText(AddTxt);
} else {
txt=prompt("输入需加上下划线的文本","输入需加上下划线的文本");     
if (txt!=null) {
AddTxt="[u]"+txt;
AddText(AddTxt);
AddTxt="[/u]";
AddText(AddTxt);
}
}
}
function ytext() {
var txt  = prompt("设置文字的背景色和颜色.用法: [SPAN=背景色, 颜色]要产生效果的文字[/SPAN]\n输入要设置的文字", "效果文字");
var bcol   = prompt("设置文字的背景色和颜色.用法: [SPAN=背景色, 颜色]要产生效果的文字[/SPAN]\n请先设置背景色", "Yellow");
12 下一页
💿 文件大小 1372 K
👤 上传用户 xulei147
📂 所属分类 Internet/网络编程
🏷️ 相关标签

#ASP #树 #论坛
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -