☰

화면 해상도를 구하여 텍스트 파일로 저장하는 방법은 무엇입니까?

tag-icon • tag-icon vbscript screenresolution
화면 해상도를 구하여 텍스트 파일로 저장하는 방법은 무엇입니까?

화면 해상도를 얻기 위해 다음 vbs 스크립트를 찾았습니다.

하지만 결과를 텍스트 파일로 저장하고 싶습니다. 도와주세요.

    Dim HTM, wWidth, wHeight
    Set HTM = CreateObject("htmlfile")
    wWidth = HTM.parentWindow.screen.Width
    wHeight = HTM.parentWindow.screen.Height
    wscript.echo wWidth & "X" & wHeight

답변1

새 텍스트 파일에 저장하려면 필요에 따라 다음 VBScript를 사용할 수 있습니다.

Dim HTM, wWidth, wHeight
Set HTM = CreateObject("htmlfile")
wWidth = HTM.parentWindow.screen.Width
wHeight = HTM.parentWindow.screen.Height
wscript.echo wWidth & "X" & wHeight

Set objFileToWrite = CreateObject("Scripting.FileSystemObject").OpenTextFile("D:\file.txt",2,true)
objFileToWrite.WriteLine("--- screen resolution start -------------------------")
objFileToWrite.WriteLine( wWidth & "X" & wHeight)
objFileToWrite.WriteLine("--- screen resolution end   -------------------------")
objFileToWrite.Close
Set objFileToWrite = Nothing

기존 텍스트 파일 끝에 텍스트를 추가하려면 IOMode 매개변수를 8다음과 같이 쉽게 변경할 수 있습니다.

("D:\file.txt",8,true)

매개 true변수는 파일이 새로 생성되었는지 확인하거나 의 경우 이미 존재해야 함을 확인합니다 false.

관련 정보