vb script 사용 관련 [9]

vb script에서
inputbox나 msgbox등 기본적인 함수를 사용하려 하는데

사용권한이 없다고 하네요.

vb script를 좀더 다채롭게 사용할 수 있게 권한을 올려준다거나

아니면 다른 방법이 있으시면 알려주세요

(스크립트가 실행되기전에 몇가지 정보를 입력받고자 하는게 목표입니다)

프로그램 버전 : Xshell 4

안녕하십니까?
넷사랑컴퓨터 기술지원입니다.

스크립트 사용 환경에 대한 좀 더 자세한 설명 부탁드립니다.
그리고 사용하고자 하는 스크립트 내용을 첨부해 주시면 문제 원인 파악 및 해결에 도움이 될 것 같습니다.

감사합니다.

저도 script 에서 inputbox 를 사용하면

사용 권한이 없습니다.: "inputbox" << 이런 팝업창이 뜨는데요

원래는 사용이 가능한가요?

원래 사용가능한데, 제 컴퓨터 환경 문제인지.. 애초부터 사용이 안되는건지요?

안녕하세요?
넷사랑컴퓨터 기술지원입니다.

노파심에 MsgBox 등에 대해서 테스트를 한 번 더 해 봤습니다.
저희 환경에서는 잘 작동이 되는 것으로 보아 일반적으로 안되는 문제는
아닌 것 같습니다.

가능하다면 사용하신 스크립트 파일을 보내 주시면 확인해 보겠습니다.

감사합니다.

capture 화면 첨부합니다.

code는 시험해 보느라 msgbox 하나만 넣었구요..

코드에는 특별히 이상은 없는듯 한데.. 팝업창 같은 에러가 나옵니다.

확인 부탁드려요~

안녕하십니까:
넷사랑컴퓨터 기술지원입니다.

MsgBox를 통해서 메시지를 출력하기 위해서 다음과 같이 사용할 수 있습니다.

Sub Main
xsh.Dialog.MsgBox "test"
End Sub

감사합니다.

msgbox 는 말씀하신데로 xsh.dialog 를 붙이니 잘 되네요,

inputbox 도 동일한 에러가 나는데요

간단한 사용예제 하나만 알려주시면 감사하겠습니다.

※ 제가 VB script 는 처음 써봤는데요..
xsh.dialog.msgbox 이런식으로 써야 된다는건 찾아봐도 따로 나오지 않아서요
이게 common 한 내용이어서 따로 설명이 없는건지요?

Xshell에서 사용하는 스크립트 언어는 현재 VB 스크립트이고 버전 5에서는 자바스크립트를 추가할 예정입니다.

Xshell에서는 기본적인 VB 스크립트 언어와 추가로 Xshell에서 세션 관리 및 터미널 제어에 대한 추가적인 Object를 제공하고 있습니다.

말씀하신 MsgBox 메소드 등은 Dialog 오브젝트에 있는 내용이나 저희가 미처 도움말 등에 설명을 해 놓지 못했습니다.

Xshell 제공하는 Dialog 오브젝트의 메소드는 다음과 같습니다.

Long xsh.Dialog.MsgBox "문자열" => 간단한 메시지 박스입니다.
Long xsh.Dialog.MessageBox "다이얼로그_문자열", "타이틀바", 형식 => 기본 메시지 박스입니다. 형식 0~4의 값에 따라서 타입이 바뀝니다.
bSTR xsh.Dialog.Prompt "다이얼로그_문자열", "타이틀바", "입력란_기본값", 패스워드여부 => 패스워드(***로 표시)는 1, 그냥 문자열은 0입니다.

좀 더 자세한 내용은 정리하여 홈페이지 등에 게시하도록 하겠습니다.

감사합니다.

확인해주셔서 감사합니다~

마지막으로.. 위에 적어주신 msgbox 처럼, inputbox 사용 예제도 하나만 알려주시면 감사하겠습니다.^^

다음은 Prompt 메소드를 사용하여 서버에 접속하는 간단한 스크립트입니다.

Sub Main
	Dim hostname, username, password
	hostname = xsh.Dialog.Prompt ("접속할 서버 이름?", "Xshell 스크립트", "서버 IP 주소", 0)
	username = xsh.Dialog.Prompt ("사용자 이름?", "Xshell 스크립트", "로그인 계정", 0)
	password = xsh.Dialog.Prompt ("비밀 번호?", "Xshell 스크립트", "", 1)
	xsh.Session.Open("ssh://" & username & ":" & password & "@" & hostname)
End Sub

도움이 되었기를 바랍니다.