[Iska]

HFShak, попробуйте так:

читать дальше »

Код:

@echo off
setlocal enableextensions enabledelayedexpansion

set sFileSource=%~1
set sLog=%~2

if defined sFileSource (
	if defined sLog (
		if exist "%sFileSource%" (
			>nul copy nul "%sLog%"

			for /f "usebackq tokens=*" %%i in ("%sFileSource%") do (
				set sName=
				set sAddresses=

				for /f "tokens=1,2* delims=,:	 " %%j in ('nslookup "%%i" 2^>^&1 ^| findstr.exe /r /i /c:"Name:    " /c:"Addresses:  " /c:"\*\*\* "') do (
					if "%%j" equ "***" (
						set s%%j=%%k %%l
					) else (
						set s%%j=%%k
					)
				)

				>>"%sLog%" (
					if defined sName (
						echo !sName! = !sAddresses!
					) else (
						echo %%i = !s***!
					)
				)
			)
		) else (
			echo File with Names list [%sFileSource%] not found
		)
	) else (
		call :Usage
		exit /b 1
	)
) else (
	call :Usage
	exit /b 1
)

endlocal
exit /b 0

:Usage
	echo Usage: %~nx0 ^<Names list^> ^<Log file^>
	exit /b 0