Jag är i behov av att optimera kod i Access (i viss mån även i VB6). En metod du kan använda om du inte får nåt annat svar (GetTickCount skall väl tydligen vara bra?) är att du kör varje grej du vill göra 1000 gånger, tar tiden och delar på 1000. Hej Om du bifogar din kod kan vi hjälpa dig optimera din kod. Debug.print Timer är nog ok. Det är procedurer på ca 1500 rader men mycket kod mot en sql2000. Vi kan väl få ett försök? Man behöver inte sätta sig in i allt. Man kan se generellt om något går att optimera. Du kanske kan skriva om en del loopar till smarta SQL fråger osv... >Vad är det för enhet man får tillbaka?Noggrann Timerfunktion i Access och VB
Jag hade tänkt mig att lägga i debug.print på utvalda ställen i koden.
Jag vill kunna avläsa tiden det tar att utföra vissa kommandon (främst mot en sql2000).
Det räcker inte alls med att ha en upplösning på en sekund (now())
Kan man på något sätt hämta någon annan tid eller liknande?
Jag behöver egentligen inte en upplösning i tid, det kan lika gärna vara någon form av 'antal processorloopar' eller liknande.
På detta sätt skulle jag kunna se var i koden jag har hastighetsproblem.
Jag behöver komma ner i något liknande 100-dels sekund eller noggrannare.
/ MikaelSv: Noggrann Timerfunktion i Access och VB
typ:
<code>
StartTime=Timer
For i=1 to 1000
'Din krångliga procedur
Next
OneTime=(Timer-StartTime)/1000
</code>Sv: Noggrann Timerfunktion i Access och VB
Den vanliga Timern är väl bäst, där kommer du ner till 56 ms räcker inte det ?
Om du väljer något annat så kommer den loopen att belasta processen.
API GetTickCount är väl det man tänker på först.Sv: Noggrann Timerfunktion i Access och VB
Sv: Noggrann Timerfunktion i Access och VB
Vad är det för enhet man får tillbaka?
Är det sekunder sen midnatt eller vad?
/ MikaelSv: Noggrann Timerfunktion i Access och VB
Tar alldeles för lång tid att sätta sig in i.
Men tack i alla fall.
/ MikaelSv: Noggrann Timerfunktion i Access och VB
Men det är du som bger oss en chans eller inte. ;o)
Om det är 1500 rader så kanske det är lättast att lägga den i filarean.Sv: Noggrann Timerfunktion i Access och VB
>Är det sekunder sen midnatt eller vad?
Millisekunder sedan midnatt.