Question

我在此页面上收到标准广告列表的以下错误（向下滚动到底部）：http://www.inside-guides.co.uk/brentwood/fitness-sport-and-leisure/days-out.html

这以前没有错误就可以正常工作，所以我不明白为什么突然间它会抛出错误。

Microsoft VBScript运行时错误'800a005e'无效使用Null： 'replace'/ PageObjects/DirectoryBrowser/i_DirectoryAdvert.asp，line 124

第124行的代码是：

strDB_AdvertItem = Replace(strDB_AdvertItem, "[OpeningTimes]", rsDB_Ads("OpeningTimes"))

任何关于为什么会受到高度赞赏的想法！

Answer 1

根据错误判断strDB_AdvertItem或rsDB_Ads("OpeningTimes")的值为null。

我怀疑它是rsDB_Ads("OpeningTimes")，它可能在您上次运行程序时在数据库中有一个有效值但不再存在。

下面的代码（未经测试）应该可以防止发生错误，但是您需要检查NULL是否导致其他地方出现意外行为

Dim OpeningTimes
If IsNull(rsDB_Ads("OpeningTimes")) Then OpeningTimes = "" Else OpeningTimes = rsDB_Ads("OpeningTimes")
If IsNull(strDB_AdvertItem) Then strDB_AdvertItem = ""

strDB_AdvertItem = Replace(strDB_AdvertItem, "[OpeningTimes]", OpeningTimes)

错误帮助：Microsoft VBScript运行时错误'800a005e'

1 个答案: