Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
 
rs.Open "SELECT * FROM Table_F", "Provider=SQLOLEDB.1;Password=pwd;Persist" & _
  "Security Info=True;User ID=sa;Initial Catalog=DbLogistic;Data Source=(local);