VB6 App Using WTSOpenServer - Hangs Running on Win7

I have an app when running on XP works fine, Win7 it hangs.

When I make the call to WTSOpenServer on XP, if the server is down, a 3 second delay happens, and the app goes forward.

When running on Win7, the app will hang there instead of going on.

My guess is that there has been a dll change somewhere in Win7 that is causing this.

Since there is only 1 parameter, I have no control over WTSOpenServer's behavior.

Any suggestions ?

Thanks.