|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
08.11.2007, 07:12 | #11 |
Пользователь
Регистрация: 08.11.2007
Сообщений: 21
|
Здраствуйте люди!
имею схожую проблему, не могу залогинится на сайт, пишу как указано, но компилятор выдает ошибку: procedure TForm1.Button1Click(Sender: TObject); var list: TStringList; s: string; response: TStringStream; begin response:=TstringStream.Create(''); list := TStringList.Create; list.Add('req_username=rapget'); list.Add('req_password=123456'); try s := IdHTTP1.Post('usd.mybb.ru/login.php',list,Response); memo1.lines.text := response.DataString; finally list.Free; response.free; idHTTP1.Disconnect; end; end; в ответ получаю: [Error] Unit1.pas(44): Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter' Pitbull, помоги пожалуста! |
08.11.2007, 08:06 | #12 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
А если почитать текст ошибки ?...
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
08.11.2007, 10:08 | #13 |
Пользователь
Регистрация: 08.11.2007
Сообщений: 21
|
|
08.11.2007, 10:19 | #14 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
Для начала в post URL добавь HTTP://
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
08.11.2007, 10:27 | #15 |
Пользователь
Регистрация: 08.11.2007
Сообщений: 21
|
ок, сенки довбавил.
теперь ошибки нет, но по прежнему - не заходит... в memo возвращает хтмл (похоже это та-же страница с предложением зайти..), он довольно большой, постить его здесь? Последний раз редактировалось element; 08.11.2007 в 10:35. |
08.11.2007, 23:48 | #16 |
Пользователь
Регистрация: 08.11.2007
Сообщений: 21
|
люди, что делать, пробую так, тоже не входит
function UrlEncode(const S:string;NeedUTF8:boolean=false):st ring; var I:integer; W:UTF8String; begin Result:=''; if NeedUTF8 then W:=Utf8Encode(S) else W:=S; For I:=1 to Length(W) do case W[I] of '%',' ','&','=','@','.',#13,#10,'+',#128. .#255:Result:=Result+'%'+inttohex(o rd(W[I]),2); else Result:=Result+W[I]; end; end; procedure TForm1.Button2Click(Sender: TObject); var Source:TStringStream; Fin:TFileStream; begin Source := TStringStream.Create(Format('req_us ername=%s&req_password=%s',[URLEncode('rapget'), URLEncode('123456')])); Fin:= TFileStream.Create('d:\rapget.html' , fmOpenWrite); Http.Request.ContentType:='applicat ion/x-www-form-urlencoded'; try Http.Post('http://usd.mybb.ru/login.php',Source,Fin); finally source.Free; fin.Free; end; end; |
13.11.2007, 23:39 | #17 |
Пользователь
Регистрация: 08.11.2007
Сообщений: 21
|
все получилось только пришлось twebbrowser прикрутить.
помогла повторная передача запроса на индексную страницу. спасибо всем помогавшим. |
13.05.2008, 18:53 | #18 |
Пользователь
Регистрация: 12.05.2008
Сообщений: 13
|
Ребят помогите с куками. Вот почти всё работает вот токо Idhttp не передает куки webbrowser. чё я натупил с куками?
Код:
|
13.05.2008, 21:47 | #19 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
а с чего вы взяли что Idhttp Должен передавать куки от Twebbrowser-а ?
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
13.05.2008, 23:45 | #20 |
Пользователь
Регистрация: 12.05.2008
Сообщений: 13
|
Ну как тогда после авторизации ввойти в аккаунт?
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Надо вбивать автоматом данные | diznt | Помощь студентам | 8 | 21.08.2008 08:15 |
Как автоматом заполнить поле? | Stanislav | PHP | 4 | 09.03.2008 01:57 |
как автоматом обновить страницу? | proglamer | PHP | 11 | 25.02.2008 20:34 |