Time Of Material

MUGEN のボイスパッチ作成がメイン。後は雑記というか愚痴日記が多いブログです。

スポンサーサイト

Category: スポンサー広告  
上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。


Windows7 で ANS-9010 自動フォーマットについて

Category: パソコン  
知恵をお借りしたい。ANS-9010 について。

現状バッテリーを抜いて、さらに外部給電(ただしパソコンと連動)のため、
シャットダウン後に強制削除されるようにしているので、
自動的にフォーマット&再設定してくれると助かると思い調べた結果。

直リン すみません。ANS-9010 自動セッティング

テストパソコン Windows XP ではあっさり動いてくれましたが、
Windows 7 ではどうも動いてくれません。

Option Explicit
Dim ANSDriveNum
ANSDriveNum = 0 ← ここは書き換えてある。
Dim objWMIService, colDiskDrives, objDiskDrive
Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
Set objWMIService = GetObject( _
"winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colDiskDrives = _
objWMIService.ExecQuery("Select * from Win32_DiskDrive")
For each objDiskDrive in colDiskDrives
If InStr(objDiskDrive.Model,"ANS9010") And (Right(objDiskDrive.DeviceID, 1) = ANSDriveNum) Then
objWshShell.Run("comANS.bat")
End If
Next

のどこを直せばいいのやら・・・

とりあえず、comANS.bat を実行すればフォーマット&再設定できるようにはできましたが、
万が一 ANS-9010 が BIOS から認識しなかったとき、
Cドライブ(Windows7)自体をフォーマットしてしまう恐れがあるため・・・
実際には事故は起こっていませんが、さてさてどうしたものか・・・

ご存じの方がいらしたら、トップのコメントへお願いします。
MUGEN は・・・

テーマ : PC周辺機器    ジャンル : コンピュータ


プロフィール

Xak

Author:Xak
代理公開キャラ

寅午氏 2011/05/24
剣フランドール・スカーレット

寅午氏 2011/03/20
炎フランドール・スカーレット

寅午氏 2011/12/05
フランドール=バーンシュタイン

寅午氏 2011/04/26
94フランドール=バーンシュタイン

寅午氏 2010/12/13
地子

寅午氏 2011/10/25
雲山&一輪

ボイスパッチは改変・転載を禁止します。
The voice patch Alteration or reprinting is prohibited.

リンク
最近のコメント
月時計-LunarDial-
アクセスカウンター
検索フォーム
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。