名前 題名 ▼ Syakeさん > で、リモートコンピュータは・・・ > //ObjLocator.ConnectServer('コンピュータ名', 'root\CIMV2', 'User', 'Pass'); > > var > ObjLocator : OLEVariant; > ObjWMIService : OLEVariant; > ・・・・ > begin > ObjLocator := CreateOleObject('WbemScripting.SWbemLocator'); > {引数が空白なら自分のマシン} > ObjWMIService := ObjLocator.ConnectServer('', 'root\CIMV2', '', ''); > oleItemList := ObjWMIService.ExecQuery('SELECT * FROM Win32_DiskDrive','WQL',0); > ・・・ > > 結果的にGetWMIObjectはいらない。 > これでローカルもリモートもOK!? GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link