Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.17.75.227] |
|
Сообщ.
#1
,
|
|
|
Собственно нужно научится качать PDF с ресурса, вот пример того что нужно скачать:
http://onlinelibrary.wiley.com/doi/10.1002....tb00206.x/epdf В html-е прямой ссылки нету, как быть ? |
Сообщ.
#2
,
|
|
|
не понял причём тут ява и делфи... и каким раком среди них вообще аякс появился...
По ссылке - можно делать GET запрос сокетом, в результате запроса прекрасно видны ссылки ваши картинки, хотя, как дела обстоят со скроллингом, пока, не знаю. Ну, на худой конец покрутить их js можно. |
Сообщ.
#3
,
|
|
|
там есть кнопка сохранить pdf, значит должна быть прямая ссылка, или я ошибаюсь?
|
Сообщ.
#4
,
|
|
|
VisualProg
Да немного не профильный раздел для темы но, а где тут ещё найдёшь профильный где объяснят как какой запрос исполнить чтоб скачать нужный PDF. Мне нужен только PDF, as is. А как крутить js, или даже лучше чем крутить ? Было бы весьма замечательно пример увидеть. ^D^ima Сылка должна быть но она выводится видимо через js, в чистом HTML её нету. Я не сильно разбираюсь в js, но кажется где-то видел запуска явовых скриптов из под Delphi, но всё равно не понятно что запускать и как ... кто бы пояснил что да как. |
Сообщ.
#5
,
|
|
|
Jiro
Ссылка в поле Прикреплённый файл____________________.PNG (4,01 Кбайт, скачиваний: 432) только нужно ее преобразовать до такого вида: Прикреплённый файл____________________2.PNG (10,45 Кбайт, скачиваний: 450) Она уникально каждый раз при открытии страницы Добавлено долбанный форум Добавлено на коленке. У меня работает: procedure TForm1.Button1Click(Sender: TObject); var Stream:TMemoryStream; S,S2,SIn,SOut:String; LIn:Integer; begin memo1.Text:=IdHTTP1.Get('http://onlinelibrary.wiley.com/doi/10.1002/j.1939-4640.1991.tb00206.x/pdf'); SIn:='<iframe id="pdfDocument" src="'; SOut:='" width="'; LIn:=pos(SIn,memo1.Text)+length(SIn); S:=copy(memo1.Text,LIn,pos(SOut,memo1.Text)-LIn); S2:=StringReplace(S,';','&',[rfReplaceAll]); try Stream:=TMemoryStream.Create; IdHTTP1.Get(S2,Stream); Stream.SaveToFile('c:\1.pdf'); Stream.Free; except on e:Exception do Stream.Free; end; //ShowMessage(S+' '+S2); end; |
Сообщ.
#6
,
|
|
|
я http://onlinelibrary.wiley.com/doi/10.1002...1991.tb00206.x/epdf загружал, а надо было без e. спс
|