Hi,
Sorry the way I write, but my english is poor.
I have the following module and I want to get a form with progress bar to
display to users the step of the job.
Sub ClimeSPVTG1()
DoCmd.SetWarnings False
MyBD.Execute ClimeSPVTG101, 0
MyBD.Execute qry02_ClimeHdrSPVTG102, 0
MyBD.Execute qry02_ClimeDtlSPVTG103, 0
MyBD.Execute ClimeSPVTG104, 0
MyBD.Execute qry02_ClimeHdrSPVTG105, 0
MyBD.Execute qry02_ClimeDtlSPVTG106, 0
MyBD.Execute ClimeSPVTG107, 0
DoCmd.TransferText acExportDelim, "TXT Files Export Specification",
"qry02_PrepTxtSPVTG1", "\\setp03iapl01\climestore\Data\Programas Locais\
AplicGeral\OutputFiles\Balancetes\Aplic03-SPVTG1.txt", False, ""
MyBD.Execute BridgeSPVTit01, 0
MyBD.Execute qry02_BridgeHdrSPVTit02, 0
MyBD.Execute qry02_BridgeDtlSPVTit03, 0
DoCmd.TransferText acExportDelim, "TXT Files Export Specification",
"qry02_PrepSarSPVTit", "\\setp03iapl01\climestore\Data\Programas Locais\
AplicGeral\OutputFiles\Balancetes\SAR-SPVTit.txt", False, ""
End Sub
Anyone can help me??
Thanks
RuralGuy@YOURCLOTHESWildBlue.Net - 17 Aug 2005 20:00 GMT
>Hi,
>
[quoted text clipped - 29 lines]
>
>Thanks
Maybe this link can help:
http://home.bendbroadband.com/conradsystems/accessjunkie/progressbars.html
_______________________________________________
hth - RuralGuy (RG for short)
Please post to the NewsGroup so all may benefit.
RuiSoares - 18 Aug 2005 09:55 GMT
Hi RG,
Thanks for your help.
RS
RuralGuy@YOURCLOTHESWildBlue.Net - 18 Aug 2005 13:05 GMT
>Hi RG,
>
>Thanks for your help.
>
>RS
You're very welcome.
_______________________________________________
hth - RuralGuy (RG for short)
Please post to the NewsGroup so all may benefit.