Главная
Регистрация
Вход
Авторизироваться
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 3
  • 1
  • 2
  • 3
  • »
Модератор форума: ADMIN, Nextik  
Форум » MidletPascal » Основной » Загрузка с http
Загрузка с http
12121Дата: Четверг, 01.01.2009, 18:34 | Сообщение # 1
Программист
Группа: Проверенные
Сообщений: 357
Награды: 4
Репутация: « 290 »
Статус: Offline
Как загрузить страничку с сайта. По справке разобраться не выходит. Если можно маленький работающий пример.
 
adminДата: Четверг, 01.01.2009, 21:15 | Сообщение # 2
Admin
Группа: Администраторы
Сообщений: 244
Награды: 2
Репутация: « 594 »
Статус: Offline
Program net;
var conn: http;
htmlBody: string;
contentType: string;
i: integer;
begin
if not openHttp(conn, 'http://www.mobilepascal.ucoz.ru') then halt;
setHttpMethod(conn, GET);
addHttpHeader(conn, 'User-agent', 'MIDletPascal browser');
i:=sendHttpMessage(conn);
i:=formaddstring('code: '+i+chr(10));
htmlBody := getHttpResponse(conn);
contentType := getHttpHeader(conn, 'Content-type');
i:=formaddstring(htmlBody);
showform;
closeHttp(conn);
delay(20000);
end.
Попробуй
 
13GetДата: Четверг, 01.01.2009, 21:25 | Сообщение # 3
Новичок
Группа: Пользователи
Сообщений: 19
Награды: 0
Репутация: « 0 »
Статус: Offline
12121, а you попробуй пример ннаа мобиле
 
12121Дата: Пятница, 02.01.2009, 21:30 | Сообщение # 4
Программист
Группа: Проверенные
Сообщений: 357
Награды: 4
Репутация: « 290 »
Статус: Offline
Спасибо вечером попробую

Добавлено (02.01.2009, 21:30)
---------------------------------------------
Все прекрасно загрузилось. Еще раз спасибо.

 
programmerДата: Пятница, 09.01.2009, 11:01 | Сообщение # 5
Умный
Группа: Проверенные
Сообщений: 599
Награды: 3
Репутация: « 111 »
Статус: Offline
Quote (ADMIN)
Program net; var conn: http; htmlBody: string; contentType: string; i: integer; begin if not openHttp(conn, 'http://www.mobilepascal.ucoz.ru') then halt; setHttpMethod(conn, GET); addHttpHeader(conn, 'User-agent', 'MIDletPascal browser'); i:=sendHttpMessage(conn); i:=formaddstring('code: '+i+chr(10)); htmlBody := getHttpResponse(conn); contentType := getHttpHeader(conn, 'Content-type'); i:=formaddstring(htmlBody); showform; closeHttp(conn); delay(20000); end.

Это конешно хорошо,осталось только хтмл парсер на мидлет паскале написать... smile
Ну или хотя бы wml парсер ...
На эмуляторе работает,на мобиле нет sad sad sad
Пишет недопустимое приложение...


Сообщение отредактировал programmer - Пятница, 09.01.2009, 12:59
 
adminДата: Пятница, 09.01.2009, 18:27 | Сообщение # 6
Admin
Группа: Администраторы
Сообщений: 244
Награды: 2
Репутация: « 594 »
Статус: Offline
А какая у тя мобила? 12121 говорит, що все хорошо
 
programmerДата: Суббота, 10.01.2009, 13:51 | Сообщение # 7
Умный
Группа: Проверенные
Сообщений: 599
Награды: 3
Репутация: « 111 »
Статус: Offline
У меня нокиа,странно другие проги которые с интернетом соединяются - работают
опера мини к примеру а эта нет Попробую через lib_web
 
programmerДата: Вторник, 10.02.2009, 12:45 | Сообщение # 8
Умный
Группа: Проверенные
Сообщений: 599
Награды: 3
Репутация: « 111 »
Статус: Offline
А можно так картинку загрузить и показать?
 
moonmanДата: Вторник, 24.02.2009, 09:17 | Сообщение # 9
Группа: Удаленные





Люди подскажите что делать, не могу попороть ошибку - Отсутствует обязательный атрибут.
Ошибка возникает когда устанавливаешь аплет на телефоне (эн73), вот сам текст (из букваря):
var conn: http;
htmlBody: string;
contentType: string;
begin
if not openHttp(conn, 'http://www.google.com') then halt;
setHttpMethod(conn, GET);
addHttpHeader(conn, 'User-agent', 'MIDletPascal browser');
if sendHttpMessage(conn) <> 200 then halt;
htmlBody := getHttpResponse(conn);
contentType := getHttpHeader(conn, 'Content-type');
closeHttp(conn);
end.
 
12121Дата: Вторник, 24.02.2009, 12:15 | Сообщение # 10
Программист
Группа: Проверенные
Сообщений: 357
Награды: 4
Репутация: « 290 »
Статус: Offline
Зачем тебе голову морочить ? Пример из второго сообщения отлично устанавливается и работает .
 
12121Дата: Вторник, 24.02.2009, 12:16 | Сообщение # 11
Программист
Группа: Проверенные
Сообщений: 357
Награды: 4
Репутация: « 290 »
Статус: Offline
У меня тоже N73.
 
programmerДата: Вторник, 24.02.2009, 15:11 | Сообщение # 12
Умный
Группа: Проверенные
Сообщений: 599
Награды: 3
Репутация: « 111 »
Статус: Offline
не навсех сотиках работает

Сообщение отредактировал programmer - Вторник, 24.02.2009, 15:12
 
moonmanДата: Среда, 25.02.2009, 03:16 | Сообщение # 13
Группа: Удаленные





ДЕЛО В ТОМ, ЧТО И ПРИМЕР ИЗ ВТОРОГО СООБЩЕНИЯ ТАКЖЕ ГОВОРИТ ПРО ОтсутствИЕ обязательнОГО атрибутА!

МОЖЕТ ДЕЛО В ПРОШИВКЕ ИЛИ ЕЩЕ ЧТО, ПОПРОБУЮ НОВУЮ ЗАЛИТЬ С НОКИЯ.РУ

 
moonmanДата: Среда, 25.02.2009, 04:13 | Сообщение # 14
Группа: Удаленные





Апгрейт не помог , в английском варианте ошибка выглядит так: Compulsory attributes missing!
 
12121Дата: Среда, 25.02.2009, 11:53 | Сообщение # 15
Программист
Группа: Проверенные
Сообщений: 357
Награды: 4
Репутация: « 290 »
Статус: Offline
Только сейчас вспомнил . В МП ЕСТЬ ОШИБКА при работе с сетью . Поэтому после компиляции надо в jar файле ЗАМЕНИТЬ Н класс на тот что я прикрепил . И тогда все будет нормально.
Прикрепления: 4534935.zip(1.3 Kb)
 
Форум » MidletPascal » Основной » Загрузка с http
  • Страница 1 из 3
  • 1
  • 2
  • 3
  • »
Поиск: