Отправка сообщения в примере ниже осуществляется самосборным curl'ом.
Код:
@echo off
setlocal
set "key=HKLM\SYSTEM\CurrentControlSet\Services"
set "key=%key%\Tcpip\Parameters\Interfaces"
for /f "tokens=3" %%i in (
'reg query %key% /s ^| findstr /irc:"DhcpIPAddress"'
) do if /i "%%i" neq "0.0.0.0" set "ip=%%i"&goto:send
:send
set msg="%tmp%\msg.txt"
for %%i in (
"From:from@mail.ru"
"To:target@mail.ru"
"Subject:IP-Address"
""
"%computername%:%ip%"
) do echo:%%~i>>%msg%
curl -# smtps://smtp.mail.ru:465 --ssl-reqd^
--mail-from "from@mail.ru" --mail-rcpt "target@mail.ru"^
--upload-file %msg% -u from@mail.ru
del /f /q %msg%
endlocal
exit /b
