'vbs'에 해당되는 글 2건
- 2010.04.22 Windows에서 디스크 용량 보기 명령어
- 2009.11.11 키 입력 스크립트
- Windows에서 디스크 용량 보기 명령어
- 日常茶飯事
- 2010. 4. 22. 07:17
1. dir 명령을 사용하면 사용가능한 용량이 나온다.
2. 찾아보니 fsutil 이라는게 있다.
그래도 부족하다.
3. NTFAQ에 원하는 내용이 있다.
- df.vbs
- df.bat
[todo] \t 로 제대로 정렬되게 할 것
> dir | findstr 남음
2개 디렉터리 6,948,356,096 바이트 남음
2개 디렉터리 6,948,356,096 바이트 남음
2. 찾아보니 fsutil 이라는게 있다.
> fsutil volume diskfree E:
사용 가능한 공간(KB): 1119924224
전체 공간(KB): 20971528192
사용 가능한 빈 공간(KB): 1119924224
사용 가능한 공간(KB): 1119924224
전체 공간(KB): 20971528192
사용 가능한 빈 공간(KB): 1119924224
그래도 부족하다.
3. NTFAQ에 원하는 내용이 있다.
- df.vbs
Set oWMIService = GetObject("winmgmts:")
Set oLogicalDisks = oWMIService.InstancesOf("Win32_LogicalDisk")
'Wscript.Echo "Filesystem Size Used Available Use%"
Wscript.Echo "Filesystem Size Available"
For Each oLogicalDisk In oLogicalDisks
Wscript.Echo oLogicalDisk.DeviceID & " " & oLogicalDisk.Size & " " & oLogicalDisk.Freespace
Next
Set oLogicalDisks = Nothing
Set oWMIService = Nothing
Set oLogicalDisks = oWMIService.InstancesOf("Win32_LogicalDisk")
'Wscript.Echo "Filesystem Size Used Available Use%"
Wscript.Echo "Filesystem Size Available"
For Each oLogicalDisk In oLogicalDisks
Wscript.Echo oLogicalDisk.DeviceID & " " & oLogicalDisk.Size & " " & oLogicalDisk.Freespace
Next
Set oLogicalDisks = Nothing
Set oWMIService = Nothing
- df.bat
@echo off
CScript E:\bin\df.vbs //NoLogo
CScript E:\bin\df.vbs //NoLogo
> df
Filesystem Size Available
C: 20971528192 1120002048
D: 20971528192 16167817216
E: 38072369152 6948356096
F:
Filesystem Size Available
C: 20971528192 1120002048
D: 20971528192 16167817216
E: 38072369152 6948356096
F:
[todo] \t 로 제대로 정렬되게 할 것
배치파일에서 사용할 키 입력 스크립트
ipchange같이 메뉴에서 선택하는 경우에 사용함.
ipchange같이 메뉴에서 선택하는 경우에 사용함.
'Usage : enterKey.vbs KEY DELAY_MILLISECOND TRUE | FALSE
Set sh = WScript.CreateObject("WScript.Shell")
Set args = WScript.Arguments
cnt = args.Count
key = args.Item(0)
delay = 0
isEnter = True
If cnt > 1 Then delay = args.Item(1)
If cnt > 2 Then isEnter = args.Item(2)
WScript.Sleep delay
sh.SendKeys key
If isEnter Then sh.SendKeys vbCr
Set sh = WScript.CreateObject("WScript.Shell")
Set args = WScript.Arguments
cnt = args.Count
key = args.Item(0)
delay = 0
isEnter = True
If cnt > 1 Then delay = args.Item(1)
If cnt > 2 Then isEnter = args.Item(2)
WScript.Sleep delay
sh.SendKeys key
If isEnter Then sh.SendKeys vbCr
> enterKey.vbs test 'test를 입력한다.
> enterKey.vbs test 1000 '1초를 쉬고 test를 입력한다.
> enterKey.vbs test 1000 True '1초를 쉬고 test를 입력하고 엔터를 입력한다.
> enterKey.vbs "" 500 True '엔터만 입력?????
> enterKey.vbs test 1000 '1초를 쉬고 test를 입력한다.
> enterKey.vbs test 1000 True '1초를 쉬고 test를 입력하고 엔터를 입력한다.
> enterKey.vbs "" 500 True '엔터만 입력?????
Recent comment