ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
15.11.2008, 21:00
|
|
Новичок
Регистрация: 04.11.2008
Сообщений: 3
Провел на форуме:
13639
Репутация:
0
|
|
2Sinay
Решение хорошее, но только почему после введения значений m и n, меня выкидывает в окно редактирования кода? Приходится cнова запускать программу, чтобы увидеть результат.
|
|
|
15.11.2008, 21:15
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Сообщение от DiSi
Короче есть браузер на делфи(самый примитивный) подскажите как засобачить чтоб он работал через проксю? хотя бы 1)))
если можно обясните по подробней
зарание СПС=)
http://forum.ixbt.com/topic.cgi?id=40:3062
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
15.11.2008, 21:28
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Сообщение от Player_1
2Sinay
Решение хорошее, но только почему после введения значений m и n, меня выкидывает в окно редактирования кода? Приходится cнова запускать программу, чтобы увидеть результат.
шел бы ты основы поучил, не стыдно?
program for3;
var m,n,k, NOK: integer;
begin
write(' m = '); readln(m);
write(' n = '); readln(n);
for k:=m*n downto n do
if (k mod m = 0) and (k mod n = 0) then NOK:=k;
writeln(' NOK = ',NOK);
Readln;
end.
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
15.11.2008, 21:30
|
|
Banned
Регистрация: 06.01.2008
Сообщений: 904
Провел на форуме:
4037638
Репутация:
1821
|
|
Сообщение от Player_1
2Sinay
Решение хорошее, но только почему после введения значений m и n, меня выкидывает в окно редактирования кода? Приходится cнова запускать программу, чтобы увидеть результат.
допиши
|
|
|
|
16.11.2008, 06:24
|
|
Новичок
Регистрация: 11.05.2008
Сообщений: 27
Провел на форуме:
78594
Репутация:
0
|
|
Здравствуйте. У меня такой вот вопрос. Постараюсь написать понятнее.. 
Хочу сделать что-то типа накрутчика для сайтов... получается загружаю сайт.ru в webbrowser .
Код:
Webbrowser1.Navigate(сайт.ru);
Выискиваю все ссылки, которые есть на нём и записываю их в memo или ListBox.
Код:
for i := 0 to Webbrowser1.OleObject.Document.links.Length - 1 do // Listbox1.Items.Add(Webbrowser1.OleObject.Document.Links.Item(i)); memo1.Lines.Add(Webbrowser1.OleObject.Document.Links.Item(i));
Дальше не знаю что мне делать, что б при загрузке любой ссылки из списка считалось, что я перешёл по ней с сайт.ru а не просто ввёл её в строку. Вот никак не получается это сделать.
Подсказывал мне кто-то что б использовал
Код:
WebBrowser1.Navigate2(URL, Flags, TargetFrameName, PostData, Headers);
не помогает. Всё равно показывает, что вводил новую строку, а не перешёл с сайта 
Напишите пожалуйста что нужно сделать  |
|
|
|
16.11.2008, 08:48
|
|
Участник форума
Регистрация: 16.11.2006
Сообщений: 230
Провел на форуме:
599789
Репутация:
227
|
|
это смотря где накручивать. Навен на воей партнёрке проверяется реферер...
Не знаю как с этим коспонентом веббраузером... Но посоветую те просто отправлять на 80 порт запросы с хидрами, которые ты пожелаешь
|
|
|
|
16.11.2008, 10:41
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Reffer проверяется, отснифай запрос с твоей проги и запрос с браузера.
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
16.11.2008, 16:38
|
|
Новичок
Регистрация: 11.05.2008
Сообщений: 27
Провел на форуме:
78594
Репутация:
0
|
|
А можно небольшой пример? Реально я просто сейчас не понимаю что имели ввиду под снифай и хидры...
В примере бы я разобрался.
Для меня главное, что б после ввода ссылки она считалась, как буд-то я перешёл по ней с сайта.
|
|
|
|
16.11.2008, 19:13
|
|
Участник форума
Регистрация: 16.11.2006
Сообщений: 230
Провел на форуме:
599789
Репутация:
227
|
|
тут посмотри:
http://www.google.com/search?hl=ru&q=описание+http+проток ла&btnG=Поиск+в+Google&meta=
а поом ещё и тут
http://www.google.com.by/search?hl=ru&sa=X&oi=spell&resnum=0&ct=result&cd=1 &q=delphi%2Bwinsock&spell=1
|
|
|
|
16.11.2008, 19:38
|
|
Участник форума
Регистрация: 31.07.2008
Сообщений: 207
Провел на форуме:
299231
Репутация:
107
|
|
WebBrowser1.Navigate2(URL, Flags, TargetFrameName, PostData, Headers);
В хеадер напиши "Refferer: сайт.ru" и всех делов )
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
