<% dim p,ydbbsname,nam,brr,cent,sore,yc,hyin,oopp,sellkf,idi,txt,typeID,ydnum,did p=request("p") ID=request("ID") typeID=request("typeID") if p="" or IsNumeric(p)=False then Call Error("选择类别无效!") end if if ID="" or IsNumeric(ID)=False then Call Error("版块ID无效!") end if p=clng(p) if p=10 then ydbbsname="最新帖子
" if p=20 then ydbbsname="动态帖子
" if p=30 then ydbbsname="精华帖子
" if p=40 then ydbbsname="最新相片
" if p=4 then ydbbsname="WML标签
" if p=3 then ydbbsname="新的页面
" if p=1 then ydbbsname="同城论坛
" if p=2 then ydbbsname="超级连接
" if p=0 then ydbbsname="UBB标签
" response.write"项目类型:"&ydbbsname&"" set rs=Server.CreateObject("ADODB.Recordset") rs.open"select * from ydbbs where ID="&id,conn,1,1 if rs.eof then Call Error("不存在的版块!") end if nam=rs("name") brr=rs("brr") cent=rs("myjbin") sore=rs("myjyin") yc=rs("yc") hyin=rs("hyin") oopp=rs("oopp") sellkf=rs("sellkf") idi=rs("pid") txt=rs("test") did=rs("did") ydnum=rs("ydnum") rs.close set rs=nothing if p=1 then response.write"----------
" response.write"版块名称
" response.write"
" response.write"版块后面:
" response.write"显示顺序:
" response.write"进入"&getcent&":
" response.write"进入经验:
" response.write"公开方式:
" response.write"进入权限:
" response.write"禁模拟器:
" response.write"发帖状态:
" response.write"[确定提交]" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"
" elseif p=2 then response.write"----------
" response.write"连接名称
" response.write"
" response.write"连接地址
" response.write"
" response.write"连接后面:
" response.write"显示顺序:
" response.write"公开方式:
" response.write"[确定提交]" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"
" elseif p=3 then response.write"----------
" response.write"页面名称
" response.write"
" response.write"页面后面:
" response.write"显示顺序:
" response.write"公开方式:
" response.write"禁模拟器:
" response.write"[确定提交]" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"
" elseif p=0 then response.write"----------
" response.write"文本名称(用于标记)
" response.write"
" response.write"文本内容(支持UBB)
" response.write"
" response.write"文本后面:
" response.write"显示顺序:
" response.write"公开方式:
" response.write"[确定提交]" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"
" elseif p=4 then response.write"----------
" response.write"WML标签(用于标记)
" response.write"
" response.write"WML标签内容
" response.write"
" response.write"WML后面:
" response.write"显示顺序:
" response.write"公开方式:
" response.write"[确定提交]" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"
" else response.write"----------
" response.write"调用名称(用于后台标记)
" response.write"
" response.write"调用论坛(不填则为全部论坛):
论坛ID
" response.write"调用条数:
" response.write"调用后面:
" response.write"显示顺序:
" response.write"公开方式:
" response.write"[确定提交]" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"" response.write"
" end if response.write"[删除项目]" if typeid<>"" then response.write"
[上级页面]" end if response.write"
[同城设计]" %>