Crystal Reports problem with setting use dsn default properties

Message

   Crystal report 9.0

Visual basic 6.0

Database Oracle 8i

I have an application which uses crystal report 9.0 to preview data. I have created a view in oracle which uses grouping to sum the value. for example:

create or replace view myView as select id, sum(case when type in (1,2,3) then amount else 0 end) as type1amount,sum(case when type in (4,5,6) then amount else 0 end) as type2amount from mytable

I have used this view and another master table to create a report.

The problem is when i try to view the report in crystal report viewer in my application, the report doesn't show the amount with decimal even if the table contains the amount with decimal. 

my ado connection string in application is

"dsn=UserDSN ;UID=UserName;pwd=UserPassword"

I have created an instance of CRAXDDRT.Application and named it as crApp

then

logged on to crystal report as

crApp.logonserver "P2SODBC.dll", UDSN, "", UName, UPasswd

At the time of previewing the report I do as follows:

dim crReport as Report

set CrReport=CrApp.OpenReport(App.Path & "myreport.rpt")

CRViewer91.reportsource=crReport

crViewer91.viewReport

Is there any problem with the way i have done it.

By the way I have used Microsoft ODBC which seems to be the problem. So when I use Oracle ODBC everything is fine.

When I opened the report in crystal report 10.0 and looked database properties in set Datasource Location, I found out that another property called "Use DSN Default Properties" set to false. As far as I have found out I need to set this property into the report. So i tride to do like this:

With CrReport.Database

For i = 1 To .Tables.count

Set ConnectionInfo = CrReport.Database.Tables(i).ConnectionProperties

ConnectionInfo.Item("DSN") = "mydsn"

ConnectionInfo.Item("User ID") = "userid"

ConnectionInfo.Item("Password") = "password"

ConnectionInfo.Item("Use DSN Default Properties") = false

Next i

But the line numbers 7 doesn't execute and show error something like this:

"the object invoked has disconnected from its client"

I need to stick to the Microsoft ODBC coz most of my client machines have been setup with Microsoft ODBC.

Can anyone help me out here plz..........