Unable logon server

I am useing vb6 and cr 8.5
please where i am wrong


Dim StrDatabase As String
Dim StrUsr As String
Dim StrPass As String
Dim StrDataSoruce As String

StrDatabase = "HospDB"
StrUsr = "sa"
StrPass = "prince73"
StrSource = "server"


CrRegCard.LogOnServer "crdb_odbc.dll", StrSource, StrDabase, StrUsr, StrPass
unable to logon server

if i uses
CrRegCard.Database.LogOnServer "crdb_odbc.dll", StrSource, StrDabase, StrUsr, StrPass
object dosnt support this property or method

any advise passing password to the cr report