搜索列表
-
如何用变量实现群聊和悄悄话？
【编程10000问】如何用变量实现群聊和悄悄话？<%if Request.Form("xt")="on" then ' 判断是否悄悄话.Application.Lock' 是悄悄话,继续往下处理.application(session("username"))=temppos&application(session("username"))' 只有发言人和发言对象才能看到此发言,实现悄悄话. application(Request.f...
|如何|何用|用变|变量|量实|实现|现群|群聊|聊和|和悄|悄悄|悄话|话？|？| -
如何判断用户是否非正常离开聊天室？
【编程10000问】如何判断用户是否非正常离开聊天室？ total = application("AllPeople")' 聊天总人数. aryHuman = split(total,";") for i = lbound(aryHuman) to ubound(aryHuman) - 1 if application("user" & i) = "online" then if int(timer)...
|如何|何判|判断|断用|用户|户是|是否|否非|非正|正常|常离|离开|开聊|聊天|天室|室？|？| -
如何判断发言是否为空？
【编程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> <...
|如何|何编|编写|写一|一个|个最|最简|简单|单的|的聊|聊天|天程|程序|序？|？| -
如何获知页面上的图象的实际尺寸？
【编程10000问】如何获知页面上的图象的实际尺寸？<!--#include virtual="/intels/chunfeng/graphicdetect.asp"--><html><head><title>千花飞舞之获知图像尺寸</title></head><body><% graphic="images/intels.gif" HW = ReadImg(graphic) Response...
|如何|何获|获知|知页|页面|面上|上的|的图|图象|象的|的实|实际|际尺|尺寸|寸？|？| -
如何把图片也存到数据库中去？
【编程10000问】showimage.aspChange the HTTP headerResponse.ContentType = "image/gif"Set cn = Server.CreateObject("ADODB.Connection")cn.Open "driver={SQL Server};server=.;UID=sa;PWD=;DATABASE=pubs"Set rs = cn.Execute("select logo from pub_info WHERE pub_id='0736'")Respons...
|如何|何把|把图|图片|片也|也存|存到|到数|数据|据库|库中|中去|去？|？| -
如何制作一个防止多次刷新计数的图片计数器？
【编程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问】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='"...
|如何|何用|用数|数据|据库|库制|制作|作一|一个|个多|多用|用户|户版|版的|的计|计数|数器|器？|？| -
如何实现点击数的计算？
【编程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问】如何让计数器只对新进用户计数？<script language=vbscript runat=server>sub application_onstartfilepath=server.mappath("/count")filename=filepath+"\counter.txt"set fs=createobject("scripting.filesystemobject")if not fs.fileexists(filename) then fs.createtextfile(filename) &...
|如何|何让|让计|计数|数器|器只|只对|对新|新进|进用|用户|户计|计数|数？|？| -
如何防止计数器刷新计数？
【编程10000问】如何防止计数器刷新计数？<html><head><title>千花飞舞之真实的计数器</title></head><body><%dim tms,counter,countlendim images(20)h1="<p> 千花飞舞计数器</font></p>"If IsEmpty(Session("hasbeenConnected")) thenset rs=server....
|如何|何防|防止|止计|计数|数器|器刷|刷新|新计|计数|数？|？| -
如何防范利用刷新来“作弊”的计数器？
【编程10000问】如何防范利用刷新来“作弊”的计数器？<%If IsEmpty(Session("Connected")) Then Application.Lock Application("counter") = Application("counter") + 1 Application.UnLockEnd If Session("Connected") = True%><html><body BGCO...
|如何|何防|防范|范利|利用|用刷|刷新|新来|来作|作弊|弊的|的计|计数|数器|器？|？|
