🚀 go-pugleaf

Thank you.
It works ....



Viatcheslav V. Vassiliev escreveu:

>Views schema is not supported by MS SQL Server. You should use tables schema
>with restrictions:
>
>void __fastcall TForm1::Button1Click(TObject *Sender)
>{
> ADOConnection1->ConnectionString = WideString("Provider=SQLOLEDB;"
>  "Integrated security=SSPI;Initial catalog=pubs");
> ADOConnection1->Connected = true;
>
> OleVariant EmptyParam;
> EmptyParam.VType  = VT_ERROR;
> EmptyParam.VError = DISP_E_PARAMNOTFOUND;
>
> SAFEARRAY FAR* psa = NULL;
> SAFEARRAYBOUND rgsabound;
> OleVariant var;
> OleVariant Array;
> rgsabound.lLbound = 0;
> rgsabound.cElements = 4;
>
> psa = SafeArrayCreate(VT_VARIANT, 1, &rgsabound);
> var.VType = VT_EMPTY;
>
> long ix;
> ix = 0;
> SafeArrayPutElement(psa, &ix, &var);
>
> ix = 1;
> SafeArrayPutElement(psa, &ix, &var);
>
> ix = 2;
> SafeArrayPutElement(psa, &ix, &var);
>
> var.VType = VT_BSTR;
> var.VOleStr = WideString("VIEW");    //May be "SYSTEM VIEW"
>
> ix = 3;
> SafeArrayPutElement(psa, &ix, &var);
>
> Array.VType  = VT_ARRAY | VT_VARIANT;
> Array.VArray = (TVarArray*)psa;
>
> ADOConnection1->OpenSchema(siTables, Array, EmptyParam, ADODataSet1);
>}
>
>"Paulo S�rgio Tesche" <ptesche@via-rs.net> ???????/???????? ? ????????
>?????????: news:3F427E87.8050309@via-rs.net...
>  
>
>>Hi,
>>
>>Has anynone a code sample in C++ Builder to retrieve the list of views
>>of an SQL Server using TADOConnection and OpenSchema?
>>I�m stucked with the Variant types. How to create them, how to pass them
>>as parametes to OpenSchema?
>>
>>Any help greatle appreciated.
>>
>>Paulo Tesche
>>
>>    
>>
>
>
>  
>