How do I change the database connection information in Crystal Reports from the development database to production database at runtime?

I am having trouble with changing the database connection information from my development database to the production database when my reports program is run.
Here's the setup:  I develop the reports in Crystal Reports using a development database on my laptop. I have a Visual Basic 6 program that shows that report to the end user. The problem is getting the database connection information changed so it works on the user's computer, not just on my development computer.

Here's what I currently do (code follows):

Dim m_objReport As New rptCalendar

m_objReport.Database.LogOnServer "P2SODBC.dll", "myDSN", "prodDB", "userID", "myPassword"
   
   Screen.MousePointer = vbHourglass
   CRViewer1.ReportSource = m_objReport
   CRViewer1.ViewReport
   Screen.MousePointer = vbDefault

rptCalendar is a report file imported into Visual basic as a crystal reports designer component.
It works fine on my development computer and it also works on the production computer as long as the connection information, including the name of the database and the password, are identical on the production and development computer.
Obviously this isn't always possible.  How can I change this to make it work even if the development and production databases have very different logins?

I've tried a lot of different things from the Crystal help website, but nothing seems to work consistently.
I get a lot of errors like 'Login failed' on the production machine unless I make the logins identical.

I've also tried it like this for external reports (not integrated into the executable):

Dim crxTable As CRAXDRT.DatabaseTable
Dim m_crxApp As CRAXDRT.Application
Dim m_crxReport As CRAXDRT.Report

Set m_crxApp = New CRAXDRT.Application
      ' log on to the server
      m_crxApp.LogOnServer "P2SODBC.dll", "myDSN", "prodDB", "userID", "myPassword"
      ' open report object
     
      Set m_crxReport = m_crxApp.OpenReport(strReportNameAndPath, 1)
      ' set each table to the correct DSN, DB, UID and PWD    
      For Each crxTable In m_crxReport.Database.Tables
         crxTable.SetLogOnInfo "myDSN", "prodDB", "userID", "myPassword"
      Next crxTable

This works sometimes, but not always.

I usually get Login Failed errors with various codes.

What's the way to make this work - programatically so developed reports open up using production database?

Note:  I mostly use SQL Server databases, but sometimes need to use Access.

Thanks,

Ron