CrystalReports no cargan

[d3dx9_86]

hola, me llamo Nelson, me encuentro programando en .NET 2003 y SQL 2000.
Quiero hacer unos reportes de unas tablas utilizando Crystal Reports, este es mi codigo:

Public Sub CargarReporte(ByVal SQL As String)
Dim dt As DataTable
oAdapter = New SqlDataAdapter(SQL, Cn.oConexion)
oDataSet = New DataSet
Cn.ConectarSQL()
oAdapter.Fill(oDataSet, "Datos")
Cn.DesconectarSQL()
dt = oDataSet.Tables(0)
Dim ob As New Rpt_Inventario_General
ob.SetDataSource(dt)
Me.CrystalReportViewer1.ReportSource = ob
End Sub

el problema que cuando se abre el crystalreportviewer, me pide que ingrese los datos de conexion al servidor, me dijeron que utilizara este codigo:

For Each tbC As CrystalDecisions.CrystalReports.Engine.Table In ob.Database.Tables()
Dim tliC As CrystalDecisions.Shared.TableLogOnInfo = tbC.LogOnInfo()
With tliC.ConnectionInfo
.ServerName = "SERVER2"
.UserID = "sa"
.Password = "sistemas"
.DatabaseName = "SAAI"
End With
Next

pero no me funciona, agredeceria si alguien me puede dar una mano con esto.