ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
14.07.2007, 23:01
|
|
Познающий
Регистрация: 03.02.2007
Сообщений: 94
Провел на форуме:
267066
Репутация:
165
|
|
Вот бьюсь над реализацией одной задачи. Нужно проверить, можно ли приконнектиться к 80 порту удаленной машины или нет. Пытался разными способами... Ставил сокетный клиент и обрабатывал OnConnect, пытался ставить таймер, обрабатывать Connected.. Вобщем, если кто-то предложит готовый рабочий пример, снимаю шляпу..
|
|
|
14.07.2007, 23:21
|
|
Постоянный
Регистрация: 27.08.2006
Сообщений: 367
Провел на форуме:
2009677
Репутация:
472
|
|
Всем здрасте!
Проблемка такая: бере обычный сайт файло хранитель,так вот там есть поля для ввода пути до файла и есть кнопочка отправить,после чего дается ссылка!
Мне нужно посредствам делфи передавать в это поле для файла мой путь до файла введенные в эдит и нажать кнопку отправить (нажимая батон на своей форме)!Желательно еще узнать ответ о успешной/неуспешной кончине операции!
тебе нужно с помощью сокетов передать запрос скрипту, который загружает файлы на сервер.
|
|
|
|
15.07.2007, 00:22
|
|
Участник форума
Регистрация: 16.09.2006
Сообщений: 139
Провел на форуме:
513709
Репутация:
144
|
|
Сообщение от Ni0x
тебе нужно с помощью сокетов передать запрос скрипту, который загружает файлы на сервер.
Это и дураку понятно,а вот как это реализовать!
|
|
|
|
15.07.2007, 00:36
|
|
Участник форума
Регистрация: 28.05.2007
Сообщений: 125
Провел на форуме:
638513
Репутация:
103
|
|
Это и дураку понятно,а вот как это реализовать!
в созданный сокет посылай запрос с помощью команды send,затем парсь ответы сервера,в случае успешного запроса, ответ будет содержать 200
Используй протокол HTTP 1.0
P.S.: ты бы хоть написал какой там запрос GET или POST
Последний раз редактировалось GoreMaster; 15.07.2007 в 00:41..
|
|
|
|
15.07.2007, 18:14
|
|
Флудер
Регистрация: 20.11.2006
Сообщений: 3,316
Провел на форуме:
16641028
Репутация:
2371
|
|
Сделал парсер страницы...
Но не понимает русской кодировки..
Выводит в Utf-8...
ЧТо делать? =)
|
|
|
|
15.07.2007, 19:04
|
|
Новичок
Регистрация: 19.05.2007
Сообщений: 14
Провел на форуме:
72573
Репутация:
8
|
|
Код:
procedure TForm1.FormCreate(Sender: TObject);
var
reg: TRegistry;
i: integer;
begin
reg := TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('HKCU/Software/Microsoft/winmine',false);
for i := 1 to 3 do
begin
if reg.ReadString('Time'+ IntToStr(i)) <> '' then
begin
Edit1.Text:=(reg.ReadString('Time'+ IntToStr(1));
Edit2.Text:=(reg.ReadString('Time'+ IntToStr(2));
Edit3.Text:=(reg.ReadString('Time'+ IntToStr(3));
end;
end;
reg.CloseKey;
reg.free;
end;
Может кто подскажет нубу, что не так ? :Ъ |
|
|
|
15.07.2007, 19:05
|
|
Флудер
Регистрация: 20.11.2006
Сообщений: 3,316
Провел на форуме:
16641028
Репутация:
2371
|
|
invlose, стукни мне сам =\
99 999 + 1 + (328 723 * 12 873 621 * 0 * (126 712 + 1)) - 2 = 99 998
А он молчит суке...непраивльный
|
|
|
|
15.07.2007, 19:35
|
|
Флудер
Регистрация: 20.11.2006
Сообщений: 3,316
Провел на форуме:
16641028
Репутация:
2371
|
|
Сделал парсер страницы...
Но не понимает русской кодировки..
Выводит в Utf-8...
ЧТо делать? =)
|
|
|
|
16.07.2007, 21:36
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Isis
Ansi юзать...
что, где не так? давай кусок кода, разберем...
Allbit
что тебе надо??? что за игры?? кусок кода и "что-то тут не так??" > 
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
17.07.2007, 13:36
|
|
Участник форума
Регистрация: 09.02.2004
Сообщений: 122
Провел на форуме:
1089794
Репутация:
134
|
|
Allbit > Вместо этого
Код:
reg.OpenKey('HKCU/Software/Microsoft/winmine',false);
делай без HKCU:
Код:
reg.OpenKey('Software/Microsoft/winmine',false);
|
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Комбинированный вид