asp實(shí)現(xiàn)圖片右鍵滑輪控制大小的函數(shù)
更新時(shí)間：2007年08月08日 11:59:13 作者：
<%
'******************************
'函數(shù)：bbimg(l1,maximgheight,maximgwidth)
'參數(shù)：l1,圖片路徑；maximgheight,最大允許圖片高度；maximgwidth,最大允許圖片寬度
'作者：阿里西西
'日期：2007/7/12
'描述：限制頁(yè)面圖片的最大高度和寬度
'示例：<%=bbimg("alixixi.gif",300,100)%>
'******************************
function bbimg(l1,maximgheight,maximgwidth)
dim l2,I2:l2=l1
set I2=new regexp
I2.global=true
I2.ignorecase=true
I2.pattern="<img.[^>]*(src="".[^>]+?"").[^>]*>"
l2=I2.replace(l2,"<img $1 onload=""javascript:if(this.width>"&maximgwidth&")this.style.width="&maximgwidth&"; if(this.height>"&maximgheight&")this.style.width=(this.width*"&maximgheight&")/this.height;"" />")
bbimg=l2
set I2=nothing
end function
%>
'******************************
'函數(shù)：bbimg(l1,maximgheight,maximgwidth)
'參數(shù)：l1,圖片路徑；maximgheight,最大允許圖片高度；maximgwidth,最大允許圖片寬度
'作者：阿里西西
'日期：2007/7/12
'描述：限制頁(yè)面圖片的最大高度和寬度
'示例：<%=bbimg("alixixi.gif",300,100)%>
'******************************
function bbimg(l1,maximgheight,maximgwidth)
dim l2,I2:l2=l1
set I2=new regexp
I2.global=true
I2.ignorecase=true
I2.pattern="<img.[^>]*(src="".[^>]+?"").[^>]*>"
l2=I2.replace(l2,"<img $1 onload=""javascript:if(this.width>"&maximgwidth&")this.style.width="&maximgwidth&"; if(this.height>"&maximgheight&")this.style.width=(this.width*"&maximgheight&")/this.height;"" />")
bbimg=l2
set I2=nothing
end function
%>
相關(guān)文章
asp下多個(gè)域名后綴同時(shí)查詢的域名查詢系統(tǒng)
asp下多個(gè)域名后綴同時(shí)查詢的域名查詢系統(tǒng)...2007-03-03
AJAX簡(jiǎn)單應(yīng)用實(shí)例-彈出層
AJAX的簡(jiǎn)單應(yīng)用,包括js彈出DIV層、層拖動(dòng)、ajax后臺(tái)讀取數(shù)據(jù)！注意getinfo.asp文件是以u(píng)tf-8格式保存的，在getinfo.asp里面可以寫(xiě)讀數(shù)據(jù)庫(kù)代碼！2008-08-08
asp取整數(shù)mod 有小數(shù)的就自動(dòng)加1
這篇文章主要介紹了asp取整數(shù)mod 有小數(shù)的就自動(dòng)加1,需要的朋友可以參考下2021-04-04
不管什么語(yǔ)言亂碼問(wèn)題都存在，asp也不例外，本文將介紹asp中解決亂碼方法,需要的朋友可以參考下2012-12-12
asp ajax注冊(cè)驗(yàn)證之 防止用戶名輸入空格
注冊(cè)驗(yàn)證之防止用戶名輸入空格,asp批量替換特殊字符函數(shù)代碼2009-08-08
asp下對(duì)POST提交數(shù)據(jù)限制的解決方法
由于微軟對(duì)POST提交數(shù)據(jù)的大小進(jìn)行了限制，當(dāng)表單發(fā)送的數(shù)據(jù)量很大時(shí)，就會(huì)報(bào)錯(cuò)(錯(cuò)誤 "ASP 0107 : 80004005")。原因是微軟對(duì)用Request.Form()可接收的最大數(shù)據(jù)限制為100K字節(jié)。2008-06-06
asp實(shí)現(xiàn)本周的一周時(shí)間列表的代碼
原理也相對(duì)簡(jiǎn)單，就是利用date函數(shù)獲取日期，然后通過(guò)固定的字符串?dāng)?shù)組進(jìn)行替換。2009-02-02
ASP checkbox復(fù)選框是否被選中的代碼(結(jié)合數(shù)據(jù)庫(kù))
ASP從數(shù)據(jù)庫(kù)中讀出復(fù)選框是否被選中的代碼2010-06-06
ASP 高亮顯示不區(qū)分大小寫(xiě)的關(guān)鍵字
今日，碰到一個(gè)問(wèn)題：如何在網(wǎng)頁(yè)中高亮顯示不區(qū)分大小寫(xiě)的關(guān)鍵字2010-01-01
ASP中通過(guò)該日歷算法實(shí)現(xiàn)的具體代碼
ASP中通過(guò)該日歷算法實(shí)現(xiàn)的具體代碼...2006-08-08