anonymousНед, 05.06.16, 22:30 |
Здравейте, понякога като ми остава време влизам в фб... излизат някакви интересни клипчета от http://www.videosedmica.com но винаги като вляза ме спамят с реклама.... вчера много се изнервих и реших да видя по какъв начин мога аз да поспамя създателя на сайта... Цъкнах в раздела "Връзка с нас" и видях на пръв поглед че няма никаква защита за изпращане на имейли... за това реших да се уверя като изпратя няколко мейла.... и наистина нямаше защита.... свалих страницата премахнех всичко излишно и се получи тази форма... <form action="http://www.videosedmica.com//vra-zka-s-nas#wpcf7-f170-p171-o1" method="post">
<input name="_wpcf7" value="170">
<input name="_wpcf7_version" value="4.3.1">
<input name="_wpcf7_locale" value="bg_BG">
<input name="_wpcf7_unit_tag" value="wpcf7-f170-p171-o1">
<input name="_wpnonce" value="a704e652a6">
<input name="your-name" size="40" type="text"><br />
<input name="your-email" size="40" type="email"><br />
<input name="your-subject" size="40" type="text"><br />
<textarea name="your-message" cols="40" rows="10" ></textarea><br />
<input value="Изпращане" type="submit">
</form> |
Сега оставаше да автоматизирам по някакъв начин изпращането.... по най бързия начин скалъпих един код за autoiti и IE #include <IE.au3>
Global $counter
$oIE = _IECreate("", 0, 1);Последната цифра като се смени на 1 се визуализира прозореца на IE
While 1
_IENavigate($oIE, "http://www.videosedmica.com/vra-zka-s-nas")
SendMail()
WEnd
_IEQuit($oIE)
Func SendMail()
$oForm = _IEFormGetObjByName($oIE, 0)
Local $1 = _IEFormElementGetObjByName($oForm, "_wpcf7")
_IEFormElementSetValue($1, "170")
Local $2 = _IEFormElementGetObjByName($oForm, "_wpcf7_version")
_IEFormElementSetValue($2, "4.3.1")
Local $3 = _IEFormElementGetObjByName($oForm, "_wpcf7_locale")
_IEFormElementSetValue($3, "bg_BG")
Local $4 = _IEFormElementGetObjByName($oForm, "_wpcf7_unit_tag")
_IEFormElementSetValue($4, "wpcf7-f170-p171-o1")
Local $5 = _IEFormElementGetObjByName($oForm, "_wpnonce")
_IEFormElementSetValue($5, "a704e652a6")
Local $6 = _IEFormElementGetObjByName($oForm, "your-name")
_IEFormElementSetValue($6, "xxxxxx")
Local $7 = _IEFormElementGetObjByName($oForm, "your-email")
_IEFormElementSetValue($7, "xxx@abv.bg")
Local $8 = _IEFormElementGetObjByName($oForm, "your-subject")
_IEFormElementSetValue($8, "Много реклама, много нещо бре...")
Local $9 = _IEFormElementGetObjByName($oForm, "your-message")
_IEFormElementSetValue($9, "Клипчетата ми харесват но тия реклами не... намали малко рекламите...")
_IEFormSubmit($oForm)
_IELoadWait($oIE)
EndFunc |
След спама дано собственика на сайта да се сети да защити сайта си и премахне малко от спам рекламата.... |
drevenПон, 06.06.16, 18:52 | RE: Досадни спам реклами...
”
След спама дано собственика на сайта да се сети да защити сайта си и премахне малко от спам рекламата.... „ Е защо не писа на собственика да го информираш и да му предложиш съдействие, а реши да го тормозиш. Рано или късно ще пораснеш, но защо някак бавно се случват нещата при теб. Аз не съм във възторг от постъпката ти. Пък де да знам, може аз да съм нещо сбъркан, а на другите пък да им харесва подобно деяние, но силно се съмнявам. |
iceman_Вто, 07.06.16, 07:59 | RE: RE: Досадни спам реклами...
” Е защо не писа на собственика да го информираш и да му предложиш съдействие... „ Древен, ти сериозно ли ? Че той го е направил нарочно, нали? |
drevenВто, 07.06.16, 09:17 |
Лично аз не съм убеден, че го е направил. Убеден съм че е спретнал програмка, която може да спами, а увода към разказа е по-скоро измислен. Така по-бих го разбрал. Ако се приеме всяка дума за истина ще излезе чисто детска работа от сорта "Той ми се изплези и за това го наплюх". редактиран от dreven на 07.06.16 09:17 |
karadzhaВто, 07.06.16, 09:28 | RE: Досадни спам реклами...
” Лично аз не съм убеден, че го е направил. Убеден съм че е спретнал програмка, която може да спами, а увода към разказа е по-скоро измислен. Така по-бих го разбрал. Ако се приеме всяка дума за истина ще излезе чисто детска работа от сорта "Той ми се изплези и за това го наплюх". „ Всеки може да види въпросния сайт - http://www.videosedmica.com Не виждам нищо дразнещо |
iceman_Сря, 08.06.16, 07:03 | RE: Досадни спам реклами...
” Лично аз не съм убеден, че го е направил... „ Под "той" имах в предвид собственика на сайта, и че той /собственика/ нарочно спами. А и Армениксс не е такова лошо момче . |
dreamskillСря, 08.06.16, 11:53 |
Класическа сива шапка |