-
Response.write (server.htmlencode (fiximg ("<imgonclick =" "ถ้า (this.width> screen.width-461) ลม ow.open ('qq/20082181405371.jpg'); "" alt = "" "ชายแดน =" "0" "src =" "qq/20082181405371.jpg" "/>"
-
-
'功能: 将 img 代码格式化为 <imgsrc = "xxx"/> 格式
functionfiximg (sstring)
Dimsreallydo, regex, Ireallydo
dimomatches, cmatch
dimtstarttime, tendtime
ifisnull (sstring) จากนั้น
fiximg = ""
exitfunction
endif
SREALLYDO = SSTRING
onerrorresumenext
SREALLYDO = แทนที่ (SREALLYDO, VBCR, "")
SREALLYDO = แทนที่ (SREALLYDO, VBLF, "")
SREALLYDO = แทนที่ (SREALLYDO, VBTAB, "")
SREALLYDO = แทนที่ (SREALLYDO, "<IMG", VBCRLF & "<IMG", 1, -1,1)
SREALLYDO = แทนที่ (SREALLYDO, "/>", "/>", 1, -1,1)
SREALLYDO = replaceAll (SREALLYDO, "=", "=", จริง)
SREALLYDO = replaceAll (SREALLYDO, ">", ">", จริง)
SREALLYDO = แทนที่ (SREALLYDO, "> <", ">" & VBCRLF & "<")
SREALLYDO = TRIM (SREALLYDO)
onerrorgoto0
setregex = newregexp
regex.ignorecase = true
regex.global = true
'// 去除 onclick, onload 等脚本
regex.pattern = "/s [on].+? = ([/" "| /'. เหมือนกัน)(.*?)/ 1"
SREALLYDO = regex.replace (SREALLYDO, "")
'// 将 src 不带引号的图片地址加上引号
regex.pattern = "<img.*?/ssrc = ([^/" "/'/s] [^/" "/'/s>]*).*?>"
SREALLYDO = regex.replace (SREALLYDO, "<IMGSRC =" "$ 1" "/>")
'// 正则匹配图片 src 地址
regex.pattern = "<img.*?/ssrc = ([/" "/']) ([^/" "/']+?)/1.*?>"
SREALLYDO = regex.replace (SREALLYDO, "<IMGSRC =" "$ 2" "/>")
fiximg = sreallydo
endfunction