Модераторы: Snowy, Poseidon, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Получение картинки кода защиты, Получение картинки кода защиты 
:(
    Опции темы
MetalFan
Дата 12.12.2007, 12:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128



Цитата(In4matik @  12.12.2007,  12:48 Найти цитируемый пост)
Application.ProcessMessages;

а это на кой?


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Anakin
  Дата 12.12.2007, 14:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 192
Регистрация: 25.9.2006

Репутация: нет
Всего: нет



2 In4matik Хм.. а что идея не плохая. )) Гораздо лутше чем эта что я использую. Тут я смотрю в твоём примере мы загоняем картинку с Стрям(Память) а не в фаил. 
А я использую фаил.. 
Но твой пример мне гораздо больше нравитса. Спасибо шас буду попробую прикрутить это дело  smile 
Дело в том что я то пулучаю картинку хоть и через сохранение его на диск и потмо считование. Но он работает. Но тут дело в то что вот я смотрю на сайте имя картинки в её своиствах и оно выглядит так :
Код

9f075aa8-c99f-4368-afe3-9940628e1dd4.jpg

а если присмотретса в том снифе что я указал там присутствует ещё типа защита такая. Она зараза использует ещё имя картинки тока без расширения.
Вот:
Код

phonePrefix=373791&phoneNumber=33026&message=test&pictureCode=084108&type=sendSms&publicGuid=9f075aa8-c99f-4368-afe3-9940628e1dd4&url=%2FsendSms%2Fsent%2F&langUrl=%2Frus%2F&sendSmsSubmit=HTTP/1.1 302 

