SerialNumber
シリアル番号取得
文法
Driveオブジェクト.SerialNumber
機能説明
指定されているドライブのシリアル番号を取得
使用例
<![CDATA[
<%
Dim objFs,objDrv
Set objFs = Server.CreateObject("Scripting.FileSystemObject")
Set objDrv = objFs.GetDrive("C")
Response.Write "シリアルナンバー : " & objDrv.SerialNumber & "<br>"
'オブジェクトを開放
Set objDrv = Nothing
Set objFs = Nothing
%>
]]>
Topへ