搜索列表
-
冒泡算法的三种JavaScript表示
【ASP编程】以前学习冒泡算法，总是弄不清楚n和n-1等一些变量的关系，原因是没有弄明白它的真正含义，今天写了一个冒泡算法的JS小程序，终于弄明白了。复制代码 代码如下:var R1=new Array(); R1[1]=35; R1[2]=55; R1[3]=65; R1[4]=20; R1[5]=30; R1[6]=25; R1[7]=0; R1[8]=7; R1[9]=5; R1[10]=3; var R...
冒泡算法的三种JavaScript表示 -
获取远程flash并保存到本地
【ASP编程】复制代码 代码如下:<% '-------------------------------------------------------------- Dbname = "../data/flash.mdb" '更改数据库文件位置，强烈建议更改为.asp的文件！ Set Conn = Server....
获取远程flash并保存到本地 -
批量复制数据
【ASP编程】现有表Special和表view数据结构相同的两个表: 复制代码 代码如下:Special Specialid NClass name pic 1 &...
批量复制数据 -
如何验证日期输入是否正确？
【编程10000问】<%Option ExplicitDim strDate ' 记录输入的日期,字符型.Dim datDate ' 测试输入的日期是否正确,日期型.<html>%><head><title>千花飞舞之日期验证</title><meta http...
|如何|何验|验证|证日|日期|期输|输入|入是|是否|否正|正确|确？|？| -
如何实现某些页面只让特定的用户浏览？
【编程10000问】global.asp <script language=vbscript runat=server> sub Session_onstart session("register")="false" ' 记录用户成功登录的信息. session("lognumber")=0 ' 记录用户尝试登录的次数,最多允许尝试三次. session("prescript")="" ' 记录用户要访问的页面,以便登...
|如何|何实|实现|现某|某些|些页|页面|面只|只让|让特|特定|定的|的用|用户|户浏|浏览|览？|？| -
如何实现无组件上传二进制文件？
【编程10000问】<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library"--><% Dim objStream Set objStream = Server.CreateObject("ADODB.Stream") ' 创建一个Stre...
|如何|何实|实现|现无|无组|组件|件上|上传|传二|二进|进制|制文|文件|件？|？| -
如何制作一个文本文件编辑器？
【编程10000问】newdoc.asp<%@ Language=VBScript %><script id=DebugDirectives runat=server language=javascript>//Set these to true to enable debugging or tracing@set @debug=false@set @trace=false</script><html><head><META name=VI60_defaultClientScr...
|如何|何制|制作|作一|一个|个文|文本|本文|文件|件编|编辑|辑器|器？|？| -
如何创建Word文件？
【编程10000问】creatdoc.asp<!DOCTYPE html PUBLIC "-//W3C/Dtd html 3.2 Final//EN"><head><title>星河影动之创建Word文件</title><META HTTP-EQUIV="Refresh" CONTENT="30;URL='orderForm.asp'"></head><% dotLocatio...
|如何|何创|创建|建W|Wo|or|rd|d文|文件|件？|？| -
如何实现人民币的大写转换？
【编程10000问】第一个办法，这个程序可以进行万亿以下的货币金额转换（够用的了吧），其中汉字与数字均按一位计：Function AtoC(a As Currency) As String ' 定义两个字符串，A的值最多是两位小数. Dim String1 As String ' 如下定义. Dim String2 As String&...
|如何|何实|实现|现人|人民|民币|币的|的大|大写|写转|转换|换？|？| -
如何做一个文本搜索？
【编程10000问】<%head = "搜索"SearchString = Request("SearchString")count=0Function UnMapPath( Path ) UnMapPath = Replace(Mid(Path, Len(Server.MapPath("/")) + 1), "\", "/")' 把当前目录的实际路径转换为虚拟路径.End FunctionFunction SearchFile( f, s, title ) Set fo = f...
|如何|何做|做一|一个|个文|文本|本搜|搜索|索？|？| -
如何实现全文检索？
【编程10000问】<%@ LANGUAGE="VBscript" %> <html> <head> <meta NAME="GENERATOR" Content="Microsoft FrontPage 3.0"> <meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312-80"> <title>星河影动之全文检索...
|如何|何实|实现|现全|全文|文检|检索|索？|？| -
如何编写一个最简单的聊天程序？
【编程10000问】chat.html <html> <head><title>精彩春风之简单聊天</title></head> <frameset rows="*,100"> <frame src="chatopinions.asp"> <frame src="chatform.asp"> </frameset> </html> chatopinions.asp<html> <...
|如何|何编|编写|写一|一个|个最|最简|简单|单的|的聊|聊天|天程|程序|序？|？|
