欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

asp使用replace函数参数有空值报错

更新时间: 2014-01-05 00:56:52 责任编辑: Author_N1

 

求助:ASP使用REPLACE函数参数有空值报错

file = "small.htm"


'
call db_conn()
dim tpl,info
set tpl = new template
tpl.load file
info = tpl.result()
dim ors,isort,bsort
set ors = server.createobject("adodb.recordset")
ors.open "select * from [class] where id = " & toint(request("id")),conn,1,1
if ors.eof then call myerr("未找到相应信息...")
info = replace(info,"{系列名称}",ors("name"))
info = replace(info,"{摘要}",ors("mark"))
info = replace(info,"{内容}",ors("introduce"))
info = replace(info,"{图片}",ors("pro_picture"))
info = replace(info,"{规格}",ors("pro_spec"))
if len(ors("bigpicture")) > 6 then
info = replace(info,"{下载}","<a href='doc/"&ors("bigpicture")&"' target='_blanl'><img src=images/dowsms.jpg width=105 height=25 border=0></a>")
else
info = replace(info,"{下载}","")
end if
isort = ors("isort")
bsort = ors("sort")
info = replace(info,"{小类}",isort)
info = replace(info,"{大类}",bsort)
ors.close

运行后报错:
Microsoft VBScript 运行时错误 错误 '800a005e'

无效使用 Null: 'replace'

其中pro_picture,pro_spec是有空值的列,请问如何解决这个错误呢,让结果是如果是空值那么就用空值替换。
--参考方法--
if isnull(ors("pro_picture")) then
    info = replace(info,"{图片}","")
else
    info = replace(info,"{图片}",ors("pro_picture"))
end if

再试试!
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 00:56:52
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/1704/
本文WWW.DOC100.NET DOC100.NET版权所有。