中文(繁体)
中文(简体)
中文(繁体)
한국어
日本語
English
Português
Español
Русский
العربية
Indonesia
Deutsch
Français
ภาษาไทย
首頁
源碼下載
編程相關
建站資源
書籍教程
網頁設計教程
網絡編程教程
手遊
手機軟件
文章
首頁
>
網絡編程教程
>
ASP教程
如何讓圖片自動縮放以適合介面大小
作者:Eve Cole
更新時間:2009-06-25 17:41:30
如何讓圖片自動縮放以適合介面大小,拿出你的Editplus,打開c_function.asp文件,找到UBBCode函數,在第417行有以下語句
If Instr(strType,"[image]")>0 And ZC_UBB_IMAGE_ENABLE Then '[img] objRegExp.Pattern="([IMG=)([0-9]*),([0-9]*),( .*)(])(.+?)([/IMG])" strContent= objRegExp.Replace(strContent,"<img src=""$6"" alt=""$4"" title=" "$4"" width=""$2"" height=""$3""/>") objRegExp.Pattern="([IMG=)([0-9]*),(.*)(]) (.+?)([/IMG])" strContent= objRegExp.Replace(strContent,"<img src=""$5"" alt=""$3"" title=""$3"" width=" "$2""/>") objRegExp.Pattern="([IMG])(.+?)([/IMG])" strContent= objRegExp.Replace(strContent,"<img src="" $2"" alt="""" title=""""/>") End If
在其中加上onload='javascript:if(this.width>400)this.width=400;',這裡400是要讓超過400的圖片小於400,你可以自己設定寬度.
下面是已經改好的
If Instr(strType,"[image]")>0 And ZC_UBB_IMAGE_ENABLE Then '[img] objRegExp.Pattern="([IMG=)([0-9]*),([0-9]*),( .*)(])(.+?)([/IMG])" strContent= objRegExp.Replace(strContent,"<img onload='javascript:if(this.width>400)this.width= 400;' src=""$6"" alt=""$4"" title=""$4"" width=""$2"" height=""$3""/>") objRegExp.Pattern="([ IMG=)([0-9]*),(.*)(])(.+?)([/IMG])" strContent= objRegExp.Replace(strContent,"<img onload='javascript :if(this.width>400)this.width=400;' src=""$5"" alt=""$3"" title=""$3"" width=""$2""/>") objRegExp. Pattern="([IMG])(.+?)([/IMG])" strContent= objRegExp.Replace(strContent,"<img onload='javascript:if(this.width>400)this .width=400;' src=""$2"" alt="""" title=""""/>") End If
相關文章
ASP實作SQL語句日期格式的加減運算
2009-06-25
初學ASP程式設計易犯的一個錯誤要注意
2009-06-25
用asp取得檔案md5值
2009-06-25
用.net開發asp元件
2009-06-25
從手部注入看防禦之Access
2009-06-25
Asp計算頁面執行時間
2009-06-25
一個簡單的用預存程序分頁
2009-06-25
編寫資料庫操作類,讓ASP.NET中的資料庫操作變得簡單
2009-06-25
關於Cookie跨域操作遇到的問題及解決方法
2009-06-25
用ASP+CSS實現隨機背景
2009-06-25
使用JMail組件代替Sql Mail發送Email 遇到的問題
2009-06-25
用正規解析圖片位址,並利用XMLHTTP元件將其儲存
2009-06-25