参照設定として、 Microsoft ActiveX Data Objects 2.1 Libraryから Microsoft ActiveX Data Objects 2.7 Libraryくらいで いろいろ試しています。
実験としまして、 Set DB = New ADODB.Connection DB.ConnectionString = "Provider=SQLOLEDB;USER ID=sa;Password='';Initial Catalog='xxx';Data Source='server'" DB.Open にて、接続し、