Sub connectSQL() Dim Conn As ADODB.Connection Dim sConnect As String Dim strSqlInstance As String Dim strSqlDB As String Dim strSqlUser As String Dim strSqlPWD As String ' strSqlInstance = "SERVER_NAME\INSTANCE" ' 如果伺服器只有裝一次 SQL,就只要輸入伺服器名稱 strSqlInstance...