[转帖]ASP编程常用的代码

翔羽 · 发表于 2006-2-24 09:11:12

隐藏状态栏里出现的LINK信息 <a href="http://"; onMouseOver="window.status='none';return true">梦想天空</a> 文本框自动滚动条 <textarea name=words rows=18 cols=26 style="border:1 solid #000000;background-color:white; font-size:9pt; width:188; overflow:auto" wrap=hard></textarea>全选并复制 <FORM name=test><INPUT onclick="javascript:HighlightAll('test.select1')" type=button value=全选并复制> <TEXTAREA name=select1 rows=3 cols=46>你好，欢迎您的光临！</TEXTAREA> </FORM> <SCRIPT language=Javascript>  </SCRIPT>屏蔽JAVASCRIPT错误 <script language="JavaScript">  </script> 关闭子窗口时刷新父窗口 <script language="JavaScript">  </script> 背景色变换 <form> <input TYPE="button" VALUE="背景色变换" onClick="BgButton()"> </form> <script>function BgButton(){ if (document.bgColor=='#00ffff') {document.bgColor='#ffffff';} else{document.bgColor='#00ffff';} } </script>

翔羽 · 发表于 2006-2-24 09:11:24

检查一段字符串是否全由数字组成 <script language="Javascript"></script> 判断是否是字符 if (/[^/x00-/xff]/g.test(s)) alert("含有汉字"); 点击刷新代码: <form> <input TYPE="button" VALUE="刷新按钮一" ONCLICK="ReloadButton()"> </form> <script language="JavaScript"></script>让层不被控件复盖代码: <div z-Index:2><object xxx></object></div> ＃前面 <div z-Index:1><object xxx></object></div> ＃后面 <div id="Layer2" style="position:absolute; top:40;width:400px; height:95px;z-index:2"><table height=100% width=100% bgcolor="#ff0000"><tr><td height=100% width=100%></td></tr></table><iframe width=0 height=0></iframe></div> <div id="Layer1" style="position:absolute; top:50;width:200px; height:115px;z-index:1"><iframe height=100% width=100%></iframe></div> 让层的相对定位 <div id="Layer1" style="position:relative; left:0px; top:0px; width:0px; height:0px;z-index:1"> <div id="Layer2" style="position:absolute; left:500px; top:0px; width:220px; height:220px; z-index:1"> 内容 </div></div>Flash代码以及背景透明 <object classid="clsid

27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="200" height="200"> <param name="movie" value="文件"> <param name="quality" value="high"> <param name="wmode" value="transparent"> <embed src="images/fish.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="220" height="220"></embed></object>

翔羽 · 发表于 2006-2-24 09:11:47

Windows Media Player 播放器 <OBJECT id=MediaPlayer1 style="LEFT: 0px; VISIBILITY: visible; POSITION: absolute; TOP: 0px;z-index:2" codeBase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701standby=Loading type=application/x-oleobject height=300 width=320 classid=CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6 VIEWASTEXT> &lt

ARAM NAME="URL" VALUE="地址"><param name="AudioStream" value="-1"> <param name="AutoSize" value="0"> <param name="AutoStart" value="-1"> <param name="AnimationAtStart" value="0"> <param name="AllowScan" value="-1"> <param name="AllowChangeDisplaySize" value="-1"> <param name="AutoRewind" value="0"> <param name="Balance" value="0"> <param name="BaseURL" value> <param name="BufferingTime" value="5"> <param name="CaptioningID" value> <param name="ClickToPlay" value="-1"> <param name="CursorType" value="0"> <param name="CurrentPosition" value="-1"> <param name="CurrentMarker" value="0"> <param name="DefaultFrame" value> <param name="DisplayBackColor" value="0"> <param name="DisplayForeColor" value="16777215"> <param name="DisplayMode" value="0"> <param name="DisplaySize" value="4"> <param name="Enabled" value="-1"> <param name="EnableContextMenu" value="-1"> <param name="EnablePositionControls" value="0"> <param name="EnableFullScreenControls" value="0"> <param name="EnableTracker" value="-1"> <param name="InvokeURLs" value="-1"> <param name="Language" value="-1"> <param name="Mute" value="0"> <param name="

