cn.Connect = "uid=cas;pwd=cas;server=" & SERVER & ";" _ & "driver={SQL Server};database=dat;DSN='pp';"運行時，老彈出選擇數據源，但在上面這段話里已經設定了

熱心網友

Dim strCnn as stringStrCnn = \"Provider=SQLOLEDB.1;User ID=用戶名;password=用戶密碼;Initial Catalog=服務器;Data Source=數據庫\"cnn.open strCnn也可以通過讀的方式去讀取ini（數據庫名）文件。

熱心網友

看你是用的是ODBC連接的,要先設一下ODBC吧.用ADO更方便一些.

熱心網友

同意一下.............

熱心網友

蟲子說的對呀!就是這樣的.

熱心網友

Cn.ConnectionString = \"provider=sqloledb;integrated security=false;uid=sa用戶名;pwd=密碼;data source=服務器名;initial catalog=數據庫名\"我是這樣寫得就可以用 你可以試試看