Kernel - Get exact duration of a VBS function using msPerformanceCounter

Sample for ScriptUtils.Kernel.hrTimeCounter | Changes | Purchase | Download


Kernel - Get exact duration of a VBS function using msPerformanceCounter 
  Dim Kernel, OldhrTimeCounter
  Set Kernel = CreateObject("ScriptUtils.Kernel")

  'Get counter
  OldhrTimeCounter = Kernel.hrTimeCounter

  'Some operation taking many time
  Dim Data, Parameter
  Parameter = "Some parameter"
  Data = CreateData(Parameter)

  'Count number of microsecond
  Dim msTime
  msTime = Kernel.hrTimeCounter - OldhrTimeCounter

  'Output results
  Wscript.Echo "CreateData takes " & msTime & " milisecond"

Other links for the Kernel - Get exact duration of a VBS function using msPerformanceCounter sample


COM API for calling some of Kernel32 functions.


Huge ASP upload is easy to use, hi-performance ASP file upload component with progress bar indicator. This component lets you upload multiple files with size up to 4GB to a disk or a database along with another form fields. Huge ASP file upload is a most featured upload component on a market with competitive price and a great performance . The software has also a free version of asp upload with progress, called Pure asp upload , written in plain VBS, without components (so you do not need to install anything on server). This installation package contains also ScriptUtilities library. Script Utilities lets you create hi-performance log files , works with binary data , you can download multiple files with zip/arj compression, work with INI files and much more with the ASP utility.

© 1996 - 2011 Antonin Foller, Motobit Software | About, Contacts | e-mail:

Other Motobit links:   IISTracer, real-time IIS monitor   ASP file upload - upload files to ASP. 
ActiveX/VBSScript registry editor  ActiveX NT User account manager  Export MDB/DBF from ASP Active LogFile  Email export  ActiveX/ASP Scripting Dictionary object