搜索列表
-
如何防范利用刷新来“作弊”的计数器?
【编程10000问】如何防范利用刷新来“作弊”的计数器?<%If IsEmpty(Session("Connected")) Then Application.Lock Application("counter") = Application("counter") + 1 Application.UnLockEnd If Session("Connected") = True%><html><body BGCO...
|如何|何防|防范|范利|利用|用刷|刷新|新来|来作|作弊|弊的|的计|计数|数器|器?|?| -
不用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...
|如何|何拒|拒绝|绝同|同一|一张|张表|表单|单被|被多|多次|次提|提交|交?|?| -
如何制作一个Web日程安排表?
【编程10000问】chunfeng.asp' 该页面可以看到已安排了哪些事情,并在底部链接可按月前后翻动.' 该代码包含获得数据连接的函数,如果数据源一旦有变化,则只有一个位置需要编辑连接信息(服务器、用户和口令). <@ LANGUAGE="VBscript" ENABLESESSIONSTATE = False %> <% ' 表...
|如何|何制|制作|作一|一个|个W|We|eb|b日|日程|程安|安排|排表|表?|?| -
如何制作一个倒计时的程序?
【编程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页|页面|面?|?|