控制台程序 如何用ado控件 我的代码错在哪里?一运行就抱错???谢谢 ( 积分: 40 )

  • 主题发起人 主题发起人 mazheng
  • 开始时间 开始时间
M

mazheng

Unregistered / Unconfirmed
GUEST, unregistred user!
uses
SysUtils,ADODB;

var ADQrySql2k,ADQryMdb: TADOQuery;
//ADOConnection: TADOConnection;
MdbFile :string;
begin
{ TODO -oUser -cConsole Main : Insert code here }
try
ADQrySql2k:=TADOQuery.Create(nil);
ADQryMdb:=TADOQuery.Create(nil);
try
MdbFile := paramstr(1);
finally
ADQrySql2k.Free;
ADQrySql2k.Free;
end;
except
end;
end.
 
出什么错啊?paramstr(1);这是哪里的?
 
在你使用ADO的单元中加入对ActiveX单元的引用,并在单元末处添加如下代码:
initialization
CoInitialize(Nil);
 
如何添加‘引用’? 我应该如何具体些呢 ? 谢谢赐教
 
uses ActiveX;
 
后退
顶部