Timer not working if form opened via Docmd.OpenForm

[pdtit]

Hello,

I have a small form which is used to show a "Please Wait" message before opening a report.
In the FAQ's on this site, I used the code to place a scrolling textbar (marquee) on this form using the Timer function.

When the form is opened from the Access DB Window, I can see the marquee.
When the form is opened using a DoCmd.OpenForm, the marquee is not shown.

What am I doing wrong here ??

The complete Docmd.Openform line is :

DoCmd.OpenForm "frm_pleasewait", acNormal, "", "", acReadOnly, acWindowNormal 'Opens my pleasewait form
DoCmd.RepaintObject acForm, "frm_pleasewait"
DoCmd.OpenReport "stock per productrange", acViewPreview, , VarCriteria 'Opens my report
DoCmd.Close acForm, "frm_pleasewait" 'Once report is open, please wait message dissappears
DoCmd.Close acForm, "popup stock per productrange" 'this is a form with a combobox to select the product range to print

Could anyone check this out ??

Regards,

PdtIt

 

[tunsarod]

I think you need to ditch the acReadOnly option, since clearly the form has to be updateable for the marquee text to move. Also you don't need the empty marks "".

Rod

 

[pdtit]

Rod,

Thx for your suggestion, but it's still the same.

I'm testing on using animated gifs to do this.

If it works, I'll post the feedback in this forum.

PdtIt