Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Новый участник


Сообщения: 11
Благодарности: 0

Профиль | Сайт | Отправить PM | Цитировать


Цитата Iska:
Приведите полный код пакетного файла »
Код: Выделить весь код
@echo off
setlocal
title Telnet connect
cls
echo edit by DDI
echo.

set /p ip=enter router IP: 
echo.
:start
echo 1 - simple user
echo 2 - super user
echo.
set /p lvl=enter access level: 
echo.

if %lvl% NEQ 1 (
	if %lvl% NEQ 2 goto start
)
if %lvl% EQU 1 set "starting=1" & set "ending=3"
if %lvl% EQU 2 set "starting=5" & set "ending=7"

for /L %%j in (%starting%,1,%ending%) do (
	for /f "tokens=1-3 skip=%%j delims=/-:., " %%a in (conf.ini) do (
	set value=%%b & goto fin
	)
	:fin
	ping -n 1 -w 5000 192.168.254.254 >nul
	set nr=15
	echo %value%

	start telnet %ip%

	setlocal enabledelayedexpansion
	for /L %%i in (0,1,%nr%) do (
	if "!value:~%%i,1!"=="" goto end
	for /f "tokens=1,2* delims=:" %%a in ('find "" "!value:~%%i,1!" 2^>^&1') do set String=%%a
	if "!value:~%%i,1!" EQU "!String:~-1,1!" (
	ping -n 1 -w 300 192.168.254.254 >nul
	nircmd.exe sendkeypress capslock
	nircmd.exe sendkey !value:~%%i,1! press > telnet %ip%
	nircmd.exe sendkeypress capslock)
	if "!value:~%%i,1!" NEQ "!String:~-1,1!" (
	ping -n 1 -w 300 192.168.254.254 >nul
	nircmd.exe sendkey !value:~%%i,1! press > telnet %ip%)
	)
	:end
	endlocal

	ping -n 1 -w 300 192.168.254.254 >nul
	nircmd.exe sendkey enter press > telnet %ip%
)
DEL telnet
endlocal
содержимое «conf.ini»
Код: Выделить весь код
[SIMPLE USER]
login - admin1
password - admin2

[SUPER USER]
login - tse32
passwjrd - sQosS79Zj3

Отправлено: 10:07, 18-06-2013 | #22