#4127		這是 Zero 寫在 zero留言板 上的文章		時間:	2003/4/11-17:41
我是用底下的Function Function imgerr(strInput,errimg) errimg="<img onLoad=" & chr(34) & "(this.width>'800')?this.width='800':false;" & CHR(34) strInput=Replace(strInput,"<img",errimg) strInput=Replace(strInput,"<IMG",errimg) imgerr=strInput End Function