Screen shot problems

[#1]

I have a huge problem,  I need to make a bmp every 30 minutes. But sometimes after reloadin i got the picture attached. The problem is that I have the screenshot ruined from that. Please can you help me?  (by the way, I am using qv 8.20)

[#2]

the macro used:

call selezionadatacorrente

ActiveDocument.DoReload 2,false,false
ActiveDocument.GetApplication.WaitForIdle
   
ActiveDocument.Clearall false
   

ActiveDocument.GetApplication.Refresh
call lancia

sub lancia()

tmpPath = ActiveDocument.GetPathName

InStrRev

( tmpPath , "\" )

Left

( tmpPath , (lastBackSlash - 1) )+"\"+NOMEFILE

"MAIN"

).ExportBitmapToFile pathfile&"TURNOVER.bmp"

end sub

[#3]

Solved

[m_woolf]

How?