搜索列表
-
如何利用数据库内容建立一个下拉式列表?
【编程10000问】如何利用数据库内容建立一个下拉式列表?<% myDSN="DSN=xur;uid=xur;pwd=xur"mySQL="select * from authors where AU_ID<100"set conntemp=server.createobject("adodb.connection")conntemp.open myDSNset rstemp=conntemp.execute(mySQL)if rstemp.eof thenresponse.write "噢,数据库...
|如何|何利|利用|用数|数据|据库|库内|内容|容建|建立|立一|一个|个下|下拉|拉式|式列|列表|表?|?| -
如何实现歌曲在线点播?
【编程10000问】<%dim choose,path,mydb,myset,SQL,fs,mp3' 获得用户提交表单(list.htm)选中的曲目对应的id号,并将其赋给字串变量choose. choose=“("for i=3 to request.form.countchoose=choose+request.form(i)+“,"nextchoose=left(choose,len(choose)-1)+“)"if choose=“()" thenresponse.redirect(“list.htm")resp...
|如何|何实|实现|现歌|歌曲|曲在|在线|线点|点播|播?|?| -
如何分页显示数据库查询结果?
【编程10000问】<% if Request.QueryString("PageNumber").count > 0 then ' 指定页号的参数PageNumber.如果指定页号,则以指定页号为依据. PageNumber = Request.QueryString("PageNumber")(1)elsePageNumber = 1' 如没指定页号,缺省为1.end ifRecordNumberPerPage = 10 ' 每页显示10条记录. set AR...
|如何|何分|分页|页显|显示|示数|数据|据库|库查|查询|询结|结果|果?|?| -
如何实现全文检索?
【编程10000问】<%@ LANGUAGE="VBscript" %> <html> <head> <meta NAME="GENERATOR" Content="Microsoft FrontPage 3.0"> <meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312-80"> <title>星河影动之全文检索...
|如何|何实|实现|现全|全文|文检|检索|索?|?| -
如何用数据库制作一个多用户版的计数器?
【编程10000问】count.asp' 计数器的核心程序.<%Set conn = Server.CreateObject("ADODB.Connection")dbpath=server.MapPath("count.mdb")conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&DbPathuser=Request.QueryString("user")sql="update counttable set curvalue=curvalue+1 where user='"...
|如何|何用|用数|数据|据库|库制|制作|作一|一个|个多|多用|用户|户版|版的|的计|计数|数器|器?|?| -
不用Global.asa也能实现统计在线人数吗?
【编程10000问】不用Global.asa也能实现统计在线人数吗?<%sessionID = session.SessionIDtimeout = 5' 设置session保持的时间.Conn_String = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("count.mdb")'Conn_String = "activeUser"' 最好设置DSN = "activeuser",因为我们需要在...
|不用|用G|Gl|lo|ob|ba|al|la|as|sa|a也|也能|能实|实现|现统|统计|计在|在线|线人|人数|数吗|吗?|?| -
如何验证IP地址?
【编程10000问】 sub chkIP(boardid) dim rsIP dim ipArr dim ignored dim i dim ip dim sql ip=Request.ServerVariables("REMOTE_ADDR") ignored=false if not isempty(boardid) then sql="select ignoreip from board where boa...
|如何|何验|验证|证I|IP|P地|地址|址?|?| -
网上考试设计思路是怎样的?
【编程10000问】global.asa < script LANGUAGE=VBScript RUNAT=Server >Sub Application_OnStart dbPath = "DBQ=" & Server.Mappath("onlinetest.mdb") dbConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; " & dbPath ...
|网上|上考|考试|试设|设计|计思|思路|路是|是怎|怎样|样的|的?|?| -
如何实现网上考试?
【编程10000问】login.asp' 考生验证.<%@ Language=VBScript%><%name=trim(request("name"))passwd=trim(request("passwd"))if name<>"" and passwd<>"" then' 检查考生是否输入用户名和密码.Set conn = Server.CreateObject("ADODB.Connection")conn.Open "driver={Microsoft Acces...
|如何|何实|实现|现网|网上|上考|考试|试?|?| -
用ASP+FSO生成JS文件
【ASP编程】复制代码 代码如下:<!--#include file="conn.asp"--> <% set js = server.CreateObject("ADODB.RecordSet") sql="select top 10 * from article order by id desc" set js =&...
用ASP+FSO生成JS文件 -
把无限级分类生成数组
【ASP编程】把无限级分类循环出来确实是一件头疼的事情。 比如,我们要循环出一个SELECT,或一个TABLE,要写一大堆判断。 有没好点的办法呢? 我的做法是生成数组,可以重复调用,直接循环数组就行了。 为了方便,我把它写成了类。 class.asp 返回所有分类的数组,并按顺序排列 有4个属性: 复制代码 代码如下:set aa=new&...
把无限级分类生成数组 -
Discuz! 4.x SQL injection / admin credentials disclosure exploit
【安全相关】前段时间发过Discuz! 5.0.0 GBK版本的EXP 今天在CN.Tink那里看到的4.x的,我去原站转了过来,然后找了个Discuz! 4.1.0测试了一下,成功,看下面截图,Discuz! 5.0.0 GBK版本的那个EXP又许多朋友不知道怎么用,当时我说了下,还是有朋友不明白,这次我截了图上来,不知道怎么用...
Discuz!4.xSQLinjection/admincredentialsdisclosureexploit