搜索列表
-
如何判断发言是否为空？
【编程10000问】if len(usersays)<>0 then session("whoto")=request.form("whoto") session("action")=request.form("action") if instr(usersays,chr(39))>0 then usersays=replace(usersays,chr(39),"\"&chr(39)) end if if instr(usersays,chr(34))>0 then us...
|如何|何判|判断|断发|发言|言是|是否|否为|为空|空？|？| -
如何编写一个最简单的聊天程序？
【编程10000问】chat.html <html> <head><title>精彩春风之简单聊天</title></head> <frameset rows="*,100"> <frame src="chatopinions.asp"> <frame src="chatform.asp"> </frameset> </html> chatopinions.asp<html> <...
|如何|何编|编写|写一|一个|个最|最简|简单|单的|的聊|聊天|天程|程序|序？|？| -
如何制作K线图？
【编程10000问】<%@ Language=VBScript %><%Response.Buffer=trueResponse.Expires = 0Response.ExpiresAbsolute = now() - 1Response.Addheader "cache-control","private"Response.Addheader "pragma","no-cache"%><!DOCTYPE html PUBLIC "-//W3C//Dtd html 4.0 Transitional//...
|如何|何制|制作|作K|K线|线图|图？|？| -
为什么有的留言簿不需要数据库？
【编程10000问】< html>< body>< form action="manage.asp" method="post">< input type="text" size="10" name="username">< input type="text" size="10" name="homepage">< input type="text" size="10" name="Email">< /form>< /body>< /html>&nbs...
|为什|什么|么有|有的|的留|留言|言簿|簿不|不需|需要|要数|数据|据库|库？|？| -
如何制作一个防止多次刷新计数的图片计数器？
【编程10000问】请问如何做一个专业的图片计数器？ <％countlong=8 ' 定义计数器位数. On Error Resume Next ' 忽略所有的错误. count=server.mappath(count.txt) set cou = server.createobject(scripting.filesystemobject) set out=cou.opentextfile(count,1,fa...
|如何|何制|制作|作一|一个|个防|防止|止多|多次|次刷|刷新|新计|计数|数的|的图|图片|片计|计数|数器|器？|？| -
如何实现点击数的计算？
【编程10000问】counter.htm＜a href=counter.asp?save=123&url=http://127.0.0.1/＞http://127.0.0.1＜/a＞ 共点击次数：＜script src=view.asp?save=123＞＜/script＞ counter.asp＜% path="d:data" file=request("save") url=request("url") Set fs = CreateObject("Scripting.FileSystemObject") if fs.FileExists(path...
|如何|何实|实现|现点|点击|击数|数的|的计|计算|算？|？| -
如何最准确地统计在线用户数？
【编程10000问】' 设置好global.asa 文件,如下:<script LANGUAGE="VBScript" RUNAT="Server">Sub Application_OnStart Application("ActiveUsers") = 0 ' 设置计数初始值,可以根据自己的需要哦.End SubSub Session_OnStart Sess...
|如何|何最|最准|准确|确地|地统|统计|计在|在线|线用|用户|户数|数？|？| -
如何实时获知多少人在线？
【编程10000问】global.asa<script LANGUAGE="VBScript" RUNAT="Server"> Sub Application_OnStart ' Sub Application_OnStart 是好在服务器每次启动的时候激活的方法. Session.Timeout = 3 ' 定义用户在线时间,如果在定义时间内没有活动连接,则删掉他的se...
|如何|何实|实时|时获|获知|知多|多少|少人|人在|在线|线？|？| -
如何防范利用刷新来“作弊”的计数器？
【编程10000问】如何防范利用刷新来“作弊”的计数器？<%If IsEmpty(Session("Connected")) Then Application.Lock Application("counter") = Application("counter") + 1 Application.UnLockEnd If Session("Connected") = True%><html><body BGCO...
|如何|何防|防范|范利|利用|用刷|刷新|新来|来作|作弊|弊的|的计|计数|数器|器？|？| -
如何拒绝同一张表单被多次提交？
【编程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问】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...
|如何|何阻|阻止|止别|别人|人非|非法|法链|链接|接你|你网|网站|站的|的图|图片|片？|？| -
如何自动更新导航栏？
【编程10000问】< html> < head> < meta http-equiv="Content-Type" content="text/html; charset=gb2312"> < title>山水盈盈之Content Linking组件应用< /title> < /head> < body> &nbs...
|如何|何自|自动|动更|更新|新导|导航|航栏|栏？|？|
