|
ｿｽ@ｿｽｿｽｿｽRｿｽｿｽｿｽ¥ｿｽ[ｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽｿｽADOｿｽｿｽgｿｽｿｽｿｽｿｽｿｽ@
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
takk 2003/08/05(ｿｽｿｽ) 11:21:41
ｿｽRｿｽｿｽｿｽ¥ｿｽ[ｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽｿｽADOｿｽｿｽgｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
'CoInitialize ｿｽﾍ呼び出ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽB'
ｿｽﾆゑｿｽｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽoｿｽﾜゑｿｽｿｽB
ｿｽﾇなゑｿｽｿｽｿｽｿｽｿｽｿｽﾌ鯉ｿｽｿｽﾛにつゑｿｽｿｽﾄ包ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽ痰｢ｿｽﾜゑｿｽｿｽｿｽｿｽH
ｿｽｿｽPｿｽD
var
ZipCn: Variant;
begin
ZipCn := CreateOleObject('ADODB.Connection');
//ｿｽｿｽｿｽｿｽｿｽﾅエｿｽｿｽｿｽ[
end;
ｿｽｿｽQｿｽD
var
ZipCn: ADODB_TLB.TConnection;
begin
ZipCn := ADODB_TLB.TConnection.Create(nil);
//Createｿｽｿｽｿｽﾌ茨ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾌでとりあｿｽｿｽｿｽｿｽnilｿｽｿｽwｿｽ閧ｵｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ZipCn.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;' +
'Persist Security Info=False;' +
'Mode=Read;Data Source=ZipData.mdb';
//ｿｽｿｽｿｽｿｽｿｽﾅエｿｽｿｽｿｽ[
end;
ｿｽｿｽｿｽﾈみに包ｿｽｿｽiｿｽｿｽGUIｿｽAｿｽvｿｽｿｽｿｽﾅ暦ｿｽPｿｽﾌ包ｿｽｿｽ@ｿｽｿｽgｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽAｿｽｿｽ阮ｳｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽRｿｽｿｽｿｽ¥ｿｽ[ｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽﾅゑｿｽADOｿｽﾍ使ｿｽｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾂ具ｿｽｿｽFWindows 2000 SP3ｿｽADelphi 6 Personal
ｿｽﾉゑｿｽｿｽｿｽ 2003/08/05(ｿｽｿｽ) 12:47:18
ｿｽGｿｽｿｽｿｽ[ｿｽﾌ難ｿｽeｿｽﾍ読まゑｿｽﾄ暦ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽH
ｿｽｿｽｿｽｿｽﾆゑｿｽACoInitializeｿｽｿｽﾄゑｿｽﾅゑｿｽｿｽｿｽﾌに「ｿｽﾄゑｿｽﾅゑｿｽｿｽﾈゑｿｽｿｽvｿｽﾆエｿｽｿｽｿｽ[ｿｽｿｽｿｽoｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
CoInitialize delphiｿｽﾅ、googleｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽoｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
takk 2003/08/05(ｿｽｿｽ) 14:24:33
ｿｽﾉゑｿｽｿｽﾌゑｿｽｿｽｿｽAｿｽｿｽｿｽXｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽGｿｽｿｽｿｽ[ｿｽﾌ難ｿｽeｿｽﾍ全ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽAｿｽ¥ｿｽｿｽｿｽあゑｿｽﾜゑｿｽｿｽｿｽiｿｽOｿｽOｿｽG
ｿｽwCoInitialize Delphiｿｽxｿｽﾅ抵ｿｽｿｽﾗゑｿｽｿｽｿｽeｿｽｿｽﾇゑｿｽﾅ、ｿｽｿｽｿｽﾍゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽｿｽｿｽiｿｽｿｽｿｽjｿｽA
ｿｽ皷曚oInitializeｿｽｿｽﾄぶゑｿｽｿｽﾆでエｿｽｿｽｿｽ[ｿｽｿｽoｿｽｿｽｿｽﾉ奇ｿｽ]ｿｽﾊゑｿｽﾌ難ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉなゑｿｽﾜゑｿｽｿｽｿｽｿｽB
GUIｿｽAｿｽvｿｽｿｽｿｽﾅは暗黙のゑｿｽｿｽｿｽｿｽﾉゑｿｽｿｽｿｽCoInitializeｿｽｿｽｿｽﾄばゑｿｽﾄゑｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽHｿｽH
ｿｽﾆりあｿｽｿｽｿｽｿｽｿｽRｿｽｿｽｿｽ¥ｿｽ[ｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽｿｽADOｿｽｿｽgｿｽｿｽｿｽｿｽ謔､ｿｽﾉなゑｿｽｿｽｿｽｿｽﾌで会ｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽﾄ抵ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾍまゑｿｽDelphiｿｽｿｽnｿｽﾟゑｿｽｿｽﾎゑｿｽｿｽｿｽﾈので暦ｿｽｿｽｿｽoｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽA
ｿｽｿｽｿｽｿｽｿｽ黷ｱｿｽﾌ辺ゑｿｽﾌゑｿｽｿｽﾆゑｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽ謔､ｿｽﾉ頑張ｿｽ閧ｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽwｿｽｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽI
takk 2003/08/05(ｿｽｿｽ) 14:25:29
ｿｽｿｽｿｽｿｽｿｽｿｽYｿｽｿｽﾄまゑｿｽｿｽｿｽｿｽｿｽｿｽOｿｽOｿｽG
ｿｽﾉゑｿｽｿｽｿｽ 2003/08/05(ｿｽｿｽ) 15:25:04
> GUIｿｽAｿｽvｿｽｿｽｿｽﾅは暗黙のゑｿｽｿｽｿｽｿｽﾉゑｿｽｿｽｿｽCoInitializeｿｽｿｽｿｽﾄばゑｿｽﾄゑｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽHｿｽH
ｿｽgｿｽpｿｽｿｽｿｽﾄゑｿｽｿｽ驛ｿｽjｿｽbｿｽgｿｽﾌどゑｿｽｿｽﾅゑｿｽ謔｢ｿｽﾌでゑｿｽｿｽB
ｿｽｿｽｿｽﾔゑｿｽAActiveXｿｽﾆゑｿｽｿｽAComCtrlsｿｽｿｽｿｽﾆゑｿｽｿｽﾌｿｽｿｽjｿｽbｿｽgｿｽﾅ、CoInitializeｿｽｿｽｿｽﾄばゑｿｽﾄゑｿｽｿｽｿｽﾌゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
CoInitializeｿｽﾌ呼び出ｿｽｿｽｿｽﾉ撰ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽ骼橸ｿｽAｿｽｿｽｿｽﾌアｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽIｿｽｿｽｿｽｿｽｿｽｿｽﾛに、CoUninitializeｿｽｿｽﾄび出ｿｽｿｽｿｽﾌゑｿｽYｿｽ黷ｸｿｽﾉ。
nanashi 2003/08/05(ｿｽｿｽ) 15:41:39
ｿｽﾈゑｿｽﾙど、ｿｽｿｽｿｽｿｽﾈゑｿｽ[ｿｽｿｽｿｽﾅゑｿｽｿｽﾋ。
CoUninitializeｿｽﾉつゑｿｽｿｽﾄゑｿｽ CoInitializeｿｽ調べゑｿｽｿｽｿｽｿｽﾉ一緒ｿｽﾉ出ｿｽﾄゑｿｽｿｽｿｽｿｽﾌで擾ｿｽｿｽｿｽｿｽﾉ組ｿｽﾝ搾ｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽﾗ包ｿｽｿｽﾉわたｿｽｿｽtｿｽHｿｽｿｽｿｽ[ｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽm(_ _)m
takk 2003/08/05(ｿｽｿｽ) 16:00:59
ｿｽｿｽｿｽﾌ掲ｿｽｿｽｿｽﾂ用ｿｽﾌ厄ｿｽｿｽOｿｽｿｽgｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽOｿｽOｿｽG
ｿｽAｿｽzｿｽﾟゑｿｽｿｽﾄゑｿｽｿｽﾝまゑｿｽｿｽｿｽB
