当我尝试在服务器上获取并重新生成ADODB.Stream错误 [英] ADODB.Stream error when i try to get and re-generate it on server

问题描述

我在vb6中编写了此代码，它的工作

但这是在ASP

上的错误 我该如何解决此问题.

PS:请注意下划线的位置

I wrote this code in vb6 , it ''s work

But it ''s error on ASP

How do i resolve this problem.

PS:please observe the position wich i made underline

Set Stream = Server.CreateObject("adodb.Stream")

Set rx = Server.CreateObject("adodb.recordset")<br>
rx.open "select top 1 Picturefield from databasePicture",cn,3,3


if not rx.eof then
Stream.open<br>
<big>Stream.Write rx("Picturefield") ''<-- This line generate err-->ADODB.Stream error ''800a0bb9''
<br>If </br></big>fso.FileExists(px & filename ) Then ''check old file exists!<br>
fso.DeleteFile  px & filename  ''delete old file<br>
end if
Stream.SaveToFile  px & filename    ''save bin to file<br>
Stream.Close<br>
Set Stream = Nothing <br>
End if</br></br></br></br></br></br></br>

推荐答案

为什么没有在问题中包含完整的错误消息，否则将得到解决方案2几天前.

完整的错误消息是:

Why didn''t you included the complete error message in your question otherwise you would get the solution 2 days ago.

Full error message is:

ADODB.Stream error ''800a0bb9''

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. 

可以尝试以下具有答案的链接.

您需要引用ado常量....还要将代码与所引用的墨水进行比较.

ADODB.Stream错误 [ ^ ]

Any way try the below link which has answer.

You need to reference the ado constants....also compare the code with the referred ink.

ADODB.Stream error[^]

这篇关于当我尝试在服务器上获取并重新生成ADODB.Stream错误的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！