GetChunk() Method???? 1

[qajussi]

Dim objConn
Dim rs
Dim vntChunk,vntMemoFld
set objConn = CreateObject("ADODB.Connection")
objConn.Open "Provider=OraOLEDB.Oracle;Data Source=ORACLEDB; USER ID=xxx; Password=xxx"
set rs=objConn.execute("SELECT * FROM BACDBA.CBIACIS_BIBLIO WHERE CBIACNO='CB-100910'")

'Creating FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject")
'filename = InputBox("Enter the file name you want to create")
Set demofile = fso.CreateTextFile("C:\q\vbs\cbiac\cbiac.xml")
demofile.WriteLine("<?xml version='1.0' encoding='ISO-8859-1'?>")
'GetChunk
vntChunk = rs("CBIACNO").GetChunk(4000)
vntMemoFld = vntChunk
Do Until IsNull(vntChunk) = True
vntChunk = rs("CBIACNO").GetChunk(4000)
vntMemoFld = vntMemoFld & vntChunk
Loop
demofile.WriteLine("<CBIACNUM>")
demofile.WriteLine (vntMemoFld)
demofile.WriteLine("</CBIACNUM>")

Hi!
Could you take a look at this code for me??
I have connection but I am getting an error at here:
vntChunk = rs("CBIACNO").GetChunk(4000)
"CBIACNO" is varchar2 dataype(size 1800)from the oracle database.
I get this operation is not allowed in this context.
code:800a0c93
source:adodb.field

 

[EBGreen]

Maybe your chunk is too big. What if you change it to 1800?

[blue]"Well, once again my friend, we find that science is a two headed beast. One head is nice, it gives us aspirin and other modern conveniences,...but the other head of science is BAD! Oh, beware the other head of science, Arthur; it bites!!" - The Tick[/blue]

 

[qajussi]

Thanks, TomThumbKP.

NO it still gives me an error.
I used it with Access/SQL server.
It works fine with them.
I am doing same thing except that with different database.

Do you think it is not allowed to use it with Oracle database??

Thank millions for your help.

 

[EBGreen]

That sounds likely. I think it is a M$ standard.

[blue]"Well, once again my friend, we find that science is a two headed beast. One head is nice, it gives us aspirin and other modern conveniences,...but the other head of science is BAD! Oh, beware the other head of science, Arthur; it bites!!" - The Tick[/blue]

 

[qajussi]

Do you know any other method I can use to read from the Oracle table??

Thanks

 

[EBGreen]

What happens if you do this:
vntChunk = rs("CBIACNO")

[blue]"Well, once again my friend, we find that science is a two headed beast. One head is nice, it gives us aspirin and other modern conveniences,...but the other head of science is BAD! Oh, beware the other head of science, Arthur; it bites!!" - The Tick[/blue]

 

[qajussi]

Geeeee!
That works....

It didn't like it when I was using it with Access/SQL server databases.

Thanks A lot.
I should had tried that one also.
You are best..