怎么用ADO连接SQL2000数据库，而且不出现登录窗口，最好给出源码（100分）(100分)

W

wgjxnm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-18

• #1

怎么用ADO连接SQL2000数据库，而且不出现登录窗口，最好给出源码（100分）

 

M

myliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-18

• #2

ConnectString:=Provider=SQLOLEDB.1;Password=XXXX;Persist Security Info=True;
User ID=User;Initial Catalog=XXXX;
Data Source=FileServerName;Auto Translate=False
AdoConnection.Loginprompt:=False;

 

N

night

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-18

• #3

不用代码实现
你把adoconnection的loginpromt属性改成false就好了

 

L

lb_icesea79

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-18

• #4

procedure ConnectDatabase;
Const
ConnStr='Provider=%s;Password=%s;Persist Security Info=True;'+
'User ID=%s;Initial CataLog=%s;Data Source=%s';
begin
DataConn.Open;
//尝试连接数据库
Try
With DataConn Do
Begin
IF Connected Then Connected:=False;
ConnectionString:=Format(ConnStr,['SQLOLEDB.1','AAA','asdf','asdf','.']);
loginPromt:=False;
Open;
End;
Except
MessageBox(Handle,'请检测网络或数据库是否发生故障？','错误',MB_Ok OR Mb_IConInformation);
Application.Terminate;
End;
End;

 

S

sichuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-18

• #5

允许保存密码

 

L

lizhongyi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-19

• #6

ConnectString:='Provider=SQLOLEDB.1;Password=用户密码;Persist Security Info=True;
User ID=用户名;Initial Catalog=数据库名;
Data Source=服务器名'
With DataConn Do
Begin
IF Connected Then Connected:=False;
ConnectionString:=cnString;
loginPromt:=False;
Open;
End;

 

C

christin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-19

• #7

night说的对，这样最方便

 

Y

yzb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-19

• #8

设LoginPromt=False 就OK　了

 

张

张无忌

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-19

• #9

呵何，[^]

 

R

renyi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-19

• #10

来迟了，呵呵 [][]

 

W

wgjxnm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-19

• #11

多人接受答案了。