環境：Win2000、VB.NET、OLEDB

VB.NETからCrystalReportを用いて帳票を出したいのですが
帳票を出力する前に、ユーザ名やパスワードを入力する
ダイアログボックスが出て困っています。
次のような記述で、データベースに繋ぐのに必要な情報を
送っているつもりなのですが・・・。

Dim logOnInfo As New CrystalDecisions.Shared.TableLogOnInfo()
Dim CryRep As New CrystalReport1()

logOnInfo.ConnectionInfo.ServerName = "xxx"
logOnInfo.ConnectionInfo.DatabaseName = "xxx"
logOnInfo.ConnectionInfo.UserID = "xxx"
logOnInfo.ConnectionInfo.Password = "xxx"
CryRep.Database.Tables.Item(0).ApplyLogOnInfo(logOnInfo)

回避する方法を教えてもらえないでしょうか？