А можно небольшой пример? Реально я просто сейчас не понимаю что имели ввиду под снифай и хидры... В примере бы я разобрался. Для меня главное, что б после ввода ссылки она считалась, как буд-то я перешёл по ней с сайта.
тут посмотри: 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
WebBrowser1.Navigate2(URL, Flags, TargetFrameName, PostData, Headers); В хеадер напиши "Refferer: сайт.ru" и всех делов )
URL:='сайт1.ru'; Flags:=navNoWriteToCache; TargetFrameName:=EmptyParam; Headers:='Refferer: сайт2.ru'; WebBrowser1.Navigate2(URL, Flags, TargetFrameName, PostData, Headers); и всё равно не заполняется в открывшемся окне ref= может я не правильно выразился... просто если с сайта переходишь, то в открывшемся окне ссылки, которые появляются имеют вид http://сайт2.ru/go.php?id=00000&base=1&ref=сайт1.ru&id= А если просто вбивать адрес, то поле ref пустое
HTTP прокси? socks?? вообщем ничего сложно рассказываю подробно: Идешь в гугл там читаешь rfc. потом думаешь, потом делаешь вообщем все. Ппц свою лень затолкайте себе в анус. Двигайтесь немного заипали уже. Для тех кто в танке: Code: [B] addr.sin_family:=AF_Inet; addr.sin_port:=htons([COLOR=Yellow]PORT[/COLOR]); addr.sin_addr.S_addr:=inet_addr([COLOR=Yellow]IP[/COLOR])[/B] Остальное все не трогаем оставляем все как есть. А вообще совет учи С++ и питон. прикинь кульно.
Мне не лень, мне конкретно надо сделать чтобы со списком сокс прокси работала. Нашел только по компонентам инди.. Что за виноград?
Сам только в начале пути познания делфи, поэтому идея есть а вот реализацию пока представляю плохо поэтому надеюсь поможете. Идея: на рабочем столе хочется иметь как можно больше ярлыков нужных и частозапускаемых программ так как заходить в папку с прогарммой каждый раз что бы её запустить - меня лично напрягает, то же самое и с меню ПУСК, но при этом не хочется загромождать стол ярлыками вообще. Вот и родилась такая идея: На рабочем столе находится наша программа-форма без заголовка с одной лишь TEdit. В папке с нашей программой есть файл config.ini который содержит примерно следующее: icq c:\icq\icq.exe mozilla c:\Program Files\Mozilla Firefox\firefox.exe word c:\winword\winword.exe итд. т.е. техника такая: мы в водим в нашу программу (TEdit) какое либо слово, программа ищет его в нашем config.ini и если находит запускает приложение идущее после введенного слова. Если нет такого слова-выводим сообщение об ошибке и ни чего не делаем. Так же хотелось бы что бы при вводе "!exit" наша программа закрывалась.Вот и все. Буду очень благодарен за подсказку реализации. С меня почет и уважение...
Twiddle, берешь строку из TEdit'а, узнаешь длину(N). Потом открываешь файл и читаешь в каждой строке N-символов. Если твое, то считываешь остальное и выполняешь вот такой вот геммор)))
очередной велосипед... добавляешь ярлык в windir и все.. function GetSysDir: string; var buf: array [0..MAX_PATH] of Char; begin GetSystemDirectory(buf, MAX_PATH); Result:=buf; end; function Install(_file: string): Boolean; var LnkName : string; MyObject : IUnknown; MyIcon : IShellLink; MyPFile : IPersistFile; WFileName : WideString; begin try CoInitialize(nil); MyObject:=CreateComObject(CLSID_ShellLink); MyIcon:=MyObject as IShellLink; MyPFile:=MyObject as IPersistFile; with MyIcon do begin SetArguments(PChar('')); SetPath(PChar(_file)); SetWorkingDirectory(PChar(ExtractFilePath(_file))); end; LnkName:=Copy(ExtractFileName(_file), 1, Length(ExtractFileName(_file)) - Length(ExtractFileExt(_file))); WFileName:=GetSysDir + '\' + LnkName + '.lnk'; MyPFile.Save(PWChar(WFileName), False); except Result:=False; Exit; end; Result:=True; end; ссылка на исходник. Прога добавляющую ярлык в %windir%, писал давно, работает, полнотью на WinAPI http://www.sendspace.com/file/1366et
Снова здравствуйте. Не мог раньше написать - нет отрубало. Я тут недавно задавал вопрос: В итоге пришли к выводу, что если импользовать WebBrowser1.Navigate2 и в Headers прописывать Headers:='Referer: http://сайт2.ru'; заработало.. действительно ref ссылка передаётся и в одной партнёрке засчитывается нормально. Другие же партнёрки не считают, что я перешёл по ссылке с сайта, а просто загрузил её как с закладки и переход по этой причине засчитан не был. Допустим просто убрать реф. программы и всё остальное. Просто смотреть по счётчику liveinternet. Там как раз есть источники. Вот нужно сделать так, что б по переходе по ссылке в источниках появлялся сайт1.ru Сейчас записывается в переходы без ссылки и адрес реф А нужно, что б записывалось переходы с сайтов И второе: как можно избавить от ошибки :"ошибка выполнения сценария" - переодически выскакивает при загрузке разных сайтов
Как правильно удалить ключ из реестра? RegDeleteKey проверял.не сработало хз. RegDeleteKey(HKEY_CURRENT_USER,'\Software\Microsoft\Windows\CurrentVersion\Run\prog'); верно ли использована функция?
попробуй так RegDeleteKey(HKEY_CURRENT_USER,'Software\Microsoft\Windows\CurrentVersion\Run\prog'); если в нем есть подразделы то удалять надо по-другому
