cBuilder5: ADO-Stream Open() funktioniert nicht

Joachim Vasselai

Neuer Benutzer

Join Date: 26.02.2003

Posts: 8
- Share
- Tweet
#1

cBuilder5: ADO-Stream Open() funktioniert nicht

21.12.2001, 11:43

Hallo, 
ich versuche einen ADO-Stream zu �ffnen (um damit BLOB-Felder in einer SQL-DB zu verwalten). Es mag mir jedoch nicht so recht gelingen! Wenn ich nach dem Open-Statement den pStream->State abfrage, bekomme ich immer adStateClosed zur�ck und demzufolge funktioniert pStream->Read() auch nicht. Was mache ich falsch?
MFG 
Joachim

#include <ADODB_TLB.h> 
 
void __fastcall TFormStream::ButtonOpenClick(TObject *Sender) 
{ 
Adodb_tlb::ConnectModeEnum Mode; 
switch (ComboBoxOpenMode->ItemIndex) 
{ 
case 0: 
Mode = adModeRead; 
break; 
case 1: 
Mode = adModeReadWrite; 
break; 
case 2: 
Mode = adModeRecursive; 
break; 
case 3: 
Mode = adModeShareDenyNone; 
break; 
case 4: 
Mode = adModeShareDenyRead; 
break; 
case 5: 
Mode = adModeShareDenyWrite; 
break; 
case 6: 
Mode = adModeShareExclusive; 
break; 
case 7: 
Mode = adModeUnknown; 
break; 
case 8: 
Mode = adModeWrite; 
break; 
default: 
Mode = -1; 
break; 
} 
 
Adodb_tlb::StreamOpenOptionsEnum Options; 
switch (ComboBoxOpenOption->ItemIndex) 
{ 
case 0: 
Options = adOpenStreamUnspecified; 
break; 
case 1: 
Options = adOpenStreamAsync; 
break; 
case 2: 
Options = adOpenStreamFromRecord; 
break; 
default: 
Options = -1; 
break; 
} 
 
try 
{ 
StreamPtr pStream; 
pStream = CreateComObject(CLSID_Stream); 
pStream->Open(TVariantInParam(), Mode, Options, L"", L""); 
} 
catch(...) 
{ 
ShowMessage("open failed"); 
} 
} 
 
Tags: None
Christian Zink

Zaungast

Join Date: 26.02.2003

Posts: 42
- Share
- Tweet
#2

14.01.2002, 12:47

Ich weiss, das Borland darauf hinweisst, das man ein Patch f�r ADO Sachen aufspielen sollte.

www.borland.de unter download.

Chri
Comment

Announcement

cBuilder5: ADO-Stream Open() funktioniert nicht

cBuilder5: ADO-Stream Open() funktioniert nicht

Comment