读书人

如何 通过 代码 查看AOD的版本

发布时间: 2012-03-28 15:40:03 作者: rapoo

怎么 通过 代码 查看AOD的版本
如题!

再请教下不同的版本,相同的异常,提示信息会不一样吗?

[解决办法]
是ADO吧,,注册表的HKEY_LOCAL_MACHINE\Software\Microsoft\DataAccess下有Version项,
uses Registry;

Delphi(Pascal) code
procedure TForm1.Button1Click(Sender: TObject);var reg:Tregistry; KeyList: TStringList; i: Integer;begin  reg:=Tregistry.create;  KeyList := TStringList.Create;  reg.RootKey := HKEY_LOCAL_MACHINE;  reg.openkey('Software\Microsoft\DataAccess', False);  reg.GetValueNames(KeyList);  for i := 0 to KeyList.Count - 1 do  begin   if KeyList[i] = 'Version' then      ShowMessage(reg.ReadString(KeyList[i]));  end;  reg.CloseKey;  reg.free;  KeyList.Free;end;
[解决办法]
版本:2.81.1132.0
ShowMessage(ADOConnection1.Version);
版本:2.8

[解决办法]
太给力了呀
case5166

读书人网 >.NET

热点推荐