retrieving XML as Recordset to asp

[Lars]

Hi!

I wonder if anyone knows how I can work around a problem with retrieving
a recordset from a vb-component to the asp-page. The problem occurs when
working with XML-persist.

I get the following error
error '80004005'
Unspecified error
/xxx.asp, line x

The code is checked against Microsoft code and looks the same.
There is an answer in
http://support.microsoft.com/support.../Q237/5/36.ASP
but I don't understand what I should do because the XML to Recordset is done
with builtin VB-functions.

Code example
First I save the recordset as a BLOB
Set st = CreateObject("ADODB.Stream")
rsInRecordset.Save st, adPersistXML

Then I get the data
strXML = ConvertBLOBToString(rs, "State")

Set st = CreateObject("ADODB.Stream")
st.Open
st.WriteText strXML
st.Position = 0

Set rsXML = CreateObject("ADODB.Recordset")
rsXML.CursorLocation = adUseClient
rsXML.Open st, , , , adCmdUnknown

Set MyFunction = rsXML

And in the asp-page
dim rsAuthor
set rsAuthor = objWebState.MyFunction()

Normal recordsets can be returned without problems.

Thanks in advance
Lars

[Casey]

Hello, I'm not sure but I think that '80004005' error is a generic error code
that can be all kinds of things. I would check permissions for any temp files
that may be written in the process or permissions on the dll that are used
themselves.

"Lars" <lars.soderhall@lansforsakringar.se> wrote:
>
>Hi!
>
>I wonder if anyone knows how I can work around a problem with retrieving
>a recordset from a vb-component to the asp-page. The problem occurs when
>working with XML-persist.
>
>I get the following error
>error '80004005'
>Unspecified error
>/xxx.asp, line x
>
>The code is checked against Microsoft code and looks the same.
>There is an answer in
>http://support.microsoft.com/support.../Q237/5/36.ASP
>but I don't understand what I should do because the XML to Recordset is
done
>with builtin VB-functions.
>
>Code example
>First I save the recordset as a BLOB
> Set st = CreateObject("ADODB.Stream")
> rsInRecordset.Save st, adPersistXML
>
>Then I get the data
> strXML = ConvertBLOBToString(rs, "State")
>
> Set st = CreateObject("ADODB.Stream")
> st.Open
> st.WriteText strXML
> st.Position = 0
>
> Set rsXML = CreateObject("ADODB.Recordset")
> rsXML.CursorLocation = adUseClient
> rsXML.Open st, , , , adCmdUnknown
>
> Set MyFunction = rsXML
>
>And in the asp-page
> dim rsAuthor
> set rsAuthor = objWebState.MyFunction()
>
>Normal recordsets can be returned without problems.
>
>Thanks in advance
>Lars
>
>
>

[JimmyJack]

That error number indicates an Automation error in your component. I think
if you enable script debugging you will get more info on what's causing the
problem.

Hope this helps

JJ

"Lars" <lars.soderhall@lansforsakringar.se> wrote in message
news:3ad44575$1@news.devx.com...
>
> Hi!
>
> I wonder if anyone knows how I can work around a problem with retrieving
> a recordset from a vb-component to the asp-page. The problem occurs when
> working with XML-persist.
>
> I get the following error
> error '80004005'
> Unspecified error
> /xxx.asp, line x
>
> The code is checked against Microsoft code and looks the same.
> There is an answer in
> http://support.microsoft.com/support.../Q237/5/36.ASP
> but I don't understand what I should do because the XML to Recordset is
done
> with builtin VB-functions.
>
> Code example
> First I save the recordset as a BLOB
> Set st = CreateObject("ADODB.Stream")
> rsInRecordset.Save st, adPersistXML
>
> Then I get the data
> strXML = ConvertBLOBToString(rs, "State")
>
> Set st = CreateObject("ADODB.Stream")
> st.Open
> st.WriteText strXML
> st.Position = 0
>
> Set rsXML = CreateObject("ADODB.Recordset")
> rsXML.CursorLocation = adUseClient
> rsXML.Open st, , , , adCmdUnknown
>
> Set MyFunction = rsXML
>
> And in the asp-page
> dim rsAuthor
> set rsAuthor = objWebState.MyFunction()
>
> Normal recordsets can be returned without problems.
>
> Thanks in advance
> Lars
>
>
>