title: How can I connect to Lotus thru ODBC using VBA?
body: <p>I'm interested in setting up an Access db to run a report automatically.  To save myself the trouble of going to each client computer and setting up the appropriate DSNs, I'd like to set up the ODBC connections in the VB script itself if possible. </p>
  
  <p>I've googled and checked this site and found some good starter code, but not enough to make all the error messages go away.  Can someone complete the code below?</p>
  
  <pre><code>Sub SetupODBC(Str_Server as string, Str_Db as string)  
   'Str_Server=Name of Server
   'Str_db=Name of Database
   Dim C as ADODB.Connection  
   Set C = new ADODB.Connection  
   C.ConnectionString = ??  
   C.Open  
   Debug.print C.State  
  Exit Sub
  </code></pre>