VBA에서 텔넷 세션 실행

Question

FTP를 사용하는 VBA 라이브러리가 있는데 텔넷도하고 싶습니다. 필자는 텍스트 파일을 기반으로 텔넷을 수행하는 Perl 스크립트를 사용하고 있지만 VBA 내에서 기본적으로 텔넷 연결을 원합니다. 아무도 이것에 대한 소스가 있습니까? 추가 기능을 사용하고 싶지 않습니다. 자체적으로 코드를 작성해야합니다.

Answer 1

당신이 use the MS WinSock control

더 많은 자원 (도 using winsock in VBA 참조) 할 수있는 경우 :하지 않을 경우

MSDN Library: Using the Winsock Control

(Visual Basic) Winsock Control

을, 당신은 cmd.exe를 아마도 SendKeys을 사용할 수

를

면책 조항 : 아래의 두 번째 링크에서 아래 코드를 복사하고 VBA에 대해 약간 수정했습니다.

sub telNETScript() 
On Error Resume Next 
Dim WshShell as object 

set WshShell=CreateObject("WScript.Shell") 
WshShell.run "cmd.exe" 
WScript.Sleep 1000 

'Send commands to the window as needed - IP and commands need to be customized 
'Step 1 - Telnet to remote IP' 
WshShell.SendKeys "telnet xx.xx.xx.73 9999" 
WshShell.SendKeys ("{Enter}") 
WScript.Sleep 1000 

'Step 2 - Issue Commands with pauses' 
WshShell.SendKeys ("{Enter}") 
WScript.Sleep 1000 
WshShell.SendKeys "5" 
WshShell.SendKeys ("{Enter}") 
WScript.Sleep 1000 

'Step 3 - Exit Command Window 
WshShell.SendKeys "exit" 
WshShell.SendKeys ("{Enter}") 
WScript.Quit 

end sub 

SendKeys 최고의 또는 가장 신뢰할 수있는 솔루션 아니지만, 나는 내 마지막 직장 12 년 전에 이런 짓을 때 찾을 수있는 모든했다.

상세 정보 :

How to automate Telnet commands using VBScript