Apart from the fact you have already posted this question on the VB forums:
vb6 crystal report- subreport - Visual Basic Discussion Boards[
^], you state here
hoomi_ghost said:
in my code i have error logon failed
Which I'm guessing is produced by this line:
crxDatabaseTable.SetLogOnInfo "Local", "Database.mdb", "Admin", "123456"
It would imply that password you are using is incorrect. Incidentally, you should avoid using the Admin account for stuff like this.