Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.02.04;
Скачать: [xml.tar.bz2];

Вниз

Числовые значения mегаfона на кнопку... и Post   Найти похожие ветки 

 
Jeeb   (2007-01-20 18:53) [0]


procedure TFormMain.BtnPostClick(Sender: TObject);
var
 Str: TStringList;
 S: String;
 I: Integer;
begin
 HTTP.Request.Host:="www.megafonnw.ru";
 HTTP.Request.Accept:="text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1";
 HTTP.Request.AcceptLanguage:="ru-RU,ru;q=0.9,en;q=0.8";
 HTTP.Request.AcceptCharSet:="iso-8859-1, utf-8, utf-16, *;q=0.1";
 HTTP.Request.AcceptEncoding:="deflate, gzip, x-gzip, identity, *;q=0";
 HTTP.Request.Connection:="Keep-Alive, TE";
 HTTP.Get("http://www.megafonnw.ru/site/rus/sms");
 HTTP.Request.Referer:="http://www.megafonnw.ru/site/rus/sms";
 Str:=TStringList.Create;
 Str.Add("code="+Code.Text);
 Str.Add("prefix=111");
 Str.Add("msisdn=1111111");
 Str.Add("symbols_num=155");
 Str.Add("message=hello");
 Str.Add("russian=on");
 Str.Add("show=on");
 Str.Add("sms_day="+FormatDateTime("dd", Now));
 Str.Add("sms_month="+FormatDateTime("mm", Now));
 Str.Add("sms_year="+FormatDateTime("yy", Now));
 Str.Add("sms_hour="+FormatDateTime("hh", Now));
 Str.Add("sms_minute="+FormatDateTime("nn", Now));
 Str.Add("send_sms.x=52");
 Str.Add("send_sms.y=16");
 try
 S:=HTTP.Post("http://www.megafonnw.ru/site/rus/sms", Str);
 finally
 HTTP.Free;
 end;
end;


Не понимаю что за строчки:
Str.Add("send_sms.x=54");
Str.Add("send_sms.y=6");
их числовые значения постоянно меняются...

как мне эти значения рассчитать?

Формируется запрос:
code=1227&prefix=111&msisdn=1111111&symbols_num=155&message=hello&russian=on&sho w=on&sms_day=20&sms_month=01&sms_year=07&sms_hour=18&sms_minute=29&send_sms.x=54 &send_sms.y=6&

Как в конце избавиться от символа "&"?


 
Jeeb   (2007-01-20 18:55) [1]

P.S. в сниффере отловил, формируется без этого знака:

code=1227&prefix=111&msisdn=1111111&symbols_num=155&message=hello&russian=on&sho  w=on&sms_day=20&sms_month=01&sms_year=07&sms_hour=18&sms_minute=29&send_sms.x=54  &send_sms.y=6


 
Jeeb   (2007-01-20 20:13) [2]

К "Начинающим" переместили, а ответить - не ответили...


 
Anatoly Podgoretsky ©   (2007-01-20 20:27) [3]

> Jeeb  (20.01.2007 20:13:02)  [2]

А кто то брал на себя такие обязательства?


 
Jeeb   (2007-01-20 21:58) [4]

Anatoly Podgoretsky,

я не брал точно...


 
tesseract ©   (2007-01-21 14:14) [5]

> Не понимаю что за строчки:
> Str.Add("send_sms.x=54");
> Str.Add("send_sms.y=6");
> их числовые значения постоянно меняются...
>
> как мне эти значения рассчитать?


Если это сенасовые переменные то никак- их сервер рассчитывает.


 
Jeeb   (2007-01-21 22:38) [6]

tessercat,

> Если это сенасовые переменные то никак- их сервер рассчитывает.


А что кроме сеансовых переменных это может быть еще? И если это действительно они, то можно как-нибудь перехватить процесс их получения от сервера?


 
tesseract ©   (2007-01-21 22:44) [7]

> А что кроме сеансовых переменных это может быть еще? И если
> это действительно они, то можно как-нибудь перехватить процесс
> их получения от сервера?


Они создаються чтобы тебя не потерять. Они скорее всего хряняться в cookie.


 
Jeeb   (2007-01-21 22:44) [8]

Единственное, что я знаю, что send_sms - это или name формы или name кнопки


 
Jeeb   (2007-01-21 22:45) [9]

tesseract,

а из cookie можно как-нибудь прочитать их?



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.02.04;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.044 c
1-1166039083
Sergey3
2006-12-13 22:44
2007.02.04
чтение-запись в RSS


1-1165585804
Феникс
2006-12-08 16:50
2007.02.04
Экспорт в Excel - (не зарегистрирован класс LeftMargin)


2-1169045733
AlexanderMS
2007-01-17 17:55
2007.02.04
Как узнать, что созданный объект "свободен"?


2-1169105268
s
2007-01-18 10:27
2007.02.04
PChar


2-1168970687
malyar
2007-01-16 21:04
2007.02.04
opendialog & savedialog





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский