一些常用的輔助代碼 (網絡收藏)

 點擊返回上頁代碼:
<form>
<p><input TYPE="button" VALUE="返回上一步" ONCLICK="history.back(-1)"></p>
</form>

彈出警告框代碼:
<form>
<p><input TYPE="button" VALUE="彈出警告框" ONCLICK="AlertButton()"></p>
</form>
<script language="JavaScript"><!--
function AlertButton(){window.alert("要多多光臨呀!");}
// --></script>

點擊打開新窗口
<form>
<p><input TYPE="button" VALUE="打開新窗口" ONCLICK="NewWindow()"></p>
</form>
<script language="JavaScript"><!--
function NewWindow(){window.open("http://www.mcmx.com","","height=240,width=340,status=no,location=no,toolbar=no,directories=no,menubar=no");}
// --></script></body>

刪除記錄時彈出確認框:
<script LANGUAGE="VBSCRIPT">
a=msgbox("真的要刪除該記錄嗎?",1,"注意")
if a=1 then
location="Dodelete.asp?id=<%=id%>" //指向執行刪除的頁面Dodelete.asp
else
history.go(-1)
end if
</script>

關閉打開的窗口
< a href="/" οnclick="javascript:window.close(); return false;">關閉窗口</a>

清空INPUT且選定
onClick="Javascript:this.value=’’" onFocus="this.select()" onMouseOver="this.focus()"

右鍵屏蔽
<body οncοntextmenu=self.event.returnValue=false>

連串英文自動換行的解決方法 IE5.5
style="LEFT: 0px; WIDTH: 100%; WORD-WRAP: break-word" 你可修改爲指定的大小如 200px

圖片“重置”按鈕
<script language="jscript">
function myreset()
{ document.login.reset();
document.login.focus();}
</script>
<img src="image/reclear.gif" width="6Array" height="20" style="cursor:hand" οnfοcus="this.blur()" οnclick="myreset()"

畫細線表格
<table style="border-collapse: collapse">

狀態欄信息
<form>
<p><input TYPE="button" VALUE="狀態欄信息" ONCLICK="StatusButton()"></p>
</form>
<script language="JavaScript"><!--
function StatusButton(){window.status="要多多光臨呀!";}
// --></script>

最小化、最大化、關閉窗口
<object id=hh1 classid="clsid:ADB880A6-D8FF-11CF-Array377-00AA003B7A11">
<param name="Command" value="Minimize"></object>
<object id=hh2 classid="clsid:ADB880A6-D8FF-11CF-Array377-00AA003B7A11">
<param name="Command" value="Maximize"></object>
<OBJECT id=hh3 classid="clsid:adb880a6-d8ff-11cf-Array377-00aa003b7a11">
<PARAM NAME="Command" VALUE="Close"></OBJECT>

<input type=button value=最小化 οnclick=hh1.Click()>
<input type=button value=最大化 οnclick=hh2.Click()>
<input type=button value=關閉 οnclick=hh3.Click()>
本例適用於IE

隱藏狀態欄裏出現的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:Arraypt; width:188; overflow:auto" wrap=hard></textarea>

全選並複製
<FORM name=test><INPUT οnclick="javascript:HighlightAll(’test.select1’)" type=button value=全選並複製><BR><TEXTAREA name=select1 rows=3 cols=46>你好,歡迎您的光臨!</TEXTAREA>
</FORM>
<SCRIPT language=Javascript>
<!--

var copytoclip=1

function HighlightAll(theField) {
var tempval=eval("document."+theField)
tempval.focus()
tempval.select()
if (document.all&&copytoclip==1){
therange=tempval.createTextRange()
therange.execCommand("Copy")
window.status="Contents highlighted and copied to clipboard!"
setTimeout("window.status=’’",1800)
}
}
//-->
</SCRIPT>

屏蔽JAVASCRIPT錯誤
<script language="JavaScript">
<!--
function killErrors(){
return true;
}
window.onerror = killErrors;
-->
</script>

關閉子窗口時刷新父窗口

<script language="JavaScript">
<!--
self.opener.location.reload();
window.close()
-->
</script>

背景色變換
<form>
<p><input TYPE="button" VALUE="背景色變換" onClick="BgButton()"></p>
</form>
<script>function BgButton(){
if (document.bgColor==’#00ffff’)
{document.bgColor=’#ffffff’;}
else{document.bgColor=’#00ffff’;}
}
</script>

檢查一段字符串是否全由數字組成
<script language="Javascript"><!--
function checkNum(str){return str.match(//D/)==null}
alert(checkNum("1232142141"))
alert(checkNum("123214214a1"))
// --></script>

判斷是否是字符
if (/[^/x00-/xff]/g.test(s)) alert("含有漢字");

點擊刷新代碼:
<form>
<p><input TYPE="button" VALUE="刷新按鈕一" ONCLICK="ReloadButton()"></p>
</form>
<script language="JavaScript"><!--
function ReloadButton(){location.href="allbutton.htm";}
// --></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:Array5px;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:D27CDB6E-AE6D-11cf-Array6B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,2Array,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>

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-3Array4A-11d3-B153-00C04F7ArrayFAA6 VIEWASTEXT>
<PARAM 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="PlayCount" value="1">
<param name="PreviewMode" 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>

---------------------------------------------------------------
---------------------------------------------------------------
1.如何用Asp判斷你的網站的虛擬物理路徑
答:使用Mappath方法
< p align="center" >< font size="4" face="Arial" >< b >
The Physical path to this virtual website is:
< /b >< /font >
< font color="#FF0000" size="6" face="Arial" >
< %= Server.MapPath("\")% >
< /font >< /p >

2.我如何知道使用者所用的瀏覽器?
答:使用the Request object方法
strBrowser=Request.ServerVariables("HTTP_USER_AGENT")
If Instr(strBrowser,"MSIE") < > 0 Then
  Response.redirect("ForMSIEOnly.htm")
Else
  Response.redirect("ForAll.htm")
End If

3.如何計算每天的平均反覆訪問人數
答:解決方法
< % startdate=DateDiff("d",Now,"01/01/1ArrayArray0")
if strdate< 0 then startdate=startdate*-1
avgvpd=Int((usercnt)/startdate) % >
顯示結果
< % response.write(avgvpd) % >
that is it.this page have been viewed since November 10,1ArrayArray8

4.如何顯示隨機圖象
< % dim p,ppic,dpic
ppic=12
randomize
p=Int((ppic*rnd)+1)
dpic="graphix/randompics/"&p&".gif"
% >
顯示
< img src="< %=dpic% >" >

5.如何回到先前的頁面
答:< a href="< %=request.serverVariables("Http_REFERER")% >" >preivous page< /a >
或用圖片如:< img src="arrowback.gif" alt="< %=request.serverVariables("HTTP_REFERER")% >" >

6.如何確定對方的IP地址
答:< %=Request.serverVariables("REMOTE_ADDR)% >

7.如何鏈結到一副圖片上
答:< % @Languages=vbs cript % >
< % response.expires=0
strimagename="graphix/errors/erroriamge.gif"
response.redirect(strimagename)
% >

8.強迫輸入密碼對話框
答:把這句話放載頁面的開頭
< % response.status="401 not Authorized"
response.end
% >

Array.如何傳遞變量從一頁到另一頁
答:用 HIDDEN 類型來傳遞變量
< % form method="post" action="mynextpage.asp" >
< % for each item in request.form % >
< input namee="< %=item% >" type="HIDDEN"
value="< %=server.HTMLEncode(Request.form(item)) % >" >
< % next % >
< /form >

10.爲何我在 asp 程序內使用 msgbox,程序出錯說沒有權限
答:由於 asp 是服務器運行的,如果可以在服務器顯示一個對話框,那麼你只好等有人按了確定之後,你的程序才能繼續執行,而一般服務器不會有人守着,所以微軟不得不禁止這個函數,並胡亂告訴你 (:) 呵呵) 沒有權限。但是ASP和客戶端腳本結合倒可以顯示一個對話框,as follows:
< % yourVar="測試對話框"% >
< % s cript language=’javas cript’ >
alert("< %=yourvar% >")
< /s cript >

11.有沒有辦法保護自己的源代碼,不給人看到
答:可以去下載一個微軟的Windows s cript Encoder,它可以對asp的腳本和客戶端javas cript/vbs cript腳本進行加密。。。不過客戶端加密後,只有ie5才能執行,服務器端腳本加密後,只有服務器上安裝有s cript engine 5(裝一個ie5就有了)才能執行。

12.怎樣才能將 query string 從一個 asp 文件傳送到另一個?
答:前者文件加入下句: Response.Redirect("second.asp?" & Request.ServerVariables("QUERY_STRING"))

13.global.asa文件總是不起作用?
答:只有web目錄設置爲web application, global.asa纔有效,並且一個web application的根目錄下 global.asa纔有效。IIS4可以使用Internet Service Manager設置application setting 怎樣才能使得htm文件如同asp文件一樣可以執行腳本代碼?

14.怎樣才能使得htm文件如同asp文件一樣可以執行腳本代碼?
答:Internet Sevices Manager - > 選擇default web site - >右鼠鍵- >菜單屬性-〉主目錄- > 應用程序設置(Application Setting)- > 點擊按鈕 "配置"- > app mapping - >點擊按鈕"Add" - > executable browse選擇 \WINNT\SYSTEM32\INETSRV\ASP.DLL EXTENSION 輸入 htm method exclusions 輸入PUT.DELETE 全部確定即可。但是值得注意的是這樣對htm也要由asp.dll處理,效率將降低。

15.如何註冊組件

答:有兩種方法。
第一種方法:手工註冊 DLL 這種方法從IIs 3.0一直使用到IIs 4.0和其它的Web Server。它需要你在命令行方式下來執行,進入到包含有DLL的目錄,並輸入:regsvr32 component_name.dll 例如 c:\temp\regsvr32 AspEmail.dll 它會把dll的特定信息註冊入服務器中的註冊表中。然後這個組件就可以在服務器上使用了,但是這個方法有一個缺陷。當使用這種方法註冊完畢組件後,該組件必須要相應的設置NT的匿名帳號有權限執行這個dll。特別是一些組件需要讀取註冊表,所以,這個註冊組件的方法僅僅是使用在服務器上沒有MTS的情況下,要取消註冊這個dll,使用:regsvr32 /u aspobject.dll example c:\temp\regsvr32 /u aneiodbc.dll

第二種方法:使用MTS(Microsoft Transaction Server) MTS是IIS 4新增特色,但是它提供了巨大的改進。MTS允許你指定只有有特權的用戶才能夠訪問組件,大大提高了網站服務器上的安全性設置。在MTS上註冊組件的步驟如下:
1) 打開IIS管理控制檯。
2) 展開transaction server,右鍵單擊"pkgs installed"然後選擇"new package"。
3) 單擊"create an empty package"。
4) 給該包命名。
5) 指定administrator帳號或則使用"interactive"(如果服務器經常是使用administrator 登陸的話)。
6) 現在使用右鍵單擊你剛建立的那個包下面展開後的"components"。選擇 "new then component"。
7) 選擇 "install new component" 。
8) 找到你的.dll文件然後選擇next到完成。
要刪除這個對象,只要選擇它的圖標,然後選擇delete。
附註:特別要注意第二種方法,它是用來調試自己編寫組件的最好方法,而不必每次都需要重新啓動機器了。

16. ASP與Access數據庫連接:

<%@ language=VBs cript%>
<%
dim conn,mdbfile
mdbfile=server.mappath("數據庫名稱.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=數據庫密碼;dbq="&mdbfile

%>

17. ASP與SQL數據庫連接:


<%@ language=VBs cript%>
<%
dim conn
set conn=server.createobject("ADODB.connection")
con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服務器名稱或IP地址;UID=sa;PWD=數據庫密碼;DATABASE=數據庫名稱
%>

建立記錄集對象:

set rs=server.createobject("adodb.recordset")
rs.open SQL語句,conn,3,2

18. SQL常用命令使用方法: 

(1) 數據記錄篩選: 

sql="select * from 數據表 where 字段名=字段值 order by 字段名 [desc]" 

sql="select * from 數據表 where 字段名 like ’%字段值%’ order by 字段名 [desc]" 

sql="select top 10 * from 數據表 where 字段名 order by 字段名 [desc]" 

sql="select * from 數據表 where 字段名 in (’值1’,’值2’,’值3’)" 

sql="select * from 數據表 where 字段名 between 值1 and 值2" 

(2) 更新數據記錄: 

sql="update 數據表 set 字段名=字段值 where 條件表達式" 

sql="update 數據表 set 字段1=值1,字段2=值2 …… 字段n=值n where 條件表達式" 

(3) 刪除數據記錄: 

sql="delete from 數據表 where 條件表達式" 

sql="delete from 數據表" (將數據表所有記錄刪除) 

(4) 添加數據記錄: 

sql="insert into 數據表 (字段1,字段2,字段3 …) valuess (值1,值2,值3 …)" 

sql="insert into 目標數據表 select * from 源數據表" (把源數據表的記錄添加到目標數據表) 

(5) 數據記錄統計函數: 

AVG(字段名) 得出一個表格欄平均值 
COUNT(*|字段名) 對數據行數的統計或對某一欄有值的數據行數統計 
MAX(字段名) 取得一個表格欄最大的值 
MIN(字段名) 取得一個表格欄最小的值 
SUM(字段名) 把數據欄的值相加 

引用以上函數的方法: 

sql="select sum(字段名) as 別名 from 數據表 where 條件表達式" 
set rs=conn.excute(sql) 

用 rs("別名") 獲取統的計值,其它函數運用同上。 

(5) 數據表的建立和刪除: 

CREATE TABLE 數據表名稱(字段1 類型1(長度),字段2 類型2(長度) …… ) 

例:CREATE TABLE tab01(name varchar(50),datetime default now()) 

DROP TABLE 數據表名稱 (永久性刪除一個數據表) 

1Array. 記錄集對象的方法: 

rs.movenext 將記錄指針從當前的位置向下移一行 
rs.moveprevious 將記錄指針從當前的位置向上移一行 
rs.movefirst 將記錄指針移到數據表第一行 
rs.movelast 將記錄指針移到數據表最後一行 
rs.absoluteposition=N 將記錄指針移到數據表第N行 
rs.absolutepage=N 將記錄指針移到第N頁的第一行 
rs.pagesize=N 設置每頁爲N條記錄 
rs.pagecount 根據 pagesize 的設置返回總頁數 
rs.recordcount 返回記錄總數 
rs.bof 返回記錄指針是否超出數據表首端,true表示是,false爲否 
rs.eof 返回記錄指針是否超出數據表末端,true表示是,false爲否 
rs.delete 刪除當前記錄,但記錄指針不會向下移動 
rs.addnew 添加記錄到數據表末端 
rs.update 更新數據表記錄 

--------------------------------------- 

20 Recordset對象方法 

Open方法 

recordset.Open Source,ActiveConnection,CursorType,LockType,Options 

Source 
Recordset對象可以通過Source屬性來連接Command對象。Source參數可以是一個Command對象名稱、一段SQL命令、一個指定的數據表名稱或是一個Stored Procedure。假如省略這個參數,系統則採用Recordset對象的Source屬性。 

ActiveConnection 
Recordset對象可以通過ActiveConnection屬性來連接Connection對象。這裏的ActiveConnection可以是一個Connection對象或是一串包含數據庫連接信息(ConnectionString)的字符串參數。 

CursorType 
Recordset對象Open方法的CursorType參數表示將以什麼樣的遊標類型啓動數據,包括adOpenForwardOnly、adOpenKeyset、adOpenDynamic及adOpenStatic,分述如下: 
-------------------------------------------------------------- 
常數 常數值 說明 
------------------------------------------------------------- 
adOpenForwardOnly 0 缺省值,啓動一個只能向前移動的遊標(Forward Only)。 
adOpenKeyset 1 啓動一個Keyset類型的遊標。 
adOpenDynamic 2 啓動一個Dynamic類型的遊標。 
adOpenStatic 3 啓動一個Static類型的遊標。 
------------------------------------------------------------- 
以上幾個遊標類型將直接影響到Recordset對象所有的屬性和方法,以下列表說明他們之間的區別。 

------------------------------------------------------------- 
Recordset屬性 adOpenForwardOnly adOpenKeyset adOpenDynamic adOpenStatic 
------------------------------------------------------------- 
AbsolutePage 不支持 不支持 可讀寫 可讀寫 
AbsolutePosition 不支持 不支持 可讀寫 可讀寫 
ActiveConnection 可讀寫 可讀寫 可讀寫 可讀寫 
BOF 只讀 只讀 只讀 只讀 
Bookmark 不支持 不支持 可讀寫 可讀寫 
CacheSize 可讀寫 可讀寫 可讀寫 可讀寫 
CursorLocation 可讀寫 可讀寫 可讀寫 可讀寫 
CursorType 可讀寫 可讀寫 可讀寫 可讀寫 
EditMode 只讀 只讀 只讀 只讀 
EOF 只讀 只讀 只讀 只讀 
Filter 可讀寫 可讀寫 可讀寫 可讀寫 
LockType 可讀寫 可讀寫 可讀寫 可讀寫 
MarshalOptions 可讀寫 可讀寫 可讀寫 可讀寫 
MaxRecords 可讀寫 可讀寫 可讀寫 可讀寫 
PageCount 不支持 不支持 只讀 只讀 
PageSize 可讀寫 可讀寫 可讀寫 可讀寫 
RecordCount 不支持 不支持 只讀 只讀 
Source 可讀寫 可讀寫 可讀寫 可讀寫 
State 只讀 只讀 只讀 只讀 
Status 只讀 只讀 只讀 只讀 
AddNew 支持 支持 支持 支持 
CancelBatch 支持 支持 支持 支持 
CancelUpdate 支持 支持 支持 支持 
Clone 不支持 不支持 
Close 支持 支持 支持 支持 
Delete 支持 支持 支持 支持 
GetRows 支持 支持 支持 支持 
Move 不支持 支持 支持 支持 
MoveFirst 支持 支持 支持 支持 
MoveLast 不支持 支持 支持 支持 
MoveNext 支持 支持 支持 支持 
MovePrevious 不支持 支持 支持 支持 
NextRecordset 支持 支持 支持 支持 
Open 支持 支持 支持 支持 
Requery 支持 支持 支持 支持 
Resync 不支持 不支持 支持 支持 
Supports 支持 支持 支持 支持 
Update 支持 支持 支持 支持 
UpdateBatch 支持 支持 支持 支持 
-------------------------------------------------------------- 
其中NextRecordset方法並不適用於Microsoft Access數據庫。 

LockType 
Recordset對象Open方法的LockType參數表示要採用的Lock類型,如果忽略這個參數,那麼系統會以Recordset對象的LockType屬性爲預設值。LockType參數包含adLockReadOnly、adLockPrssimistic、adLockOptimistic及adLockBatchOptimistic等,分述如下: 

------------------------------------------------------------- 
常數 常數值 說明 
-------------------------------------------------------------- 
adLockReadOnly 1 缺省值,Recordset對象以只讀方式啓動,無法運行AddNew、Update及Delete等方法 
adLockPrssimistic 2 當數據源正在更新時,系統會暫時鎖住其他用戶的動作,以保持數據一致性。 
adLockOptimistic 3 當數據源正在更新時,系統並不會鎖住其他用戶的動作,其他用戶可以對數據進行增、刪、改的操作。 
adLockBatchOptimistic 4 當數據源正在更新時,其他用戶必須將CursorLocation屬性改爲adUdeClientBatch才能對數據進行增、 
刪、改的操作。

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章