ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
28.07.2009, 10:42
|
|
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
P.S. вот у тебя функция
HttpSendRequest(hResourceHandle,header,47,szData,l strlen(szData));
47 - это длинна хидера которую ты вбил ручками, а нужно вычеслять её, потому как хидер может быть разной длинный у тебя. Еслибы заюзал снифер для просмотра того, что шлёт твой код, то сразу бы увидел это бажное место.
|
|
|
28.07.2009, 12:04
|
|
Познающий
Регистрация: 20.02.2009
Сообщений: 86
Провел на форуме:
183326
Репутация:
7
|
|
Всем советую классный видео курс сам с него начинал
http://pascal-video-kurs.narod.ru/ |
|
|
|
28.07.2009, 12:43
|
|
Познающий
Регистрация: 02.06.2009
Сообщений: 67
Провел на форуме:
237284
Репутация:
54
|
|
Спамер детектед
|
|
|
|
28.07.2009, 15:04
|
|
Постоянный
Регистрация: 26.01.2008
Сообщений: 796
Провел на форуме:
5209663
Репутация:
357
|
|
Как в RichEdit найти текст между двух кусков текста? И вставить ево в переменную?
пс, Гугол не помог
|
|
|
|
28.07.2009, 15:33
|
|
Познающий
Регистрация: 02.06.2009
Сообщений: 67
Провел на форуме:
237284
Репутация:
54
|
|
"между двух кусков текста" - это как ?
|
|
|
|
28.07.2009, 15:58
|
|
Постоянный
Регистрация: 26.01.2008
Сообщений: 796
Провел на форуме:
5209663
Репутация:
357
|
|
Сообщение от Nullsleep
"между двух кусков текста" - это как ?
Код HTML:
<input type="hidden" name="s" value="614750171334344540111">
Надо скопировать: 614750171334344540111
То есть - От:
Код HTML:
<input type="hidden" name="s" value="
До И эти цифры загнать в переменную1...
|
|
|
|
28.07.2009, 16:01
|
|
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
Код:
var
s,z:string;
START_TEXT:string;
STOP_TEXT:string;
p:integer;
begin
z := '';
s := RichEdit1.text;
START_TEXT := 'value="';
STOP_TEXT := '"';
p := pos(START_TEXT, s);
if (p > 0) then
begin
delete(s, 1, p + length(START_TEXT) - 1);
p := pos(STOP_TEXT, s);
if (p > 0) then
begin
z := copy(s, 1, p - 1);
showmessage(z);
end;
end;
примерно так в твоём случае
Последний раз редактировалось slesh; 28.07.2009 в 16:05..
|
|
|
|
28.07.2009, 16:38
|
|
Постоянный
Регистрация: 24.03.2009
Сообщений: 670
Провел на форуме:
2868783
Репутация:
414
|
|
Как в RichEdit найти текст между двух кусков текста? И вставить ево в переменную?
Юзай регулярки.
|
|
|
|
28.07.2009, 20:36
|
|
Постоянный
Регистрация: 26.01.2008
Сообщений: 796
Провел на форуме:
5209663
Репутация:
357
|
|
Есть такой способ отправки запроса на сервак:
procedure TForm5.btn1Click(Sender: TObject);
var params,responseres:tstringlist;
begin
params:=TStringList.Create;
responseres:=TStringList.Create;
params.Add('Login=1');
params.Add('pass=2');
params.Add('url=3');
responseres.Text:=http1.Post('Хост',params);
Так вот, есть пару вопросов:
1) Как можно изменить уже внесенный параметр (Например логин)
2) Если вписать RUS буквы то они не дойдут до сервака а тока в виде "%5", и т.д. , Как можно сделать так чтобы русские буква доходили до сервака? |
|
|
|
28.07.2009, 21:19
|
|
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
читай RFC по http. И там указан набор символов который кодируется.
И русские подпадают под него. Так что как не крути, но они всё равно переконвертятся в %XX
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