layCount" value="1"> <param name="

reviewMode" value="0"> <param name="Rate" value="1"> <param name="SAMILang" value> <param name="SAMIStyle" value> <param name="SAMIFileName" value> <param name="SelectionStart" value="-1"> <param name="SelectionEnd" value="-1"> <param name="SendOpenStateChangeEvents" value="-1"> <param name="SendWarningEvents" value="-1"> <param name="SendErrorEvents" value="-1"> <param name="SendKeyboardEvents" value="0"> <param name="SendMouseClickEvents" value="0"> <param name="SendMouseMoveEvents" value="0"> <param name="SendPlayStateChangeEvents" value="-1"> <param name="ShowCaptioning" value="0"> <param name="ShowControls" value="-1"> <param name="ShowAudioControls" value="-1"> <param name="ShowDisplay" value="0"> <param name="ShowGotoBar" value="0"> <param name="ShowPositionControls" value="-1"> <param name="ShowStatusBar" value="-1"> <param name="ShowTracker" value="-1"> <param name="TransparentAtStart" value="-1"> <param name="VideoBorderWidth" value="0"> <param name="VideoBorderColor" value="0"> <param name="VideoBorder3D" value="0"> <param name="Volume" value="70"> <param name="WindowlessVideo" value="0"> </OBJECT> RealPlayer 播放器 <object id=video1 classid=" clasid:CFCDAA03-8BE4-11CF-B84B-0020AFBBCCFA" width=320 height=240 align="middle"> <param name="controls" value="inagewindow"> <param name="console" value="chicp1"> <param name="autostar" value="true"> <param name="src" value="地址"> <embed src="地址" type="audio/x-pn-realaudio-plugin" console="chip1" controls="imagewindow" width=320 height=240 autostart=true align="middle"> </embed> </object>

翔羽 · 发表于 2006-2-24 09:12:30

1.函数 array() 功能:创建一个数组变量 格式:array(list) 参数:list 为数组变量中的每个数值列,中间用逗号间隔 例子: 结果: i 被赋予为数组2.函数 Cint() 功能:将一表达式/其它类型的变量转换成整数类型(int) 格式:Cint(expression) 参数:expression 是任何有效的表达式/其它类型的变量 例子: 　　 结果: 236 函数Cint()将字符"234"转换成整数234.如果表达式为空, 或者无效时,返回值为0;3.函数: Creatobject() 功能:创建及返回一个ActiveX对象. 格式:Creatobject(obname) 参数

bname 是对象的名称 例子: 　　 结果: 4.函数 Cstr() 功能:将一表达式/其它类型的变量转换成字符类型(string) 格式:Cstr(expression) 参数:expression是任何有效的表达式/其它类型的变量 例子: 　　 结果:函数Cstr()将整数 5 转换成字符"5".5.函数 Date() 功能:返回当前系统(server端)的日期 格式

ate() 参数:无 例子: 结果:05/10/006.函数 Dateadd() 功能:计算某个指定的时间和 格式:dateadd(timeinterval,number,date) 参数:timeinterval是时间单位(月,日..); number是时间间隔值,date是时间始点. 例子: 　　 结果: 11/4/99 3:34:45 PM 其中 "m" = "month"; "d" = "day"; 如果是currentDate 格式,则, "h" = "hour"; "s" = "second";　7.函数 Datediff() 功能:计算某量个指定的时间差 格式:datediff(timeinterval,date1,date2[,firstdayofweek[,firstdayofyear]]) 参数:timeinterval 是时间单位; date1,date2是有效的日期表达式,firstdayofweek,firstdayofyear 是任意选项. 例子: 　　 结果:There are 150 days to millenium from 8/4/99.　8.函数 day() 功能:返回一个整数值,对应于某月的某日 格式:day(date) 参数:date是一个有效的日期表达式; 例子: 结果:49.函数 formatcurrency() 功能:转换成货币格式 格式:formatcurrency(expression [,digit[,leadingdigit[,paren[,groupdigit]]]]) 参数:expression 是有效的数字表达式;digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项. 例子: 结果

34.35

翔羽 · 发表于 2006-2-24 09:12:48

10.函数 Formatdatetime() 功能:格式化日期表达式/变量 格式:formatdatetime(date[,nameformat]) 参数:date为有效的日期表达式/变量;nameformat是指定的日期格式常量名称. 例子: 结果:Wednesday,August 04,1999 11.函数 formatnumber() 功能:格式化数字表达式/变量 格式:formatnumbe(expression [,digit[,leadingdigit[,paren[,groupdigit]]]]) 参数:express为有效的数字表达式, digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项 例子: 　　 结果: 23.22212.函数 formatpercent() 功能:格式化百分数表达式/变量 格式:formatnumber(expression [,digit [,leading [,paren[,groupdigit]]]]) 参数:expression 是有效的数字表达式,digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项 例子: 　　 结果: 45.23313.函数: hour() 功能:返回一个数值,对应于的指定时间. 格式:hour(time) 参数:time对应于的指定时间. 例子: 　　 结果:16 (24 小时制)14.函数 instr() 功能:返回一个数值,对应于某字符(串)在另一字符串中的位置. 格式:instr([start,]strtobesearched,strsearchfor [,compare]) 参数:start(任选)是从第start位寻找,strtobesearched 是被搜索的字符串,strsearchfor是被寻找的目标.compare是任意选项 例子: 　　 结果:9,(字符"a"在strtext字符串的第九位)15.函数 instrrev() 功能:返回一个数值,对应于某字符(串)在另一字符串中的位置(从后面起开始寻找). 格式:instrrev([start,] strtobesearched,strsearchfor[,compare]) 参数:参考 instr(), 例子: 结果:13, 字串"s"是strtext的第13个字符(从后面起开始寻找)16.函数 int() 功能:数字取整 格式:int(number) 参数:number 是任何有效的数字表达式/其它类型的变量 例子: 结果:322 (如果用Cint()则结果是323) 17.函数 isarray() 功能:返回一个布尔值,判断变量是否为数组. 格式: isarray(name) 参数:name是变量名称 例子: 　　 结果:false18.函数 isdate() 功能:返回一个布尔值,判断变量是否为日期变量. 格式:isdate(expression) 参数:expression 是任意的变量. 例子: 结果:true19.函数 isempty() 功能:返回一个布尔值,判断变量是否为空. 格式:isempty(expression) 参数:expression 是任意的变量. 例子: 结果:true

翔羽 · 发表于 2006-2-24 09:13:02

20.函数 isnull() 功能:返回一个布尔值,判断变量是否包含非法的数据. 格式:isnull(expression) 参数:expression 是任意的变量. 例子: 结果:false21.函数 Isnumeric() 功能:返回一个布尔值,判断变量是否为数字变量,或者是可以转换成数字的其它变量. 格式:isnumeric(expression) 参数:expression 是任意的变量. 例子: 　　 结果: true.22.函数 Isobject() 功能:返回一个布尔值,判断变量是否为对象的变量, 格式:isobject(expression) 参数:expression 是任意的变量. 例子: 　　 结果: true23.函数: Lbound() 功能:返回一个数组的下界. 格式

bound(arrayname[,dimension]) 参数:arrayname 是数组变量,dimension 是任意项 例子: 　　 结果:0 24.函数 Lcase() 功能:将一字符类型变量的字符全部变换小写字符. 格式

case(string) 参数:string是字串变量 例子: 　　 结果:this is lcase!25.函数 left() 功能:截取一个字符串的前部分; 格式:left(string,length) 参数:string字符串,length截取的长度. 例子: 结果:this i26.函数 len() 功能:返回字符串长度或者变量的字节长度 格式:len(string |varname) 参数:string字符串;varname任意的变量名称 例子: 结果:1527.函数 ltrim() 功能:去掉字符串前的空格. 格式:ltrim(string) 参数:string 字串. 例子: 结果:Today29.函数 minute() 功能:返回一数值, 表示分钟 格式:minute(time) 参数: time是时间变量 例子: 结果:23

