搜索列表
-
如何动态添加Form项？
【编程10000问】<%@ language = vbscript%><% Response.Expires = 0 %><html><head><title>星河影动之动态添加Form项</title></head><body><%If Request("Action") = "提交列表" ThenResponse.Write "<B>提交的项:</B><BR>"...
|如何|何动|动态|态添|添加|加F|Fo|or|rm|m项|项？|？| -
如何编写TOP 10之类的排行榜？
【编程10000问】<% @ LANGUAGE="VBscript" %><% OPTION EXPLICIT %><!--#include file="DataConn.asp"--><!--#include file="FuncSet.asp"--><% dim rs,sql,IDa,IDb,s,RegUser,a,b,c Set rs=Server.CreateObject("ADODB.recordset")&...
|如何|何编|编写|写T|TO|OP|P1|10|0之|之类|类的|的排|排行|行榜|榜？|？| -
如何把中文转换为UNICODE？
【编程10000问】<%function unicode(str)dim i,j,c,i1,i2,u,fs,f,punicode=""p=""for i=1 to len(str)c=mid(str,i,1)j=ascw(c)if j<0 thenj=j+65536end ifif j>=0 and j<=128 thenif p="c" thenunicode=" "&unicodep="e"end ifunicode=unicode&celseif p="e" thenunicode=unicode&" "p="c"end ifunicode...
|如何|何把|把中|中文|文转|转换|换为|为U|UN|NI|IC|CO|OD|DE|E？|？| -
如何把Recordset转换成彩色的XML文件
【编程10000问】<%@ codepage="65001" %><!-- #INCLUDE FILE="ADOVBS.INC" --><%Response.ContentType = "text/xml"' 如果不在 adovbs.inc 里,则设置一个常量. Set Con = Server.CreateObject( "ADODB.Connection" )Con.Open "Provider=sqloledb;UID=sa;DATABASE=...
|如何|何把|把R|Re|ec|co|or|rd|ds|se|et|t转|转换|换成|成彩|彩色|色的|的X|XM|ML|L文|文件|件| -
网上考试设计思路是怎样的？
【编程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动态生成的javascript表单验证代码
【ASP编程】以网上down了一个ASP动态生成Form验证javascript的代码，自己扩容了一下。作者的大名我给忘了，不过我记得清楚，从第一条至第九条的代码都是该作者的原创。至于九至第十五条却是本人自己加的哦。而且由于本人水平有限，从第九条至第十五条不见得会条条生效啊？呵呵，其实把它贴在这里没有什么必要的，因为这点小会伎俩谁都...
ASP动态生成的javascript表单验证代码 -
如何使用表单发送电子邮件？
【编程10000问】如何使用表单发送电子邮件？formToEmail.htm' 表单.<FORM METHOD="POST" ACTION="formToEmail.asp"> <P> 收件人: <INPUT SIZE=30 NAME="recipient" MAXLENGTH=200> <P> 发件人: <INPUT SIZE=30 NAME="sender" MAXLENG...
|如何|何使|使用|用表|表单|单发|发送|送电|电子|子邮|邮件|件？|？| -
如何制作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问】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' 读存...
|如何|何做|做一|一个|个计|计数|数器|器并|并让|让人|人家|家申|申请|请使|使用|用？|？|
