vb Stream 实时错误 '3004' 写入文件失败
Public stm As New ADODB.Stream
dim filename, content
filename = "e:\1.html"
content = "xxx"
With stm
.Type = 2 '1－二进制，2－文本
.Mode = 3 '1－读，2－写，3－读写
.Charset = "gb2312" 'utf-8
.Open
.WriteText content
.SaveToFile filename, 2 '1－不允许覆盖，2－覆盖写入
.Flush
.Close
End With
代码如下，运行提示写入文件失败，什么原因啊？
[解决办法]
看看这个
[解决办法]
引用的ado的版本要2.5及以上
[解决办法]
楼主的代码没有问题，不过得先确定文件是否打开，如果已用fso打开，请先set nothing一下，估计楼主出错是因为上下文存在冲突。
