Read txt file then ping....

Forums

My Profile

Inbox

Address Book

My Subscription

My Forums

Read txt file then ping....

Logged in as: Guest

arrSession:exec spGetSession 2,16,61746

	Active Users: There are 0 members and 0 guests.
	Users viewing this topic: none

Printable Version

All Forums >> [Scripting] >> Post a VBScript >> Read txt file then ping....
Do you like VisualBasicScript.com? Link to us and help spread the word about our forum. Thanks!

Page: [1]

Message

<< Older Topic Newer Topic >>

Read txt file then ping.... - 6/23/2008 6:11:59 AM

jcarver_14

Posts: 25
Score: 0
Joined: 6/4/2008
From: Cincinnati
Status: offline

What it does:

This reads a list of computer names then pings each. It has an if satement in it that you will need to finish.

How to use:

Replace %file% with the file name containing the list of computer names. One name per line. Then define what you want it to do after each ping. (do something) lines 16 and 18

Post #: 1

RE: Read txt file then ping.... - 6/29/2008 6:24:08 PM

4scriptmoni

Posts: 192
Score: 0
Joined: 5/3/2007
Status: offline

The same thing in batch

@REM This script Checks Connection of IPs
@REM By Felipe Ferreira  18/04/2007

@echo off
:: Check Syntax and OS
IF NOT "%OS%"=="Windows_NT" GOTO Syntax
:: Check command line
ECHO.%1 | FIND "?" >NUL
IF NOT ERRORLEVEL 1 GOTO Syntax
IF [%1]==[] GOTO Syntax
:: Check if TXT file exists
IF NOT EXIST "%~f1" GOTO Syntax

:: Keep variables local
SETLOCAL

::DEFINE VARIABLES (logfile)
del ipslog.TxT /q
set logfile=ipslog.TxT

:: Read variables from command line
@REM Get the Filename + Path of passed argument
SET TXTFile="%~f1"
@rem set email=fferreira@attiva.biz

:Run
cls
@echo.
@echo Retriving Servers from %TXTFile% please wait...
@echo.

:: Search the TXT file line by line
FOR /F "tokens=* delims=" %%A IN ('TYPE %TXTFile%') DO CALL :ParseINI "%%A"

@echo Finished Reading %TXTFile%

GOTO End

:Syntax
ECHO.
ECHO.
ECHO 
ECHO Pass a IP list .txt with one IP per or host per line
ECHO Example: checkips.bat list.txt 
ECHO.
@ECHO By Felipe Ferreira (HP) 29/03/07 updated %DATE%
ECHO.
pause

:End
@echo Command Completed
@echo Output on the logfile : %logfile%.
pause
notepad %logfile%
@REM Clean Variables
ENDLOCAL
set IPS=
set logfile=
rem exit

::===== Go thru .TXT and set each line to a variable and execute; ===
:ParseINI
SET IPS="%~1"
::Clean the quotes from the servername
SET IPS=%IPS:"=%

:: Do the CMD
ECHO Checking SERVER : %IPS%
set ERRORLEVEL=0
@REM RUNS THE WHOIS COMMAND 
PING %IPS% | FIND "TTL=" >NUL
IF ERRORLEVEL 1     @ECHO #ERROR connecting to %IPS% >> %logfile%
IF NOT ERRORLEVEL 1 @ECHO Server %IPS% OK >> %logfile%

_____________________________

Enterprise Microsoft Scripts
Exchange, Login/Logout Monitor,TS, Monitoring, Security, AD, etc...
http://www.felipeferreira.net

(in reply to jcarver_14)