6I5e0fm0
ͼƬʾ̫С inc\Dv_ubbcode.aspļڵ199ǣ
Dv_UbbCode=bbimg(s,500) Set Re=Nothing End Function Private Function bbimg(strText,ssize) Dim s s=strText re.Pattern="<img(.[^>]*)>" If ssize=500 Then
е500ΪҪֵͼƬ(ֱ-趨ֵ)Ŀʾ ԽǸij330Ϊʣɷԡڱϲһ°ɡ
Dv_ubbcode.aspļûϴ룬ô汾ͬķۡ
ʹõ ٱ
ظ תһҳ