28,391
社区成员
发帖
与我相关
我的任务
分享急救!!!取数据当列中有空时出现错误!
我用asp取access中数据,只要是当哪个列不管哪行出现空值,整个程序就不能运行,出现
Microsoft VBScript 运行时错误 (0x800A000D)错误!
但只要数据库中填入数据却又正常运行.(数据库中我设置了字段可以为空)
Microsoft VBScript 运行时错误 (0x800A000D)错误!
但只要数据库中填入数据却又正常运行.(数据库中我设置了字段可以为空)
...全文
请发表友善的回复…
发表回复
netwar 2003-07-25
- 打赏
- 举报
<%
on error resume next
set cn=server.createobject("adodb.connection")
cn.open "dsn=888"
sql="select * from tabel"
set fs=cn.execute(sql)
response.write "<table border=1>"
response.write "<tr>"
for i=0 to fs.fields.count-1 '依次输出字段名称
response.write "<td>" & fs(i).name & "</td>"
next
response.write "</tr>"
fs.movefirst
do while not fs.eof
response.write "<tr>"
for i=0 to fs.fields.count-1
if IsNull(fs(i).value) then
fs(i).value="无值"
..................
on error resume next
set cn=server.createobject("adodb.connection")
cn.open "dsn=888"
sql="select * from tabel"
set fs=cn.execute(sql)
response.write "<table border=1>"
response.write "<tr>"
for i=0 to fs.fields.count-1 '依次输出字段名称
response.write "<td>" & fs(i).name & "</td>"
next
response.write "</tr>"
fs.movefirst
do while not fs.eof
response.write "<tr>"
for i=0 to fs.fields.count-1
if IsNull(fs(i).value) then
fs(i).value="无值"
..................
fyzeng 2003-07-25
- 打赏
- 举报
刚刚找到原因了,是因为我在写成Server.HTMLEncode(rs("字段名"))的形式,去悼Server.HTMLEncode()可以显示空字段,但这又该怎么办呢?我要解释字段里的HTML又要充许它为空???
cqfeng 2003-07-25
- 打赏
- 举报
看看你的代码
