COM の登録作業


  システムディレクトリの取得



Shell.Application を使用すると、システムディレクトリを取得できます

  
WScript.Echo GetSystemDirectory( )

' **********************************************************
' システムディレクトリの取得
' **********************************************************
Function GetSystemDirectory( )

	Dim obj

	Set obj = CreateObject( "Shell.Application" )
	Set objFolder = obj.Namespace( &H25 )
	Set objFolderItem = objFolder.Self
	GetSystemDirectory = objFolderItem.Path

End Function
  










  infoboard   管理者用   
このエントリーをはてなブックマークに追加




SQLの窓  天気  IT用語辞典
Yahoo!ニュース  マルチ辞書
PHP マニュアル  Google URL短縮 


フリーフォントWEBサービス
SQLの窓WEBサービス

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