Batch Telnet procedure and Operation

Batch Telnet is a remote batch processing task. So how do I set the batch Telnet? Next we will analyze the relevant content. First, we need to understand the initial method.

Two methods can be used to convert bat to EXE

There are two ways to convert bat to EXE, one is to use tools, such as the bat2exe tool under DOS; the other is to use Shell functions in VB, the DOS window is closed after the end of the form is as follows ):

Shell "command.com /c copy c:\1.txt a:\",vbNormalFocus  

How do I run automatic Telnet tasks in batch processing?
　
In general, ftp is very common in batch transaction processing. What if Batch Telnet makes management easier?

Generally, there are two methods:

1. Windows Script Host using VBS)

2. Automatic Terminal Method for some terminals that can be configured with automatic Telnet)

Here we will discuss the first method: The VBS method. Because Windows Script Host comes with the system, we can do it without installing local software. Therefore, it is generally the first choice to solve the problem.

First, we create a script named tel. vbs. Telnet to the cisco router as an example. You can modify the relevant content.

Then, create a batch_tel.bat batch file:

 
 

  
  
Rem start Telnet
  
  
Start Telnet.exe
  
  
Rem batch Telnet
  
  
Cscript // nologo tel. vbs
 
 

Finally, we only need to run batch_tel.bat to easily complete the Telnet work.

For what the SendKeys command can send, we can look at the following list:

 
 

  
  
BACKSPACE {BACKSPACE}, {BS}, or {BKSP}  
  
  
BREAK {BREAK}  
  
  
CAPS LOCK {CAPSLOCK}  
  
  
DEL ;or DELETE {DELETE} or {DEL}  
  
  
DOWN ARROW {DOWN}  
  
  
END {END}  
  
  
ENTER {ENTER}or ~  
  
  
ESC {ESC}  
  
  
HELP {HELP}  
  
  
HOME {HOME}  
  
  
INS or INSERT {INSERT} or {INS}  
  
  
LEFT ARROW {LEFT}  
  
  
NUM LOCK {NUMLOCK}  
  
  
PAGE DOWN {PGDN}  
  
  
PAGE UP {PGUP}  
  
  
PRINT SCREEN {PRTSC}  
  
  
RIGHT ARROW {RIGHT}  
  
  
SCROLL LOCK {SCROLLLOCK}  
  
  
TAB {TAB}  
  
  
UP ARROW {UP}  
  
  
F1 {F1}  
  
  
F2 {F2}  
  
  
F3 {F3}  
  
  
F4 {F4}  
  
  
F5 {F5}  
  
  
F6 {F6}  
  
  
F7 {F7}  
  
  
F8 {F8}  
  
  
F9 {F9}  
  
  
F10 {F10}  
  
  
F11 {F11}  
  
  
F12 {F12}  
  
  
F13 {F13}  
  
  
F14 {F14}  
  
  
F15 {F15}  
  
  
F16 {F16}  
  
  
 
  
  
SHIFT +  
  
  
CTRL ^  
  
  
ALT % 
 
 

Shell an application and continue running after the program is executed

How to Write Shell & Wait programs? It is hoped that a VB program will use Shell to execute an external program (assumed to be notepad.exe) until the execution of this program ends, and then return to the VB program for further execution, what should I do? When we call Shell, a value is returned. This value is called Process Id. With this Process Id, we can call OpenProcess API to obtain Process Handle, and then use Process Handle to call WaitForSingleObject, you can continue to execute the program that has been executed by Shell. The details are as follows:

1. API declaration:

 
 

  
  
Const SYNCHRONIZE = &H100000  
  
  
Const INFINITE = &HFFFFFFFF  
  
  
Private Declare Function OpenProcess Lib "kernel32" (ByVal  
  
  
dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId  
  
  
As Long) As Long  
  
  
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As  
  
  
Long) As Long  
  
  
Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal  
  
  
hHandle As Long, ByVal dwMilliseconds As Long) As Long 
 
 

Note: If the preceding statement is placed under "general module", you should remove the Private reserved words before Declare and add the Public reserved words before Const.

2. program example: (using the Notepad program as an example)

 
 

  
  
Dim pId As Long and pHnd As Long declare the Process Id and Process Handle variable numbers respectively.
  
  
PId = Shell ("Notepad", vbNormalFocus) 'Shell return
  
  
Process Id pHnd = OpenProcess (SYNCHRONIZE, 0, pId) 'gets Process Handle
  
  
If pHnd <> 0 Then Call WaitForSingleObject (pHnd, INFINITE) 'waits infinitely until the program ends
  
  
Call CloseHandle (pHnd)
  
  
End If