vb6에서 도스명령어실행...펌

컴퓨터관련

맘편한넘 2011. 1. 3. 12:53

비주얼 베이직 6.0에서 간단하게 DateTimePicker 콤포넌트와 command 버튼을 사용해서, 내 컴퓨터내의 텍스트 파일에 write 하는 방법(그 텍스트 파일내용에 DateTimePicker의 날짜가 들어갑니다.)

그리고 command 버튼을 누르면 내 컴퓨터 내의 특정 배치파일(.bat)파일을 실행시킬수 있는 방법을 찾습니다.

질문자 채택된 경우, 추가 답변 등록이 불가합니다.

정말 많은 도움 되었습니다. 나중에 또 질문해도 답변해 주실 거죠? ^^ 많은 도움이 됐습니다.

텍스트 파일을 만들고.. 내용을 기록하는 것은 다음을 참조하세요.

----------------------------------

Private Sub Command1_Click()
    Open "c:\xxx.txt" For Output As #1
    Print #1, DTPicker1.Value
    Close #1
End Sub

----------------------------------

특정 배치파일을 실행하는 것은 shell을 통해서 할 수 있습니다.

----------------------------------

Shell "cmd /k c:\a.bat", vbNormalFocus

----------------------------------

위에서 도스창을 보이지 않게 하려면 vbNomalFocus 대신에 vbHide 옵션을 사용하면 됩니다.

또.. /k대신에 /c를 사용하면 배치파일이 완료되면 도스창이 자동으로 닫히게 됩니다.

이때 주의하실 것은 c:\a.bat를 실행할때.. 배치파일을 실행시키는 위치가 현재 프로그램이 위치된 곳에서 처리하게 됩니다.

예를 들어.. c:\a.bat안에 del *.*라고 기록되어 있으면.. c:\*.*를 지우는 것이 아니라.. 현재 폴더의 *.*를 지우게 됩니다.

따라서 bat파일이 위치한 곳으로 이동해서 bat파일을 실행시켜야 합니다.

현재 위치의 폴더 이동은 ChDir 을 통해서 합니다.

----------------------------------

Private Sub Command2_Click()
ChDir "c:\"
Shell "cmd /k c:\a.bat", vbNormalFocus
End Sub
----------------------------------

도움 되시길 바라며 즐거운 하루 되세요

마이지식 > 내 추천지식에 7일간 보관됩니다.