curl
https://www.acme.com |find "something"
if %errorlevel% == 0 call :Email2Adm
goto :eof
:Email2Adm
echo "Something find"
cscript sendm.vbs
goto :eof
Send email can use vbs.
For your reference:
=================
File name: sendm.vbs
Const cdoSendUsingPickup = 1 'Send message using the local SMTP service pickup directory.
Const cdoSendUsingPort = 2 'Send the message using the network (SMTP over the network).
Const cdoAnonymous = 0 'Do not authenticate
Const cdoBasic = 1 'basic (clear-text) authentication
Const cdoNTLM = 2 'NTLM
Set objArgs = Wscript.Arguments
' FmMail = objArgs(0)
' Tomail = objArgs(1)
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "Email Subject"
objMessage.From =
norelply@isp.com
objMessage.To =
me@isp.com
objMessage.TextBody = "Text body"
'==This section provides the configuration information for the remote SMTP server.
Set objConfig = objMessage.Configuration
objConfig.Fields("
http://schemas.microsoft.com/cdo/config ... /sendusing") = 2
'Name or IP of Remote SMTP Server
objConfig.Fields("
http://schemas.microsoft.com/cdo/config ... smtpserver") = "smtp.isp.com"
'Type of authentication, NONE, Basic (Base64 encoded), NTLM
objConfig.Fields("
http://schemas.microsoft.com/cdo/config ... thenticate") = cdoBasic
'Server port (typically 25)
objConfig.Fields("
http://schemas.microsoft.com/cdo/config ... serverport") = 25
'Use SSL for the connection (False or True)
objConfig.Fields("
http://schemas.microsoft.com/cdo/config ... smtpusessl") = False
'Connection Timeout in seconds (the maximum time CDO will try to establish a connection to the SMTP server)
objConfig.Fields("
http://schemas.microsoft.com/cdo/config ... iontimeout") = 60
objConfig.Fields.Update
'==End remote SMTP server configuration section==
objMessage.Send