Public adoCon As New ADODB.Connection '定義一個資料連接
Public adoRs As New ADODB.Recordset '定義一個資料集物件
Public adoRs1 As New ADODB.Recordset '定義一個資料集物件
Public bQx(1 To 24) As Boolean '權限
Public Name1 As String
Public StrNums As Integer
Public Temps '定義一個變體型別的公共變數
'宣告一個API函式，用于實作使表單置前還是取消表單置前的功能
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Public rtn
Public CnnStr As String
Public Sub Main() '定義一個公共主函式，用于連接資料庫
CnnStr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_SPJXC;Data Source=."
adoCon.Open (CnnStr)
End Sub
uj5u.com熱心網友回復：
User ID=sa;PWD=sa的密碼;uj5u.com熱心網友回復：
連接字串沒有密碼呀.最簡單的辦法是添加ADODC控制元件, 然后使用控制元件的連接功能連接測驗, 然后控制元件可以自動生成連接字串.
把生成的連接字串拷貝過來即可. 方便又不會出錯.
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/134069.html