Crystal Report still show database login prompt after using .setdatabaselogon

hi im currently developing vb.net program using vs2012 and crystal report for vs service pack 6, i got issue when im try to load report when running the program it use odbc name as server name and keep showing database login prompt even after i set server name in code , the report run fine if i using report preview in ide.

this is the code i'm using to load the crystal report

Dim report As New ReportDocument()
report.Load(Application.StartupPath & "\Report\BACK OFFICE\lprinventory.rpt")
report.SetDatabaseLogon("sa", "424378", "LAPTOP", "COZY")
CrystalReportViewer1.ReportSource = report


Thanks
Surya Halim

Sorry for bad english

I use the next code

Code:

---

  'Declarations
  Public CRReport As CrystalDecisions.CrystalReports.Engine.ReportDocument
  Public CRTable As CrystalDecisions.CrystalReports.Engine.Table
  Public CRTLI As CrystalDecisions.Shared.TableLogOnInfo

  'some procedure
  CRReport = New CrystalDecisions.CrystalReports.Engine.ReportDocument
  CRReport.Load(GRutaRpts & "MyReport.rpt", CrystalDecisions.Shared.OpenReportMethod.OpenReportByTempCopy)
  For Each Module1.CRTable In CRReport.Database.Tables
    CRTLI = CRTable.LogOnInfo
    With CRTLI.ConnectionInfo
      .ServerName = "MyDSNName"
      .UserID = "MyUserName"
      .Password = "MyPassword"
      .DatabaseName = "MyDBName"
    End With
    CRTable.ApplyLogOnInfo(CRTLI)
  Next CRTable

---