Вот теперь вопрос как можно с использованием твоего примера мне выдрать ещё и имя фаила без расширения и вставить его в параметр как в снифе publicGuid=
Я вот сижу и не могу доехать как это реализовать (
Етсть идей ?
Умные блин эти веб програмисты.. (( Но я думаю что наши програмисты круче  smile  (кним я себя не приписываю молодой я ещё в этом деле )

Это сообщение отредактировал(а) Anakin - 12.12.2007, 14:49
PM MAIL   Вверх
Anakin
Дата 12.12.2007, 14:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 192
Регистрация: 25.9.2006

Репутация: нет
Всего: нет



Нет Ишибочка расширения там нету там роста такой код:
Код

9f075aa8-c99f-4368-afe3-9940628e1dd4

Я осмотрелса ( домал что там ещё присутствует расширение.
а там просто этиа строка. и этаже строка используетса для верификации тоесть при отправке на сервис используетса эта строка.
PM MAIL   Вверх
Anakin
  Дата 12.12.2007, 16:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 192
Регистрация: 25.9.2006

Репутация: нет
Всего: нет



Так с вставкой и вытаскиванием этого кода я разобралса.
Спасибо за это In4matik.
Но есть один недостаток.
Вот Сниф правельного отправления:
Код

publicGuid=9f075aa8-c99f-4368-afe3-9940628e1dd4

А вот сниф моего:
Код

publicGuid=7c029710%2D5551%2D4e56%2D8fc1%2D5019c9471143

Видите разницу.
Вместо - между символами в строке ставитса это %2D
Пытаюсь отправить данные так:
Код

procedure TfrmMain.btn_sendsmsClick(Sender: TObject);
var
Post:TStrings;
Q:string;
pos1,pos2:integer;
begin
Application.ProcessMessages;
IdAnti.Process;
Post := TStringList.Create;
Post.Clear;
Post.Add('phonePrefix='+cmb_prefix.Text);
Post.Add('phoneNumber='+cmb_Phone.Text);
Post.Add('message='+m_sms.Text);
Post.Add('pictureCode='+edt_img.Text);
post.Add('type=sendSms');
post.Add('publicGuid='+ris);
post.Add('sendSmsSubmit');

Q := HTTP.Post('http://www.moldcell.md/rus/sendsms/',Post);
pos1 := pos('ОТправлено',Q);
if pos1<>0 then
begin
Application.MessageBox('Отправлено','sms',mb_OK);
end
else
begin
Application.MessageBox('Ошибка,'sms',mb_OK);
end;


Переменную ris я обявляю так:
Код


private
  ris: string;
    { Private declarations }

Подскажите что я делаю не так почему у меня вместо черточек появляютса эти символы (
PM MAIL   Вверх
MetalFan
Дата 12.12.2007, 18:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128



что-то у индей есть про hoForceEncodeParams... посмотри. убери ее

Это сообщение отредактировал(а) MetalFan - 12.12.2007, 18:40


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
In4matik
Дата 13.12.2007, 07:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 22
Регистрация: 4.7.2007
Где: Красноярск

Репутация: нет
Всего: 1



Цитата(Anakin @ 12.12.2007,  16:10)
Вот Сниф правельного отправления:
Код

publicGuid=9f075aa8-c99f-4368-afe3-9940628e1dd4

А вот сниф моего:
Код

publicGuid=7c029710%2D5551%2D4e56%2D8fc1%2D5019c9471143

Видите разницу.

Видим разницуsmile

Поснифил я немного этот сайт. 
Наблюдения:

Сниф №1:
Код

phonePrefix=373790&
phoneNumber=12345&
message=sooobchenie&
pictureCode=574851&
type=sendSms&
publicGuid=b020228c-144d-4423-afab-61b9a23bd634&
url=%2Fsendsms%2F&
langUrl=%2Frus%2F&
sendSmsSubmit=%D0%9E%D1%82%D0%BF%D1%80%D0%B0%D0%B2%D0%B8%D1%82%D1%8C

(конечно это всё одной строкой. я разделил, чтобы видно было)

Сниф №2
Код

phonePrefix=373790&
phoneNumber=11111&
message=%D0%A1%D0%BE%D0%BE%D0%B1%D1%89%D0%B5%D0%BD%D0%B8%D0%B5&
pictureCode=722255&
type=sendSms&
publicGuid=5464c792-f654-4d57-a8db-37750f750cb3&
url=%2FsendSms%2FerrorBadPost%2F&
langUrl=%2Frus%2F&
sendSmsSubmit=%D0%9E%D1%82%D0%BF%D1%80%D0%B0%D0%B2%D0%B8%D1%82%D1%8C

(здесь message=Сообщение) 

Таким образом, Диагноз сайту: "Кодировка UTM-8". Отсюда и все проблемы. Хорошо еще не КОИ8рsmile

Так что не расстрайвайся и делай вот такой пост:
Код

Post.Add('phonePrefix='+cmb_prefix.Text);
Post.Add('phoneNumber='+cmb_Phone.Text);
Post.Add('message='+m_sms.Text);
Post.Add('pictureCode='+edt_img.Text);
post.Add('type=sendSms');
post.Add('publicGuid='+ris);
post.Add('sendSmsSubmit=Отправить');


и еще сделай так чтобы в m_sms.text не было ни одного знака chr(13).

Добавлено через 2 минуты
Цитата(MetalFan @ 12.12.2007,  12:51)
Цитата(In4matik @  12.12.2007,  12:48 Найти цитируемый пост)
Application.ProcessMessages;

а это на кой?

Без этого никак не хотело работать smile 

На самом деле там на форме какие-то изменения делаются, не помню точно. это было давно и не правдаsmile
PM MAIL WWW ICQ   Вверх
Anakin
  Дата 13.12.2007, 09:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 192
Регистрация: 25.9.2006

Репутация: нет
Всего: нет



2 In4matik  всё сделал вроде как надо. кстате это:
Код

post.Add('sendSmsSubmit=Отправить');

не лечит программу (
вот два снифа
1) Оригинальный:
Код

phonePrefix=373791&
phoneNumber=33027&
message=test&
pictureCode=084108&
type=sendSms&
publicGuid=9f075aa8-c99f-4368-afe3-9940628e1dd4&
url=%2FsendSms%2Fsent%2F&
langUrl=%2Frus%2F&
sendSmsSubmit=HTTP/1.1 302 


А вот сниф программы.:
Код

phonePrefix=373791&
phoneNumber=33027&
message=test&
pictureCode=168226&
type=sendSms&
publicGuid=48c7fb25-d158-4da8-951f-b7c5b1aff318&
url=%2Fsendsms%2F&
langUrl=%2Frus%2F&
sendSmsSubmit&
HTTP/1.1 200 OK


Блин не поиму в чем дело (((
Код с картинкой видит всё нормально. 
Но вот отправлять не хочет (
Вот код отправки:
Код

Post.Add('phonePrefix='+cmb_prefix.Text);
Post.Add('phoneNumber='+cmb_Phone.Text);
Post.Add('message='+m_sms.Text);
Post.Add('pictureCode='+edt_img.Text);
post.Add('type=sendSms');
post.Add('publicGuid='+ris);
post.Add('url=%2Fsendsms%2F');
post.Add('langUrl=%2Frus%2F');
post.Add('sendSmsSubmits');


PM MAIL   Вверх
In4matik
Дата 13.12.2007, 09:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 22
Регистрация: 4.7.2007
Где: Красноярск

Репутация: нет
Всего: 1



Цитата(Anakin @ 13.12.2007,  09:38)
2 In4matik  всё сделал вроде как надо. кстате это:
Код

post.Add('sendSmsSubmit=Отправить');

не лечит программу (

ну не знаю тогда уже что и делать..

у меня снифер выдает всегда вот такой конец поста
Код

sendSmsSubmit=%D0%9E%D1%82%D0%BF%D1%80%D0%B0%D0%B2%D0%B8%D1%82%D1%8C


Я когда свою прогу делал, тоже с этим сталкивался, но не помню уже че я там намутил.

попробуй еще пост отправить как строку целую.

Код

var
s:string;
...

s:='';
s:='phonePrefix='+cmb_prefix.Text +'&';
s:=s+'phoneNumber='+cmb_Phone.Text+'&';
и т.д. и т.п.
s:=s+'sendSmsSubmit=Отправить';

потом post:)


PS: а с этого сайта вообще приходят сообщения?
PSS: еще забыл. там же эти. COOKIсы есть в посте. наверное тебе их и не хватает. 
попробуй другим снифером посмотреть. у меня IEWatch.
PM MAIL WWW ICQ   Вверх
MetalFan
Дата 13.12.2007, 11:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128



я знаю, как тебе помочь: выложи здесь тестовое приложение.
кста, хороший бесплатный сниффер - Fiddler2

Это сообщение отредактировал(а) MetalFan - 13.12.2007, 11:43


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Anakin
Дата 13.12.2007, 12:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 192
Регистрация: 25.9.2006

Репутация: нет
Всего: нет



Вот пример программы.
Пробовал все варенты. но полюбому не получаетса (
Сверял снифы программы и сайта они едентичны но не отправляетса (
ПОдскажите в чем дело.


Присоединённый файл ( Кол-во скачиваний: 18 )
Присоединённый файл  SMS.rar 10,01 Kb
PM MAIL   Вверх
MetalFan
Дата 13.12.2007, 13:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128



класс. а правильный номер телефона для теста?


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
MetalFan
Дата 13.12.2007, 14:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128



мда, отлаживал то ты не то.
адрес странички то, на который пост-запрос посылается другой.
вот с такими модификациями все заработало:
Код

...
POst.Add( 'phonePrefix='+cmb_prefix.Text );
Post.Add('phoneNumber='+cmb_Phone.Text);
Post.Add('message='+m_sms.Text);
Post.Add('pictureCode='+edt_img.Text);
Post.Add('type=sendSms');
Post.Add('publicGuid='+ris);
Post.Add('url=%2Fsendsms%2F');
Post.Add('langUrl=%2Frus%2F');
Post.Add('sendSmsSubmit=');

Q := HTTP.Post('http://www.moldcell.md/xds/default.aspx',Post);
Q := UTF8Decode( Q );
pos1 := pos('Отправлено',Q);
...



--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Anakin
Дата 13.12.2007, 14:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 192
Регистрация: 25.9.2006

Репутация: нет
Всего: нет



Номер для теста 373791 33027
Шас попробую исправить твою модификацию.

Добавлено через 6 минут и 59 секунд
Всё гуд СМС отправляетса.
НО есть последствия ((
После отправки СМС выходит окнос ошибкой HTTP/1.1 302 Found но СМС доходит.
И вторая теперь проблема.когда я переключаюсь на русскую раскладку клавы Сообщение приходит пустым (
Кажетса тут с кодировкой проблема.
PM MAIL   Вверх
MetalFan
Дата 13.12.2007, 14:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128



Цитата(Anakin @  13.12.2007,  14:14 Найти цитируемый пост)
выходит окнос ошибкой HTTP/1.1 302 Found но СМС доходит.

Код

  idHttp.AllowRedirects := true;



--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Anakin
Дата 13.12.2007, 14:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 192
Регистрация: 25.9.2006

Репутация: нет
Всего: нет



Да ошибка устранилась. И Чьито СМС дошло  smile 
Но вот шас попробуйте отправить с русским текстом в СМС. и оно придёт пустым.
PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »


 




[ Время генерации скрипта: 0.1169 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.