28,406
社区成员
发帖
与我相关
我的任务
分享ADODB.Stream问题，中断程序并报错！！！！！！！！！！
Set objStream = CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = 2
objStream.Charset = "gb2312"
objStream.LoadFromFile(Server.MapPath("FilePath"))
strContent = objStream.ReadText
objStream.Close
Set objStream = Nothing
我的意思是，如何实现报错？不用on error resum next，需要让人知道错误在哪里。
大概意思就是如果文件路径出错或者文件不存在就要报错出来，型如：
if err.number<>0 then
response.write"文件不存在或者路径错误！"
else
response.write(内容)
end if（但是这个是行不通的！）请问高手们如何解决？
objStream.Open
objStream.Type = 2
objStream.Charset = "gb2312"
objStream.LoadFromFile(Server.MapPath("FilePath"))
strContent = objStream.ReadText
objStream.Close
Set objStream = Nothing
我的意思是，如何实现报错？不用on error resum next，需要让人知道错误在哪里。
大概意思就是如果文件路径出错或者文件不存在就要报错出来，型如：
if err.number<>0 then
response.write"文件不存在或者路径错误！"
else
response.write(内容)
end if（但是这个是行不通的！）请问高手们如何解决？
...全文
请发表友善的回复…
发表回复
笨笨兔兔兔兔兔 2005-12-10
- 打赏
- 举报
set fso=server.createobject("scripting.filesystemobject")
fso.exists(Server.MapPath("FilePath"))
fso.exists(Server.MapPath("FilePath"))
zhybxyz 2005-12-10
- 打赏
- 举报
加在前面先用FSO判断文件或者文件家是否存在？恩，是个办法！给分结帖了！~~
zhybxyz 2005-12-09
- 打赏
- 举报
顶上去`~~~~~~~~~``~~~~~~~~
zhybxyz 2005-12-09
- 打赏
- 举报
没人了了啊？？？
zhybxyz 2005-12-09
- 打赏
- 举报
不做处理也不行，那样报错就好象程序错误一样难看！请高手帮忙，解决马上给分结帖！
