搜索列表
-
asp下载防盗链代码
【ASP编程】asp下载防盗链代码第一种: 终于对下载系统做了个防盗链措施，在下载的页面头部做了如下代码，相关代码如下： 复制代码 代码如下:<% From_url = Cstr(Request.ServerVariables("HTTP_REFERER")) Serv_url = Cstr(Request.Se...
asp下载防盗链代码 -
用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&...
把无限级分类生成数组 -
如何使用表单发送电子邮件？
【编程10000问】如何使用表单发送电子邮件？formToEmail.htm' 表单.<FORM METHOD="POST" ACTION="formToEmail.asp"> <P> 收件人: <INPUT SIZE=30 NAME="recipient" MAXLENGTH=200> <P> 发件人: <INPUT SIZE=30 NAME="sender" MAXLENG...
|如何|何使|使用|用表|表单|单发|发送|送电|电子|子邮|邮件|件？|？| -
如何编写一个最简单的聊天程序？
【编程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问】< 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问】global.asa<script LANGUAGE="VBScript" RUNAT="Server"> Sub Application_OnStartApplication("ActiveUsers") = 0' 从0开始计起.不过你可以把它设得更多哦,这样即使没人在线,人家一来你网站还会看到有900多人在线呢.End Sub Sub Session_OnStartSession.Timeout = 20' 把...
|统计|计在|在线|线人|人数|数是|是实|实时|时的|的吗|吗？|？| -
如何做一个计数器并让人家申请使用？
【编程10000问】第一步，创建一个计数器（最简单的数字计数器，不是图片式的）： <% @language="vbscript" %> <% set fsFilesys=CreateObject("Scripting.FileSystemObject") set myText=fsFilesys.OpenTextFile(Server.MapPath("/count")&"\count.txt")count=myText.ReadLine' 读存...
|如何|何做|做一|一个|个计|计数|数器|器并|并让|让人|人家|家申|申请|请使|使用|用？|？| -
如何制作一个防止多次刷新计数的图片计数器？
【编程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问】' 设置好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问】如何在网站中插播广告？首先，我们要写一个adrot.txt以调用：adrot.txtredirect width 550height 60border 0*images/chunfengad.gifhttp://www.shenzhaoyang.com欢迎访问闪亮日子之精彩春风！50' 显示百分比images/intelsad.gifhttp://www.intels.net欢迎访问随风起舞！50 然后，在要显示广告条的页面里添加下...
|如何|何在|在网|网站|站中|中插|插播|播广|广告|告？|？|
