asp提示无效使用 Null: Replace的解决方法

asp下载使用REPLACE来将数据库里读出来的数据替换,如果字段不为空是正常,但如果为空时就出现以下提示:

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

无效使用 Null: 'Replace'

主要问题就是sqlserver的字段为null，所以不能简单的为空判断，只能使用isnull

可以先判断

if isnull(rs("coutent"))=false then
response.write("null")
else
response.write replace(rs("coutent"),chr(13),"")
end if

或者

if rs("coutent")="" then
response.write("null")
else
response.write replace(rs("coutent"),chr(13),"")
end if

测试：

if isnull(keyword)=true then keyword=dxy_title
if isnull(descriptions)=true then descriptions=dxy_title

asp replace函数

Replace语法

Replace(expression, find, replacewith[, compare[, count[, start]]])

Replace 函数参数

expression：必选。 字符串表达式 包含要替代的子字符串。 
find： 必选。被搜索的子字符串。
replacewith ：必选。用于替换的子字符串。
start： 可选。expression 中开始搜索子字符串的位置。如果省略，默认值为 1。在和count 关联时必须用 
count ：可选。执行子字符串替换的数目。如果省略，默认值为 -1，表示进行所有可能的替换。在和 start 关联时必须用。
compare： 可选。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略,缺省值为 0 ,这意味着必须进行二进制比较。

设置

compare 参数可以有以下值：
常数 值 描述
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文本比较。

下面一个就是替换“'”为“''”

Function strReplace(Str)
 dim tempcheckstr
 tempcheckstr=Str
 If Isnull(tempcheckstr) Then
  strReplace = ""//这里要注意，如果字符串为空，那replace装会出错
  Exit Function
 End If
 strReplace = Replace(tempcheckstr,"'","''")
End Function 

到此这篇关于asp提示无效使用 Null: Replace的文章就介绍到这了,更多相关Null Replace内容请搜索脚本之家以前的文章或继续浏览下面的相关文章希望大家以后多多支持脚本之家！

最新评论