Re: send mail if ping fails

"skepper" <> wrote in message
news:...
>
> hello to all!
>
> i need script do it :
>
> ping to server
> if pink ok - ping again (loop)
> if ping fail - send mail via telnet
>
> http://www.f2h.co.il/im.php?name=Ping.jpg&src=95181098
>
> Server 2003 R2
> vb?
> Bat ?
> --
> skepper

You could try this batch file:
@echo off
:Again
ping server | find /i "bytes=" || goto Fail
ping localhost -n 60 > nul
goto Again

:Fail
blat.exe /.. /.. /..
Blat.exe is a command line mailer that you can download from a number of
sites.

"skepper" <> wrote in message
news:...
>
> i try it:
>
> PingTest.cmd
> ----------------------------------------------------
> @echo off
> :Again
> ping mis | find /i "bytes=" || goto Fail
> ping localhost -n 60 > nul
> goto Again
>
> :Fail
> call mail.vbs
> ----------------------------------------------------
> the mail.vbs is:
> Set objEmail = CreateObject("CDO.Message")
> objEmail.From = ""
> objEmail.To = ""
> objEmail.Subject = !Attention Message!"
> objEmail.Textbody = "Ping to Server Fail!"
> objEmail.Send
>
> if i remove the line @echo off, i get this masage :
> ping server| find /i "bytes=" || goto Fail
> ping server| find /i "bytes=" || goto Fail
> ping server| find /i "bytes=" || goto Fail
> ping server| find /i "bytes=" || goto Fail
> The process tried to write to a nonexistent pipe.
> The process tried to write to a nonexistent pipe.
> The process tried to write to a nonexistent pipe.
>
> ?
>
>
> --
> skepper
> ------------------------------------------------------------------------
> skepper's Profile: http://forums.techarena.in/members/skepper.htm
> View this thread: http://forums.techarena.in/server-scripting/1111495.htm
>
> http://forums.techarena.in
>

Try this batch file for starters:

@echo off
:Again
ping mis | find /i "bytes=" || goto Fail
ping localhost -n 60 > nul
goto Again

:Fail
echo Ping failed!

Does it work?
==================
I have a few problems with your VB Script. Here they are:
1. Instead of writing
call mail.vbs
you should write
script //nologo c:\mail.vbs

2. Your script lacks the details that are required under
objEmail.Configuration.Fields

3. The line
objEmail.Subject = !Attention Message!"
lacks a double quote after the = character.

If you are not familiar with VB Scripts then you would be much better off
using blat.exe, as I suggested in my first reply.