急切求解！！！奉送我的全部金币！ (50分)

我在2003年程序员/杂志电子书/csdn开发高手10.期找到了一片关于登陆界面密码验证的问题！她的具体思路是这样的
1、新建的工程下建一个MAIN的主界面。
2、在新建一个LOGIN的界面
3、后来有一个叫USER.MDB的ACCESS数据库文件存放帐户的密码。里面有三个字段
USER_ID USER_NAME PASSWORD
4、通过CONN语句连接数据库验证帐户密码通过后即可进入主界面！
可我在调试LOGIN界面的时候老是在CONN语句处出现问题，我不知道为什么？是要定义什么函数吗？
提示为【Error】login.pass (23) undeclared indentifer :'TADOCconnetion'.
下面是我的代码：
1、login 界面的代码：
unit login;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TFrmLoign = class(TForm)
Label1: TLabel;
Label2: TLabel;
EdUserName: TEdit;
EdPWD: TEdit;
BtnLogin: TButton;
BtnCancel: TButton;

procedure FormCreate(Sender: TObject);
private
{ Private declarations }
conn:TADOConnection;
public
{ Public declarations }
end;

var
FrmLoign: TFrmLoign;
user_account,user_password:string;
//保存用户名称，密码信息
user_Validate:boolean;//验证用户是否通过验证信息
implementation
{$R *.dfm}
procedure TFrmLoign.FormCreate(Sender: TObject);
begin
//创建窗口时连接
user_validate :=false;
conn :=TADOConnection.Create(self);
try
conn:ConnectionString :=
'provider=microsoft.Jet.OLEDB.4.0;Data Source='+
ExtractFilepath(Application.Exename)+
user.mdb;persist Security Info=False;
conn.Loginprompt:=false;
conn.open
except
//出现异常退出整个系统
ShowMessage ('无法创建连接，退出系统！');
Application.Terminate;
end;

end.
我的MAIN界面的代码：
unit main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TFrmMain = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;

var
FrmMain: TFrmMain;
implementation
{$R *.dfm}
end.
谁能帮我解决问题呀，我把我的币全给她。或者留留下邮箱。我把程序发过去、帮我调试一下，这里面我很想认识几个高手！
谢谢！

sorry, i cannot input Chinese.
>>【Error】login.pass (23) undeclared indentifer :'TADOCconnetion'.
>>uses
>> Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
>> Dialogs, StdCtrls;
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ADODB;
please add "ADODB;"

应增加ADODB单元的应用
unit main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, DBTables, ADODB;

来晚啦,问题是没有声明ADODB单元呀!
不要给分我呀!![]

谢谢，在第一个CONN语句连接通过。但是在 conn:ConnectionString :=
中又提示出现错误，提示为[error]login.pas[42];
':='expected but ';'found
如何修改那！！
按上面提示没有什么错误呀！

谁在帮我顶一下,我还有一个疑问??或者留个邮件,能否帮我调试一下.

什么问题呀,有人能帮我解决吗??

多人接受答案了。

conn:ConnectionString :=
'provider=microsoft.Jet.OLEDB.4.0;Data Source='+
ExtractFilepath(Application.Exename)+
'user.mdb;persist Security Info=False';

下面user前面和false后面没有''就不是字符串了，大哥～～

不行呀!我的问题还是出在 conn:ConnectionString := 这句
编译时提示为[error]login.pas[42];
':='expected but ';'found
[error]login.pas[42];
left side cannot be assingned to
????????????????????????????????怎么解决那!

谁能帮我解决调试这个程序那!
或者提供一个类似的数据库验证后登陆的界面的源程序!!
谢谢!!!