|Kernel - Get exact consumed time of VBS function|
Dim Kernel, OldCounter Set Kernel = CreateObject("ScriptUtils.Kernel") 'Get counter OldCounter = Kernel.hrCounter 'Some operation taking many time Dim Data, Parameter Parameter = "Some parameter" Data = CreateData(Parameter) 'Count number of microsecond Dim msTime msTime = 1000*(Kernel.hrCounter - OldCounter) msTime = msTime / Kernel.hrFrequency 'Output results Wscript.Echo "CreateData takes " & msTime & " milisecond"
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: email@example.com