搜索列表
-
不用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也|也能|能实|实现|现统|统计|计在|在线|线人|人数|数吗|吗?|?| -
如何拒绝同一张表单被多次提交?
【编程10000问】如何拒绝同一张表单被多次提交?formtest.asp' 表单文件.<%Randomize ' 初始化随机数种子.num1=rnd()' 产生随机数.num1=int(26*num1)+65 ' 修改num1的范围,使其是A-Z范围的Ascii码,防止表单名出错.session("antry")="test"&chr(num1) ' 产生随机字符串.%><form name="test" action="testact.a...
|如何|何拒|拒绝|绝同|同一|一张|张表|表单|单被|被多|多次|次提|提交|交?|?| -
如何制作一个倒计时的程序?
【编程10000问】<%CountdownDate = #1/1/2008 00:00:00AM#If Date >= CountdownDate Then Response.Write "2008 北京" Response.EndEnd IftheDate = NowDaysLeft = DateDiff("d",theDate,CountdownDate) - 1theDate =...
|如何|何制|制作|作一|一个|个倒|倒计|计时|时的|的程|程序|序?|?| -
禁止站外提交表单(author:killer)
【编程10000问】使用asp尽量减少服务器端的工作量,这样就应该多使用javascript,把所有提交字段使用javascript或vbscript检测后提交给服务器,这样服务器就不必再作检测,而在提交时可能会有人修改script从本地提交,这样存在安全提交的问题,所以应该要求从服务器断路径提交,其他地址提交提交无无效:<%server_v1=Cstr(Req...
|禁止|止站|站外|外提|提交|交表|表单|单a|au|ut|th|ho|or|rk|ki|il|ll|le|er|r| -
如何按时间显示最新标志
【编程10000问】<%mytime=rs("time") '数据库中保存时间nowtime=now() '当前时间if datediff("d",mytime,nowtime)<1 then '比较当前时间和数据库中时间,如相差小于1,即显示图片new.gif%><img src="images/new.gif"><%end if%>
|如何|何按|按时|时间|间显|显示|示最|最新|新标|标志|志| -
如何阻止别人非法链接你网站的图片?
【编程10000问】getimage.asp<% Option ExplicitDim strBuffer, FilePathstrBuffer = Request.ServerVariables("HTTP_REFERER")strBuffer = mid(strBuffer, InStr(strBuffer,".") + 1)strBuffer = left(strBuffer, InStr(strBuffer, "/") - 1)FilePath = "/HIDDENIMAGES/"If strBuffer = "i...
|如何|何阻|阻止|止别|别人|人非|非法|法链|链接|接你|你网|网站|站的|的图|图片|片?|?| -
如何在ASP里显示进度条?
【编程10000问】response.buffer=true' 应用缓存技术.dim lostnum' 防止dmax过大而dstep过小.dim shownumdelayshow(dstep,dmax)sub delayshow(dstep,dmax)' dmax表示要处理多少dmax(步)才能完成全过程,dstep表示已处理的占全过程的大致百分比. dim total ' 显示所有画面.dim dtemp ' 过渡变量.total=100dtemp=dstepdste...
|如何|何在|在A|AS|SP|P里|里显|显示|示进|进度|度条|条?|?| -
如何用ASP输出HTML文件?
【编程10000问】<!--#include file="top.inc"--><%u_title=request.form("u_title")' 检查标题是否被输入.if u_title = "" then%><form method="POST" action="<%= request.servervariables("script_name") %>"> <!--当没有标题输入时显示输入框--> <p>文件标题<...
|如何|何用|用A|AS|SP|P输|输出|出H|HT|TM|ML|L文|文件|件?|?| -
如何验证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地|地址|址?|?| -
如何修改被表单引用的ASP页面?
【编程10000问】formhandler.asp<html><body><%Dim RequestMethod RequestMethod = Request.ServerVariables("REQUEST_ METHOD") ' 获取REQUEST_METHOD的数值,并把它存入本地的变量中.当Web页面被表单标记的Action参数调用时,REQUESTMETHOD的数值为Post.其他时候, ...
|如何|何修|修改|改被|被表|表单|单引|引用|用的|的A|AS|SP|P页|页面|面?|?| -
如何显示最后十名来访者?
【编程10000问】<%Application.LockIF NOT isArray( Application( "lastTen" ) ) THEN DIM dummy( 10, 3 ) Application( "lastTen" ) = dummy' 创建或者取得最近10个Application数组.END IF lastTen = Application( "lastTen" )Application.UnLockIF lastTen( 9, 0 ) <> ...
|如何|何显|显示|示最|最后|后十|十名|名来|来访|访者|者?|?| -
如何显示数据库的结构?
【编程10000问】<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head><body bgcolor="#CCCCCC" text="#000000"><h2 align="center">星河影动之查看数据库结构</h2><p> <%on error resume nexttable=request("table")&...
|如何|何显|显示|示数|数据|据库|库的|的结|结构|构?|?|