怎样调用udl文件?
我在调用udl文件时总是提示‘连接字符串属性无效的错误’,应该怎样解决?代码如下:
procedure TDM.DataModuleCreate(Sender: TObject);
var
AppPath:array [0..MAX_PATH] of Char;
LW:LongWord;
Path,ConnectStr:String;
begin
LW:=GetModuleFileName(Hinstance,@AppPath,SizeOf(AppPath));
SetString(Path,AppPath,LW);
ConnectSTr:= 'File name= '+ExtractFilePath(Path)+ '1.udl ';
Adoc.Connected:=False;
try
Adoc.ConnectionString:=ConnectStr;
Adoc.Connected:=True;
Except
MessageDlg( '连接资料库失败! ',mtInformation,[mbok],0);
Application.Terminate;
end;
end;
[解决办法]
浪费几分钟时间做一个吧,
:)