' 修改把模式又了下
'code 要檢測的程式碼
'http://www.downcodes.com/asp.asp
'leixing html或ubb
'nopic程式碼無圖片時預設值
函數toppic(程式碼,leixing,nopic)
設定正規表示式=新的正規表示式
正規表示式.ignorecase = true
正規表示式.global = true
如果 leixing = "html" 那麼
regex.pattern = "<img(.*?)srcs?=s?(u0022?)([^u0022/>]+)"
別的
regex.pattern = "[img]([^u005B]+)“
結束如果
設定匹配= regex.execute(code)
如果 regex.test(code) 那麼
如果 leixing = "html" 那麼
主題=匹配（0）.子匹配（3）
別的
主題=匹配（0）.子匹配（0）
結束如果
別的
主題 = nopic
結束如果
結束函數
代碼1 = "<img src=""1.gif"">"
pic = toppic(code1,"html","nopic.gif")
回覆.寫圖片