续：关于BCB5+ADO+ACCESS，高手HELP ME。

[zfming]

用ADO数据库编程，ConnectionString中的数据库路径可否在程序中动态生成？

[Tyro]

不懂什么意思！

[知行职场-雷曼]

可以动态生成是不是弹出一个DATALINK的对话框？
你可以试试
Public Function GetConnectDSN(ByVal DSN As String) As String
Dim c As DataLinks
Dim d As ADODB.Connection
Set c = New DataLinks
Set d = New ADODB.Connection
d.ConnectionString = DSN
If c.PromptEdit(d) = True Then
GetConnectDSN = d.ConnectionString
mvarLastDSN = d.ConnectionString
mvarConnectResult = True
Else
mvarConnectResult = False
GetConnectDSN = ""
End If
Set d = Nothing
End Function

[知行职场-雷曼]

不好意思，我是用VB实现的，我初学BCB，还不能用BCB来回答，SORRY

[nononono]

这回答也不是BCB, 是Delphi. 呵呵

[nononono]

哦哦,是VB.

[Wingsun]

当然可以啊，如下：
AnsiString Con="Provider=SQLOLEDB.1;Persist Security "
"Info=False;Initial Catalog=WLJK;"
"Locale Identifier=2052;"
"Connect Timeout=15;"
"Use Procedure for Prepare=1;"
"Auto Translate=True;"
"Packet Size=4096;";
AnsiString ConnectionString;
ConnectionString=Con;
ConnectionString+="User ID="+User+";";
ConnectionString+="Data Source="+Server+";";
ConnectionString+="Password="+Password+";";
cnCIQDatabase->ConnectionString=ConnectionString;
cnCIQDatabase->Connectted=true;
这是连接SQL Server的。可变的参数是Server Name、Password和User Name.
你可以根据你的需要改变它。

[duhorse]

ConnectionString是一个字串类型，其中的数据库路径，你只要根据实际运行的情况取得正确的数据库文件路径，然后组合为一个正确的ConnectionString字符串，再连接就可以了，主要是知道ConnectionString的组合格式，再取得正确路径就OK。

[wu_xin]

同意wingsun,ACCESS比这简单!

[bruce_zhao]

To Wingsun:
具体的参数是什么意思？如果我用ADO访问一个DBF文件，该怎么设置？

[bruce_zhao]

To Wingsun:
具体的参数是什么意思？如果我用ADO访问一个DBF文件，该怎么设置？

[Wingsun]

古老的问题，应该给分了！

[zfming]

呵，这么老的帐都让孙老大发现了，我实在是忘了，请大家原谅，现在给分：）