调试程序!急!!(0分)

我有一个程序,在调试的过程中老是出问题,
1、新建的工程下建一个MAIN的主界面。
2、在新建一个LOGIN的界面
3、后来有一个叫USER.MDB的ACCESS数据库文件存放帐户的密码。里面有三个字段
USER_ID USER_NAME PASSWORD
4、通过CONN语句连接数据库验证帐户密码通过后即可进入主界面！
可我在调试LOGIN界面的时候老是在CONN语句处出现问题，我不知道为什么？
下面是我的代码：
unit login;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,DB ,ADODB;
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.
我的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.
谁能帮我解决问题呀，我把我的币全给她。或者留留下邮箱。我把程序发过去、
谢谢！
______________________________________________________
问题出现在这句如何进行调试!
[error]login.pas[42];
':='expected but ';'found
[error]login.pas[42];
left side cannot be assingned to
我的邮件箱 minboy772008@yahoo.com.cn 能发到我的邮件箱里吗??
我的QQ是18953483 愿意在这里认识一些朋友.

把這段代碼放到form的onshow事件中去:
//创建窗口时连接
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;

kouchun:
在我的LOGIN.PAS 代码中有这段,不知道为什么调试老时出现问题,已经好几天了!
错误提示为.
[error]login.pas[42];
':='expected but ';'found
[error]login.pas[42];
left side cannot be assingned to
我不知道还有什么地方不对的?

郁闷死了,这个问题已经弄了好几天了,还没有结果.谁有相关通过密码验证登陆主界面的例子源文件.
或者谁愿意留下邮件
我把源程序发过去帮我调试一下,小弟不甚感激!

我都郁闷死了,弄了好几天了,心情糟透了!
!有好心人帮帮我吗??我不甚感激!

发给我试试，
cqw860@sohu.com

发给我吧，jiawei_0806@163.com

cqw860:
谢谢,我正在准备发邮件给你!

会不会你的ConnectionString语句错误？？？
是什么数据库？

conn:ConnectionString :=
:这里错！！！
另外你的连接字符串也有错

[red] conn:ConnectionString :=
'provider=microsoft.Jet.OLEDB.4.0;Data Source='+
ExtractFilepath(Application.Exename)+
user.mdb;persist Security Info=False;
[/red]
这样的句子应该也不是 DELPHI 的, 要真是看不出哪里出了问题, 去买一本最最便宜的 DELPHI 入门书看一下, 字符串如何相加.
据我所知要是字符串相加的话, 下面的才可以执行:
[brown] conn.ConnectionString :=
'provider=microsoft.Jet.OLEDB.4.0;Data Source='+
ExtractFilepath(Application.Exename)+
'user.mdb;persist Security Info=False;';[/brown]
[blue]kouchun[/blue] 先生/女士:
请在回答别人问题的时候仔细看一下, 别误导别人. 人家连错误信息都写出来了. 你就不能给一个正确答案???.
[!][!]

gear1023:
谢谢你!!根据你的提示我的程序调试成功了!!真是太谢谢你了!真的很希望认识你!