问一下我什么地方错了?怎么改?

[老吹老吹]

'将数据存入本地文件
set stream = server.createObject("adodb.stream")
'参数为1以二进制类型模式打开
stream.type = 1
stream.Mode=3
stream.open
stream.write totaldata '------------------->totaldata是不加处理的数据
'参数为1，不覆盖，2覆盖
stream.saveToFile server.mappath("temp.jpeg"),2
stream.close
'---------上面程序运行正常

'将数据存入本地文件
set stream = server.createObject("adodb.stream")
'参数为1以二进制类型模式打开
stream.type = 1
stream.Mode=3
stream.open
stream.write dataValue '------------------->datavalue是从totaldata里取出来的有效数据
'参数为1，不覆盖，2覆盖
stream.saveToFile server.mappath("temp.jpeg"),2
stream.close
'----------这个程序运行不了

技术信息（用于支持人员）

错误类型：
ADODB.Stream (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/test/index.asp, 第 36 行


浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

网页：
POST 7285 ??? /test/index.asp

POST Data:
错误 '80020009'
发生意外。

/iisHelp/common/500-100.asp，行 219

[老吹老吹]

顶一下

[mrshelly]

stream.BinaryWrite 试试.

表单呢?

[笨笨兔兔兔兔兔]

dataValue看看是怎么弄出来的？？是不是个流？？

[老吹老吹]

我实际上是上传的一个图片,我直接response.binarywrite dataValue 可以正常显示出来的.

[老吹老吹]

技术信息（用于支持人员）

错误类型：
Microsoft VBScript 运行时错误 (0x800A01B6)
对象不支持此属性或方法: 'stream.BinaryWrite'
/test/index.asp, 第 36 行

[老吹老吹]

再顶一下,不要落下去了.

[cqzj2003]

不清楚,顶一下.

[老吹老吹]

大家都不知道,还是不想说啊?
帮忙顶一下,有分拿..................

[老吹老吹]

<%totalbyte=request.TotalBytes
'response.write totalbyte & "<BR>"
if totalbyte=0 then%>
<center>数据库更新程序<BR>
<form name="form1" enctype="multipart/form-data" method="post" action="index.asp">
<input type="file" name="file">
<input type="Button" name="Submit1" value="提交" onclick="Check()">
</form></center>

<script language="vbscript">
sub Check()
'if right(form1.file.value,4)<>".jpeg" then msgbox "必须是jpeg图片":exit sub
form1.submit
end sub
</script>

<%else
totalF=request.BinaryRead(totalbyte)
'response.binarywrite totalF
'response.write "<BR>"
CRLFB=chrB(13) & chrB(10) '数据结束标志
DBLCRLFB=CRLFB & CRLFB '数据开始标志

datastar=instrB(totalF,DBLCRLFB) + 4 '数据开始位置
dataends=instrB(datastar,totalF,CRLFB) '数据结束位置
datalong=dataends-datastar '数据长度

dataV=midB(totalF,datastar,datalong) '得到有效数据

set stream = server.createObject("adodb.stream")
'参数为1以二进制类型模式打开
stream.type = 1
stream.Mode=3
stream.open

stream.Write totalF '-->运行正常,但这里改为dataV就会提示错误
'参数为1，不覆盖，2覆盖
stream.saveToFile server.mappath("temp.jpeg"),2
stream.close

response.binarywrite dataV

end if%>

[jekexys2004]

学学，帮顶一下

[老吹老吹]

帮忙顶一下,我加分了.....................................

[笨笨兔兔兔兔兔]

stream.copyto 你用这个可能比较好，我没仔细看