Crystal XI problem with .AddADOCommand under MS vista

This works fine under Windows XP but fails under Windows Vista. We have upgraded to the latest fix pack, 5.4, but this has not fixed our problem.

The followong code crashes when trying to execute the .AddADOCommand line:

Dim crxReport As New CRAXDRT.Report

Dim cmd As Command

Set cmd = New Command

Set crxReport = crxApplication.NewReport

cmd.ActiveConnection = conn

cmd.CommandText = sSQLGrid

cmd.CommandType = adCmdUnknown

crxReport.Database.AddADOCommand conn, cmd

The error comes back with -2147189176 "Logon failed."

Any help would be greatly appreciated.

Thanks

Boris Cousins