Hej! HejDoEvents
Jag håller på med ett tidskritiskt program.
Op en form har jag en Timer som ganska ofta kollar om en eller flera filer finns om så gör någonting.
Min fråga är
Private Sub Timer1_Timer()
If Not (Dir(AppPath & "dkkont.@@@") = "") Then CopyKtrl
If Not (Dir(AppPath & "licens.fra") = "") Then LicensSvar
If Not (Dir(ArtFragaFilNamn) = "") Then ArtikelGet
If Not (Dir(KFragaFilNamn) = "") Then KassorGet
If Not (Dir(ATittFragaFilnamn) = "") Then ArtTitt
end sub
Är det snabbare om jag i "subbarna" skriver DoEvents då min tanke är att
när Timer1 triggar så hittas ett annat filnamn och då körs den "subben"
också, nästan samtidigt.
Tacksam för förslag!
/BoSv: DoEvents
Njaaa om jag förstått rätt ,så är det inte så säkert
att du behöver något DoEvents alls. Men om
skulle isåfall lägga in ett DoEvents efter varje
If Not sats i Timern. Plats för studie hur det funkar.
mvh
Sven