向磁盘里写文件，写不进去怎么办？

[900126]

ibin=Request.BinaryRead(ilen)

Set fs = CreateObject("Scripting.FileSystemObject")
Set so=fs.CreateTextFile("c:\temp222.TXT",true)
for i=1 to lenb(ibin)
a=midb(ibin,i,1)
so.write a
response.write a
next
so.close
就是 so.write a 出错。如果改为 so.write "a" ，就可以把同样长度的字符写入文件，so.write i 就可以把一大堆数字写入文件，惟独不能允许把变量a写入文件（显示到屏幕上到没问题）。
如果把循环改为 write ibin ，也出错。而且读出的东西是一个文本文件哪。

[900126]

顺便问一下啊，openTextFile, CreateTextFile是否限制文件类型为文本文件啊？如果我把上传的一个图片文件写入服务器的某目录下，也用CreateTextFile来创建文件吗？

[dh20156]

Set so=fs.OpenTextFile("c:\temp222.TXT",2,true)

[900126]

不是写不进去，是不认识变量ibin，如果在循环中把变量a写进去，就都是空的，长度为0。

[900126]

放了一天了，难道没人能解答吗？

[dh20156]

你的ibin=Request.BinaryRead(ilen)是否有值？

[900126]

有啊，response.write 到屏幕都有了，只是不能写到文件里，写的时候发生错误。

[comszsoft]

怀疑是response.binaryread有问题，我碰到类似情况，binaryread应该由binarywrite来写吧

[900126]

用binarywrite不能写，系统说没有这个命令，BinaryRead是Request的对象，写文件时没这个对象。