大家幫忙看看，用delphi連接note庫，看看問題出在那裏。

Question

大家幫忙看看，用delphi連接note庫，看看問題出在那裏。unit dominoUnit;interfaceuses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,comobj,Domino_TLB,
StdCtrls;type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
var
Form1: TForm1;ns:notessession;
nd:notesdatabase;implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);beginedit1.text:= ns.UserName;
nd:= ns.GetDatabase('yourservername','yourdatabasePath',true);
edit2.text:= nd.Get_FilePath ;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
ns:= createoleobject('Lotus.NotesSession') as notessession;
try
ns.Initialize('yourpassword');
except
showmessage('logonfailed');
application.Terminate;
end;
end;end. 

Answer 1

沒有人回答嗎？俺著急啊