批处理如何运行一个子程序

有些情况可备耐以用重定向,类穗滚源似ftp -s那样，比如

x.exe <x.txt

有些情况只能猜态用vbs模拟键盘输入，比如telnet

Dim wshshell

set wshshell=CreateObject("wscript.shell")

wscript.sleep 3000

WshShell.Run "telnet 192.168.1.100"

wscript.sleep 5000

wshshell.sendkeys "admin"

wshshell.sendkeys "{ENTER}"

wscript.sleep 1000

wshshell.sendkeys "admin123"

wshshell.sendkeys "{ENTER}"

刚回答了一个批处理的问题,拿到这给你做例子吧,下面的代码的作用是检测一个预设进程,要是不存在则自动关机.其中的:c标签蔽岁就是一个子程序,在主程序中调用了这个子程序,哪里不明白请追问,满意请加好评 @echo off&setlocal enabledelayedexpansion

mode con: cols=100 lines=15&color 5a

set /p pros=请在这里输入你要检测的进程(如taskmgr.exe,这个是任务管理器进程,回车结束咐樱):

:l

tasklist /衡并丛fi "imagename eq !pros!">check

cls

ping 127.0.0.1>nul

call :c check

ping 127.0.0.1>nul

goto l

:c

if %~z1==0 shutdown -s -f -t 30&goto end

goto :eof

:end

echo 按任意键取消关机..

pause>nul

shutdown -a

exit

---