ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|

27.04.2009, 23:12
|
|
Новичок
Регистрация: 14.06.2008
Сообщений: 29
Провел на форуме: 221810
Репутация:
3
|
|
через OLE
|
|
|

27.04.2009, 23:28
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
ну тогда типа такова:
Код:
var
Word: OLEVariant;
begin
Word:=CreateOleObject('Word.Application');
Word.Documents.Add;
Word.Selection.Font.Name:='Times New Roman';
Word.Selection.Font.Size:=12;
Word.Selection.Font.Bold:=True;
Word.Selection.ParagraphFormat.Alignment :=1;
Word.Selection.TypeText('Вставляемый текст');
// меняем стиль
Word.Selection.Font.Italic:=True;
Word.Selection.TypeText('Вставляем текст');
Word.ActiveDocument.SaveAs('c:\2.doc');
И так далее по аналогии.
|
|
|

27.04.2009, 23:33
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
а. забыл. дестрой незабывай делать, а то процес ворда будет висеть в памяти.
Word.Quit;
|
|
|

27.04.2009, 23:51
|
|
Новичок
Регистрация: 14.06.2008
Сообщений: 29
Провел на форуме: 221810
Репутация:
3
|
|
Спасибо большое.
|
|
|

28.04.2009, 08:44
|
|
Новичок
Регистрация: 27.04.2009
Сообщений: 5
Провел на форуме: 18684
Репутация:
0
|
|
решено)))
Последний раз редактировалось Pasha_777; 05.05.2009 в 22:06..
|
|
|

28.04.2009, 09:08
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
по логике когда ты делаеш WebBrowser2.Navigate('about',Dummy,Dummy,Dummy, Headers);
то реферер всталяется у тебя уже для документа about. А если ты от туда уже пойдеш дальше то реферер будет уже about но браузер просто его не будет вставлять.
|
|
|

28.04.2009, 09:24
|
|
Новичок
Регистрация: 27.04.2009
Сообщений: 5
Провел на форуме: 18684
Репутация:
0
|
|
Так похоже и происходит, но как вставить реферер papa.ru
Если поменять 'about' на 'papa.ru', то для первого счетчика на страничке реферер будет papa.ru,
а для всех остальных запросов - его не будет вообще.
Т.е. это работает только 1 раз...
Как я понимаю, после
Document2.Close;
как раз и идет выполнение скрипта (загруженного текста) а каким образом до этого момента реферер присвоить непонимаю....
Последний раз редактировалось Pasha_777; 28.04.2009 в 09:39..
|
|
|

28.04.2009, 11:35
|
|
Постоянный
Регистрация: 26.01.2008
Сообщений: 796
Провел на форуме: 5209663
Репутация:
357
|
|
slesh, сделай мне тогда просто пост запрос на логин и пароль, и скинь мне исходник, плиз
<offtop>А ты не верил что я могу +12поставить</offtop>
|
|
|

28.04.2009, 14:21
|
|
Новичок
Регистрация: 27.04.2009
Сообщений: 5
Провел на форуме: 18684
Репутация:
0
|
|
По своей проблеме дополню...
Если делать все через idHTTP то сервер как то определяет что это не браузер (хотя в снифере пакеты полностью идентичны!!!), определяет так как идет обмен еще и внутренним протоколом (который гиморойно очень подделывать)
Так вот все работало, но потом добавили скорее всего проверку реферера и вот никак не получается его приделать к Post запросу через TWebBrowser...
P.S. Неужели никто на античате не писал авторегеров???
|
|
|

28.04.2009, 14:49
|
|
Участник форума
Регистрация: 28.04.2008
Сообщений: 172
Провел на форуме: 1191083
Репутация:
270
|
|
Если делать все через idHTTP то сервер как то определяет что это не браузер (хотя в снифере пакеты полностью идентичны!!!),
Не заполнено HTTP_USER_AGENT
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|