ミリ秒単位の時間を計測するためのコンポーネントを VC++5.0と ATLで作成してみました。
IIS3.0、IIS4.0、WSHでの動作を確認しています。

ミリ秒単位の時間をあつかうコンポーネントです。
VisualC++ 5.0とATLで開発しました。
関連するWIN32APIは、GetTickCount,GetLocalTime,Sleep です。
ソースをつけていますので、ご自由に利用していただければと思います。

DLL : timetool.lzh
プロジェクト: project.lzh

Set objTime = Server.CreateObject("TimeTool.Time")
TickCount = objTime.GetTickCount


WindowsNT4.0SP3 でのみ動作を確認してます。
TimeTool.LZH を解凍して、TimeTool.DLL を作成します。
このファイルを \WinNT\System32 ディレクトリなどにコピーします。
コマンドラインから regsvr32 TimeTool.DLL を実行します。
「DllRegisterServer in timetool.dll succeede」とダイアログが
表示されれば、セットアップは終了です。

スレッドモデルは、「両方」にしています。
フリースレッドマーシャラは、使っていません。

ASPの場合: Set objProfile = Server.CreateObject("TimeTool.Time")
WSHの場合: Set objProfile = CreateObject("TimeTool.Time")

GetTickCount	Windowsが起動してからの経過時間を取得する
GetLocalTime	現在の日時を取得する
Sleep	スリープする

GetTickCount

Windowsが起動してからの経過時間を取得する

GetTickCount

戻り値:(long) 経過時間(ミリ秒)

例: nCount = Time.GetTickCount

※ Window起動後 49.7日経過すると 0 に戻ります

GetLocalTime

現在の日時を取得する

GetLocalTime(nYear, nMonth, nDayOfWeek, nDay, nHour, nMinute, nSecond, nMilliseconds)

名前	データ型	内容
nYear	Variant(Int)	年(西暦)
nMonth	Variant(Int)	月
nDay	Variant(Int)	日
nDayOfWeek	Variant(Int)	曜日(日曜日=0,月曜日=1,...)
nHour	Variant(Int)	時
nMinute	Variant(Int)	分
nSecond	Variant(Int)	秒
nMilliseconds	Variant(Int)	ミリ秒

戻り値:なし

例: Time.GetLocalTime nYear, nMonth, nDayOfWeek, nDay, nHour, nMinute, nSecond, nMilliseconds

引数は、Variant型です。NULLを指定することもできます。

Sleep

スリープします。

Sleep nMilliseconds

nMilliseconds

スリープする時間(ミリ秒)

戻り値: なし

例: Time.Sleep 1000

とくになし