搜索列表
-
ASP动态生成的javascript表单验证代码
【ASP编程】以网上down了一个ASP动态生成Form验证javascript的代码，自己扩容了一下。作者的大名我给忘了，不过我记得清楚，从第一条至第九条的代码都是该作者的原创。至于九至第十五条却是本人自己加的哦。而且由于本人水平有限，从第九条至第十五条不见得会条条生效啊？呵呵，其实把它贴在这里没有什么必要的，因为这点小会伎俩谁都...
ASP动态生成的javascript表单验证代码 -
如何用变量实现群聊和悄悄话？
【编程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 ...
|如何|何判|判断|断电|电子|子邮|邮件|件的|的地|地址|址格|格式|式是|是否|否正|正确|确？|？| -
如何制作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问】<% dim p,ppic,dpicppic=12randomizep=Int((ppic*rnd)+1)dpic="chunfeng/images/"&p&".gif"%> [1]
|如何|何使|使图|图象|象随|随机|机显|显示|示？|？| -
怎样获知数据库的连接属性？
【编程10000问】<%@ Language=VBScript %><% Option Explicit dim objCNN dim intCTProps dim item dim vbCRLF vbCRLF = chr(10) &n...
|怎样|样获|获知|知数|数据|据库|库的|的连|连接|接属|属性|性？|？| -
如何阻止别人非法链接你网站的图片？
【编程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...
|如何|何自|自动|动更|更新|新导|导航|航栏|栏？|？| -
如何在ASP里显示进度条？
【编程10000问】response.buffer=true' 应用缓存技术.dim lostnum' 防止dmax过大而dstep过小.dim shownumdelayshow(dstep,dmax)sub delayshow(dstep,dmax)' dmax表示要处理多少dmax(步)才能完成全过程，dstep表示已处理的占全过程的大致百分比. dim total ' 显示所有画面.dim dtemp ' 过渡变量.total=100dtemp=dstepdste...
|如何|何在|在A|AS|SP|P里|里显|显示|示进|进度|度条|条？|？| -
如何远程读取数据库页面？
【编程10000问】<%Set HttpObj = Server.CreateObject("AspHTTP.Conn")dim docnumdocnum = 101do while docnum <> 111 Response.Write docnumHTTPObj.Url = "http://www.intels.net/date.asp?songID="&docnumHttpObj.RequestMethod = "GET"strResult = HTTPObj.GetURLRes...
|如何|何远|远程|程读|读取|取数|数据|据库|库页|页面|面？|？| -
如何修改被表单引用的ASP页面？
【编程10000问】formhandler.asp<html><body><%Dim RequestMethod RequestMethod = Request.ServerVariables("REQUEST_ METHOD") ' 获取REQUEST_METHOD的数值,并把它存入本地的变量中.当Web页面被表单标记的Action参数调用时,REQUESTMETHOD的数值为Post.其他时候, ...
|如何|何修|修改|改被|被表|表单|单引|引用|用的|的A|AS|SP|P页|页面|面？|？| -
如何显示最后十名来访者？
【编程10000问】<%Application.LockIF NOT isArray( Application( "lastTen" ) ) THEN DIM dummy( 10, 3 ) Application( "lastTen" ) = dummy' 创建或者取得最近10个Application数组.END IF lastTen = Application( "lastTen" )Application.UnLockIF lastTen( 9, 0 ) <> ...
|如何|何显|显示|示最|最后|后十|十名|名来|来访|访者|者？|？|
