空笔芯能做什么工艺品:类型不匹配: 'objRegExp.Replace'

来源：百度文库编辑：高校问答时间：2024/05/13 11:42:05

Microsoft VBScript 运行时错误错误 '800a000d'

类型不匹配: 'objRegExp.Replace'

F:\兔子\WWW\M.COM\INC\../inc/Inc_UBB.asp，行155

155行是strOutput = objRegExp.Replace(strOutput, "＃i nclude")

public function filt_inc(strHTML)
Dim objRegExp, strOutput
Set objRegExp = New Regexp
strOutput=strHTML
objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = "#include"
strOutput = objRegExp.Replace(strOutput, "＃i nclude")
objRegExp.Pattern = "#echo"
strOutput = objRegExp.Replace(strOutput, "＃e cho")
objRegExp.Pattern = "#flastmod"
strOutput = objRegExp.Replace(strOutput, "＃f lastmod")
objRegExp.Pattern = "#fsize"
strOutput = objRegExp.Replace(strOutput, "＃f size")
objRegExp.Pattern = "#exec"
strOutput = objRegExp.Replace(strOutput, "＃e xec")
objRegExp.Pattern = "#config"
strOutput = objRegExp.Replace(strOutput, "＃c onfig")
strOutput=replace(strOutput,"#此前在首页部分显示#","")
filt_inc = UBBCode(strOutput,1)
Set objRegExp = Nothing
end function

是没是没有在调用函数时没有指定strHTML的值？

类型不匹配: 'objRegExp.Replace' 类型不匹配: 'Server.HTMLEncode' 类型不匹配: 'adminabout_body' ASP类型不匹配: 'cint'？？？？？？？？类型不匹配：’session‘ asp 类型不匹配 vb 类型不匹配错误:类型不匹配显示器类型不匹配是怎么回事 UpDate类型不匹配asp