0
첫째, 저는 총 newb이므로 키보드 주위에 있어서는 안됩니다. 즉, 사용자가 목록에서 선택하여 원격 장치에 연결할 수 있도록하는 DCL .COM 파일을 작성하려고합니다.DCL 프로그래밍 - 원격 연결
내가 원하는 것은 장치를 선택하여 연결하고 장치에서 연결을 끊으면 다시 시작할 수 있도록하려는 것입니다. 그것은 원격 연결을 종료 한 후에도 계속 내 버리게됩니다.
운영 체제는 OpenVMS입니다. 다음은 코드입니다 (여기서 xxx.xxx.xxx.xxx는 원격 시스템의 IP 주소입니다).
도움이 될 것입니다.
$! MRV Terminal Server Connection Menu
$!
$ ON ERROR THEN $ LOGOUT
$ GOMENU:
$!
$ CLS:==SET TERM/WIDTH=80
$ WT:==WRITE SYS$OUTPUT
$!
$ CLS
$ WT " MRV Terminal Server Connection Menu "
$ WT " "
$ WT " 1 MRV 1"
$ WT " 2 MRV 2"
$ WT " 3 MRV 3"
$ WT " 4 MRV 4"
$ WT " 5 MRV 5"
$ WT " 6 MRV 6"
$ WT " 7 MRV 7"
$ WT " 8 MRV 8"
$ WT " 9 MRV 9"
$ WT " 10 MRV 10"
$ WT " 11 MRV 11"
$ WT " 12 MRV 12"
$ WT " 13 MRV 13"
$ WT " 14 MRV 14"
$ WT " "
$ WT " "
$ WT " "
$ WT " "
$ WT " "
$ WT " X EXIT"
$ WT " "
$ INQUIRE ANS "Select the MRV you wish to connect to:"
$!
$!
$ IF ANS .EQS. "X" then goto goodbye
$!
$!
$ IF ANS .EQS. "1" then SSH "[email protected]"
$!
$ IF ANS .EQS. "2" then SSH "[email protected]"
$!
$ IF ANS .EQS. "3" then SSH "[email protected]"
$!
$ IF ANS .EQS. "4" then SSH "[email protected]"
$!
$ IF ANS .EQS. "5" then SSH "[email protected]"
$!
$ IF ANS .EQS. "6" then SSH "[email protected]"
$!
$ IF ANS .EQS. "7" then SSH "[email protected]"
$!
$ IF ANS .EQS. "8" then SSH "[email protected]"
$!
$ IF ANS .EQS. "9" then SSH "[email protected]"
$!
$ IF ANS .EQS. "10" then SSH "[email protected]"
$!
$ IF ANS .EQS. "11" then SSH "[email protected]"
$!
$ IF ANS .EQS. "12" then SSH "[email protected]"
$!
$ IF ANS .EQS. "13" then SSH "[email protected]"
$!
$ GOODBYE:
$!EXIT
. 약간의 것들을 명확히 할 수 있습니까? 마지막'if' 다음에'$ goto GoMenu'를 추가하면 저장 프로 시저에서 계속 유지해야합니다 (목표 인 경우). '$ on error then goto GoMenu'는 세션이 종료 될 때 SSH가 오류로 종료되면 도움이 될 수 있습니다. [참고] (http://h41379.www4.hpe.com/doc/84final/9996/9996pro_150.html). – HABO
입력 해 주셔서 고맙습니다. "저를 버리십시오"라는 말은 메뉴로 돌아가는 대신 VMS 프롬프트로 되돌아 갔음을 의미합니다. 목표는 사용자가 원격 세션을 종료 한 후 메뉴로 돌아가는 것입니다. –
또한 목록에없는 선택 사항을 선택하면 종료 상태를 유지합니까? 예를 들어, 사용자가 W를 입력하면 프로그램이 종료되고 사용자가 VMS 프롬프트로 돌아갑니다. –