搜索列表
-
网上考试设计思路是怎样的?
【编程10000问】global.asa < script LANGUAGE=VBScript RUNAT=Server >Sub Application_OnStart dbPath = "DBQ=" & Server.Mappath("onlinetest.mdb") dbConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; " & dbPath ...
|网上|上考|考试|试设|设计|计思|思路|路是|是怎|怎样|样的|的?|?| -
如何实现网上考试?
【编程10000问】login.asp' 考生验证.<%@ Language=VBScript%><%name=trim(request("name"))passwd=trim(request("passwd"))if name<>"" and passwd<>"" then' 检查考生是否输入用户名和密码.Set conn = Server.CreateObject("ADODB.Connection")conn.Open "driver={Microsoft Acces...
|如何|何实|实现|现网|网上|上考|考试|试?|?| -
用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文件 -
如何使用表单发送电子邮件?
【编程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问】如何用变量实现群聊和悄悄话?<%if Request.Form("xt")="on" then ' 判断是否悄悄话.Application.Lock' 是悄悄话,继续往下处理.application(session("username"))=temppos&application(session("username"))' 只有发言人和发言对象才能看到此发言,实现悄悄话. application(Request.f...
|如何|何用|用变|变量|量实|实现|现群|群聊|聊和|和悄|悄悄|悄话|话?|?| -
如何判断电子邮件的地址格式是否正确?
【编程10000问】第一种办法:<% Function IsValidEmail(Email) ValidFlag = False If (Email <> "") And (InStr(1, Email, "@") > 0) And (InStr(1, Email, ".") > 0) Then atCount = 0 SpecialFlag = False For atLoop = 1 To Len(Email) atChr = Mid(Email, atLoop, 1) If atChr ...
|如何|何判|判断|断电|电子|子邮|邮件|件的|的地|地址|址格|格式|式是|是否|否正|正确|确?|?| -
如何判断用户是否非正常离开聊天室?
【编程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问】< 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问】第一步,创建一个计数器(最简单的数字计数器,不是图片式的): <% @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问】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问】<html><head><title>撼雪喷云之答复用户信息</title></head><body><form action="getdada.asp" method="get"><p>姓名:<input name="name" size="20"><br>电子邮件:<input name="e_mail" size="40"></p></form&g...
|如何|何用|用表|表单|单的|的方|方式|式推|推送|送请|请求|求的|的信|信息|息?|?|