翔羽 · 发表于 2006-2-24 09:13:31

30.函数 month() 功能:返回一数值, 表示月份 格式:month(time) 参数:time是日期变量 例子: 结果:931.函数 monthname() 功能:返回月份的字符串(名称). 格式:Monthname(date [,abb]) 参数:date是日期变量,abb=true时则月份的缩写, 例子: 　　 结果:April 32.函数 Now() 功能:返回系统的当前时间和日期. 格式:now() 参数:无 例子: 　　 结果: 05/10/00 8:45:32 pm33.函数: replace() 功能:在字串中查找,替代指定的字串. 格式:replace(strtobesearched,strsearchfor,strreplacewith [,start[,count[,compare]]]) 参数:strtobesearched是字串; strsearchfor是被查找的子字串;strreplacewith 是用来替代的子字串.start,count,compare 是任意选项. 例子: 　　 结果:this is an orange.34.函数 right() 功能:截取一个字符串的后部分 格式:right(string,length) 参数:string字符串,length截取的长度. 例子: 　　 结果:st!35.函数 rnd() 功能:返回一个随机数值 格式:rnd[(number)] 参数:number是任意数值. 例子: 结果:0/1数值之一,无randomize(), 则不能产生随机数. 36.函数round() 功能:完整数值 格式:round(expression[,numright]) 参数:expression数字表达式;numright任意选项. 例子: 结果: 12 37.函数 rtrim() 功能:去掉字符串后的空格. 格式:rtrim(string) 参数:string 是字串 例子: 　　 结果:this is a test!38.函数 second() 功能:返回一个整数值. 格式:second(time) 参数:time是一个有效的时间表达式; 例子: 结果:30

翔羽 · 发表于 2006-2-24 09:14:36

39.函数 strReverse() 功能:返回与原字串排列逆向的字串. 格式:strreverse(string) 参数:string是字串 例子:<hr/>下面为带例子的：Array() FUNCTION: 返回一个数组 SYNTAX: Array(list) ARGUMENTS: 字符，数字均可 EXAMPLE: <% Dim myArray() For i = 1 to 7 Redim Preserve myArray(i) myArray(i) = WeekdayName(i) Next %> RESULT: 建立了一个包含7个元素的数组myArray myArray("Sunday","Monday", ... ... "Saturday") CInt() FUNCTION: 将一个表达式转化为数字类型 SYNTAX: CInt(expression) ARGUMENTS: 任何有效的字符均可 EXAMPLE: <% f = "234" response.write cINT(f) + 2 %> RESULT: 236 转化字符"234"为数字"234"，如果字符串为空，则返回0值 CreateObject() FUNCTION: 建立和返回一个已注册的ACTIVEX组件的实例。 SYNTAX: CreateObject(objName) ARGUMENTS: objName 是任何一个有效、已注册的ACTIVEX组件的名字. EXAMPLE: <% Set con = Server.CreateObject("ADODB.Connection") %> RESULT: CStr() FUNCTION: 转化一个表达式为字符串. SYNTAX: CStr(expression) ARGUMENTS: expression 是任何有效的表达式。 EXAMPLE: <% s = 3 + 2 response.write "The result is: " & cStr(s) %> RESULT: 转化数字“5”为字符“5”。 Date() FUNCTION: 返回当前系统日期. SYNTAX: Date() ARGUMENTS: None. EXAMPLE: <%=Date%> RESULT: 8/4/99 DateAdd() FUNCTION: 返回一个被改变了的日期。 SYNTAX: DateAdd(timeinterval,number,date) ARGUMENTS: timeinterval is the time interval to add; number is amount of time intervals to add; and date is the starting date. EXAMPLE: <% currentDate = #8/4/99# newDate = DateAdd("m",3,currentDate) response.write newDate %><% currentDate = #12:34:45 PM# newDate = DateAdd("h",3,currentDate) response.write newDate %> RESULT: 11/4/99 3:34:45 PM"m" = "month"; "d" = "day";If currentDate is in time format then, "h" = "hour"; "s" = "second"; DateDiff() FUNCTION: 返回两个日期之间的差值。 SYNTAX: DateDiff(timeinterval,date1,date2 [, firstdayofweek ][, firstweekofyear]]) ARGUMENTS: timeinterval 表示相隔时间的类型，如“M“表示“月”。 EXAMPLE: <% fromDate = #8/4/99# toDate = #1/1/2000# response.write "There are " & _ DateDiff("d",fromDate,toDate) & _ " days to millenium from 8/4/99." %> RESULT: 从8/4/99 到2000年还有 150 天. Day() FUNCTION: 返回一个月的第几日 . SYNTAX: Day(date) ARGUMENTS: date 是任何有效的日期。 EXAMPLE: <%=Day(#8/4/99#)%> RESULT: 4 FormatCurrency() FUNCTION: 返回表达式，此表达式已被格式化为货币值 SYNTAX: FormatCurrency(Expression [, Digit ][, LeadingDigit ][, Paren ][, GroupDigit]]]]) ARGUMENTS: Digit 指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是 计算机的区域设置; LeadingDigit 三态常数，指示是否显示小数值小数点前面的 零。 EXAMPLE: <%=FormatCurrency(34.3456)%> RESULT: $34.35 FormatDateTime() FUNCTION: 返回表达式，此表达式已被格式化为日期或时间 SYNTAX: FormatDateTime(Date, [, NamedFormat]) ARGUMENTS: NamedFormat 指示所使用的日期/时间格式的数值，如果省略，则使用 vbGeneralDate. EXAMPLE: <%=FormatDateTime("08/4/99", vbLongDate)%> RESULT: Wednesday, August 04, 1999

