🚀 go-pugleaf

Thanks for the help Sandor
The program will compile but throws an error after it has compiled. Does the code below look correct or have I gone wrong somewhere.

void __fastcall TForm1::FormCreate(TObject *Sender)
{
_RecordsetPtr pRecSet;
wchar_t *ConnStr=L"D:\Inetpub\wwwroot\BMD\bmdtest.mdb";
pRecSet = CreateComObject(CLSID_Recordset);
pRecSet->Open(L"SELECT * FROM EssxBmd", ConnStr, adOpenStatic, adLockReadOnly, adCmdText);
pRecSet->MoveFirst();

TVariant vVAlue = pRecSet->Fields->get_Item(2)->get_Value();
Memo1 -> Lines -> Add (vVAlue);

pRecSet->Close();
pRecSet->Release();
}

I have declared this in my header
#include <adodb_2k.h>

Thanks
Mike


"Sandor Bognar" <bognars@mail.uti.hu> wrote:
>
>> Thanks for this
>> I have tried but get error messages saying
>> Misuse of typedef fields
>> and
>> undefind symbol iColumnPos.
>
>I'm sorry I made a typo , the correct one is:
>
>TVariant vVAlue = pRecSet->Fields->get_Item(iColumnPos)->get_Value();
>
>And of course you must define the iColumnPos. You can ask the number of
>fileds in the recordset using pRecSet->Fields->Count;
>
>> I allso still can not see how this will display the recordset into a memo.
>
>I'm not sure what you are saying here. vValue contains the value of the
>"Cell" in the Recordset. You can display it wherever you want.
>For example in an editbox : Edit1->Text = vValue;
>
>HTH
>Sandor
>
>
>
>
>