上传时总是出错:Microsoft VBScript 运行时错误 错误 '800a000d'

来源:百度知道 编辑:UC知道 时间:2024/06/05 15:42:38
上传时总是出错:Microsoft VBScript 运行时错误 错误 '800a000d'

类型不匹配: 're.Replace'

/bbs/ubbhtml.asp,行 22 〔以下是第22行〕
re.Pattern="(\[IMG\])(.[^\[]*)(\[\/IMG\])"
strContent=re.Replace(strContent,"<br>此主题相关图片如下:<br><a href=""$2"" target=_blank><IMG SRC=""$2"" border=0 alt=按此在新窗口浏览图片 onload=""javascript:if(this.width>screen.width-333)this.width=screen.width-333""></a><br>")
全文代码如下:
<%
'<%
'UBB html判断开始
function ChkBadWords(fString)
if fString<>"" then
bwords = split(BadWords, "|")
for i = 0 to ubound(bwords)
fString = Replace(fString, bwords(i), string(len(bwords(i)),"*"))
next
end if
ChkBadWords = fString
end function

function UBBCode(strContent)
dim re

请下载并安装Q831167.exe(http://www.microsoft.com/downloads/details.aspx?amp;amp;displaylang=en&familyid=254EB128-5053-48A7-8526-BD38215C74B2&displaylang=en),可以在Windows Server 2003机器上阅读微软知识库831167 http://support.microsoft.com/default.aspx?kbid=831167 了解一些相关信息。