翔羽 · 发表于 2006-2-24 09:14:55

FormatNumber() FUNCTION: 返回表达式，此表达式已被格式化为数值. SYNTAX: FormatNumber(Expression [, Digit ][, LeadingDigit ][, Paren ][, GroupDigit]]]]) ARGUMENTS: Digit 指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是 计算机的区域设置。; LeadingDigit i指示小数点右侧显示位数的数值。默认值为 - 1，指示使用的是计算机的区域设置。; Paren 指示小数点右侧显示位数的数值。默认 值为 -1，指示使用的是计算机的区域设置。; GroupDigit i指示小数点右侧显示位数 的数值。默认值为 -1，指示使用的是计算机的区域设置。. EXAMPLE: <%=FormatNumber(45.324567, 3)%> RESULT: 45.325 FormatPercent() FUNCTION: 返回表达式，此表达式已被格式化为尾随有 % 符号的百分比（乘以 100 ）。 (%) SYNTAX: FormatPercent(Expression [, Digit ][, LeadingDigit ][, Paren ][, GroupDigit]]]]) ARGUMENTS: 同上. EXAMPLE: <%=FormatPercent(0.45267, 3)%> RESULT: 45.267% Hour() FUNCTION: 以24时返回小时数. SYNTAX: Hour(time) ARGUMENTS: EXAMPLE: <%=Hour(#4:45:34 PM#)%> RESULT: 16 (Hour has been converted to 24-hour system) Instr() FUNCTION: 返回字符或字符串在另一个字符串中第一次出现的位置. SYNTAX: Instr([start, ] strToBeSearched, strSearchFor [, compare]) ARGUMENTS: Start为搜索的起始值，strToBeSearched接受搜索的字符串 strSearchFor要搜索的字符.compare比较方式（详细见ASP常数） EXAMPLE: <% strText = "This is a test!!" pos = Instr(strText, "a") response.write pos %> RESULT: 9 InstrRev() FUNCTION: 同上，只是从字符串的最后一个搜索起 SYNTAX: InstrRev([start, ] strToBeSearched, strSearchFor [, compare]) ARGUMENTS: 同上. EXAMPLE: <% strText = "This is a test!!" pos = InstrRev(strText, "s") response.write pos %> RESULT: 13 Int() FUNCTION: 返回数值类型,不四舍五入，注意取值是不大于它的整数。 SYNTAX: Int(number) ARGUMENTS: EXAMPLE: <%=INT(32.89)%> <%=int(-3.33)%> RESULT: 32 -4 IsArray() FUNCTION: 判断一对象是否为数组，返回布尔值 . SYNTAX: IsArray(name) ARGUMENTS: EXAMPLE: <% strTest = "Test!" response.write IsArray(strTest) %> RESULT: False IsDate() FUNCTION: 判断一对象是否为日期，返回布尔值 SYNTAX: IsDate(expression) ARGUMENTS: expression is any valid expression. EXAMPLE: <% strTest = "8/4/99" response.write IsDate(strTest) %> RESULT: True IsEmpty() FUNCTION: 判断一对象是否初始化，返回布尔值. SYNTAX: IsEmpty(expression) ARGUMENTS: EXAMPLE: <% Dim i response.write IsEmpty(i) %> RESULT: True

翔羽 · 发表于 2006-2-24 09:15:10

IsNull() FUNCTION: 判断一对象是否为空，返回布尔值. SYNTAX: IsNull(expression) ARGUMENTS: EXAMPLE: <% Dim i response.write IsNull(i) %> RESULT: False IsNumeric() FUNCTION: 判断一对象是否为数字，返回布尔值. SYNTAX: IsNumeric(expression) ARGUMENTS: EXAMPLE: <% i = "345" response.write IsNumeric(i) %> RESULT: True 就算数字加了引号，ASP还是认为它是数字。 IsObject() FUNCTION: 判断一对象是否为对象，返回布尔值. SYNTAX: IsObject(expression) ARGUMENTS: EXAMPLE: <% Set con = Server.CreateObject("ADODB.Connection") response.write IsObject(con) %> RESULT: True LBound() FUNCTION: 返回指定数组维的最小可用下标. SYNTAX: Lbound(arrayname [, dimension]) ARGUMENTS: ; dimension 指明要返回哪一维下界的整数。使用 1 表示第一维，2 表示第二维，以此类推。如果省略 dimension 参数，默认值为 1. EXAMPLE: <% i = Array("Monday","Tuesday","Wednesday") response.write LBound(i) %> RESULT: 0 LCase() FUNCTION: 返回字符串的小写形式 SYNTAX: Lcase(string) ARGUMENTS: string is any valid string expression. EXAMPLE: <% strTest = "This is a test!" response.write LCase(strTest) %> RESULT: this is a test! Left() FUNCTION: 返回字符串左边第length个字符以前的字符（含第length个字符). SYNTAX: Left(string, length) ARGUMENTS: EXAMPLE: <% strTest = "This is a test!" response.write Left(strTest, 3) %> RESULT: Thi Len() FUNCTION: 返回字符串的长度. SYNTAX: Len(string | varName) ARGUMENTS: EXAMPLE: <% strTest = "This is a test!" response.write Len(strTest) %> RESULT: 15 LTrim() FUNCTION: 去掉字符串左边的空格. SYNTAX: LTrim(string) ARGUMENTS: EXAMPLE: <% strTest = " This is a test!" response.write LTrim(strTest) %> RESULT: This is a test!

帐号		自动登录	找回密码
密码			马上注册



软考应考经验分享交流	IT项目管理师电子资料	系分·项管·信工·必读	会声会影下载
IT项管考前一个月复习安排	分享历届IT项管真题答案	历年软考分数线大全	IT项目管理新手看什么书？
清华、电工教材比较	国家信息技术紧缺人才	哪些软考证书可以挂靠?	项目管理发展史
信息系统项目管理师挂靠一年多少钱？	信息系统项目管理师考试费用及收费依据（汇总）

[转帖]ASP编程常用的代码

浏览过的版块