dbf в ADO
От: lol  
Дата: 14.01.02 10:57
Оценка:
Надо создать dbf файл (dBase 5.0 VFP) в АДО (MSVC++ 6.0)
Пишу:
_ConnectionPtr pCondbf;
_RecordsetPtr pRstdbf;
pCondbf.CreateInstance(__uuidof(Connection));
pRstdbf.CreateInstance(__uuidof(Recordset));
pCondbf->Open("Driver={Microsoft dBase VFP Driver (*.dbf)};UID=;PWD=;SourceDB=с:\\;SourceType=DBF;Exclusive=No;BackgroundFetch=Yes;Collate=Machine;Null=Yes;Deleted=Yes;","","",adConnectUnspecified);
pCondbf->Execute(_bstr_t("CREATE TABLE inska(" "DESCR CHAR (30),"
"CUSTVIEW CHAR (11),"
"FULLNAME CHAR (50),"
"LAWADRES CHAR (85),"
"POSTADRES CHAR (85),"
"PHONES CHAR (50),"
"INN CHAR (20) NULL,"
"PASPORTS CHAR (14) NULL,"
"PASPORTN CHAR (14) NULL,"
"PASPORTWHO CHAR (60) NULL,"
"PASDATE DATE NULL,"
"CALLNUM CHAR (9) NULL,"
"MANAGER CHAR (35) NULL"
")"),NULL,adCmdText);
pRstdbf->Open("SELECT * FROM inska",_variant_t((IDispatch*)pCondbf,true), adOpenStatic, adLockOptimistic, adCmdText);
//дальше вставляю в эту таблицу значения...
//и закрываю выборку и таблицу
pRstdbf->Close();
pCondbf->Close();

Интересно, что несмотря на закрытие выборки и таблицы, сессия с дбф не заканчивается (при попытке поработать с ним в дальнейшем доступ к файлу закрыт (драйвер выдает исключение File in use) .Как это понять??? Помогите плз.
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.