用opendialog打开数据库文件，连接时出现问题 200分 在线等(200)

W

wjhyyh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2009-03-23

• #1

procedure TForm1.Button1Click(Sender: TObject);beginopendialog1.Execute;adoquery1.ConnectionString :='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=这里怎么写;Persist Security Info=False';adoquery1.Active :=true;end;

 

Z

znxia

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2009-03-23

• #2

procedure TForm1.Button1Click(Sender: TObject);begin if not opendialog1.Execute then exit; adoquery1.ConnectionString := format('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Persist Security Info=False',[opendialog1.filename]); adoquery1.close; adoquery1.sql.text:=_______ adoquery1.Active :=true;end;

 

A

apiao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2009-03-24

• #3

楼上正解

 

草

草原骏马

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2009-03-24

• #4

znxia 的回复速度真是一流。似乎每时每刻都在关注 dfw ，没得说了。很多的贴，第一个回复的都是znxia。znxia正解。

 

芙

芙蓉弟弟

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2009-03-24

• #5

[]楼上你想笑死我 ？

 

W

wql

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2009-03-24

• #6

procedure TForm1.Button1Click(Sender: TObject);beginopendialog1.Execute;adoquery1.ConnectionString :='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+YouPath[例如c:/demo/dbf]+'/'+opendialog1.filename+';Persist Security Info=False';adoquery1.Active :=true;end;

 

W

wjhyyh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2009-03-24

• #7

接受答案了.