jsplay.asp

这是一个asp的“www.vqqq.com网页特效”系统

<!--#include file="inc/config.asp"-->
<!--#include file="mdb.asp"-->
<!--#include file="inc/error.asp"-->
<!--#include file="inc/FORMAT.ASP" -->
<%
dim founderr,errmsg
founderr=false
errmsg=""

if request.querystring("js_id")="" then
  founderr=true
  errmsg=errmsg+"<br>"+"<li>你必须指定操作的对象！"
else
  dim jsid
  if not isInteger(request.querystring("js_id")) then
    founderr=true
    errmsg=errmsg+"<br>"+"<li>非法的id参数。"
  else
    jsid=cint(request.querystring("js_id"))
  end if
end if

if founderr then
  call diserror()
else
sql="select * from SCRIPT_body where id="&jsid
set rs=conn.execute(sql)
dim jsurl,jspic
'jsurl=rs("js_url")
'jspic=rs("js_pic")
jsname=rs("title")
jsdate=rs("time")
jsdesc=rs("text")
sql="UPDATE SCRIPT_body SET click = click + 1 where id="&jsid
conn.execute(sql)
rs.close
set rs=nothing

%>
<title><%=jsname%>www.vqqq.com网页制作，设计，数据库，源码下载,黑客程序,系统资源,网页特效, 粗口舞曲, 中文舞曲, 街舞录象,MTV, 音乐, FLASH, 教程, 舞曲, 交友，社区,聊天,照片,酷站,连接,留言,统计,日记,文章,开发工具,免费,软件,合作,黑客,代码,ASP,PHP,主机,交流,免费留言本,免费日记,免费投票,免费下载,免费查询,IP查询,手机查询,身份证查询,网吧,电影,DJ，传奇世界外挂，传奇世界挂机外挂，传奇世界私服</title>
<%=jsdesc%>
<br><center>"window.location.href='jscode.asp?js_id=<%=jsid%>'"></center><br>
<%end if%>