Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.03;
Скачать: CL | DM;

Вниз

Курс доллара?   Найти похожие ветки 

 
SKing ©   (2002-12-09 08:04) [0]

Мастера может кто делал: как считать курс доллара из инета, что бы дальше смог записать его в свою БД?


 
Reindeer Moss Eater   (2002-12-09 11:06) [1]

Например отсюда это можно сделать
http://www.cbr.ru/currency_base/D_print.asp


 
SKing ©   (2002-12-09 11:49) [2]

Спасибо.
А, как можно считать курс на текущую дату?


 
Reindeer Moss Eater   (2002-12-09 12:14) [3]

const URL = " http://www.cbr.ru/currency_base/D_print.asp?date_req=09/12/2002"
var ContentStr:string;
ContentStr:=idHttp1.Get(URL);


 
SKing ©   (2002-12-09 14:00) [4]

Ни когда не работал из Делфи с инетом.
Подскажи пожалуйста как можно обработать полученную строку,
на обычный текст мало похоже...


 
Reindeer Moss Eater   (2002-12-09 14:27) [5]

С инетом работать и не надо. Надо работать со строкой.
Функции могут быть например такие:
Pos(), Copy(), Delete()


 
Ghost. ©   (2002-12-09 14:30) [6]

Это с интернетом ни как не связано..строка она строка и есть


 
SKing ©   (2002-12-09 14:46) [7]

Да, это-то понятно, но слишком много символов
типа:"<td align="right">16,6510</td>
</tr>
<tr bgcolor="#ffffff">
<td align="right" >208</td>
<td align="left" > DKK</td>
<td align="right" >10</td>"
не пойму где начало и конец, короче откуда резать значение курса?



 
Ghost. ©   (2002-12-09 14:52) [8]

IE:=CreateOleObject("InternetExplorer.Application");
IE.Navigate("about:blank", V, V, V, V);
IE.Visible := false;
while IE.Busy do Application.ProcessMessages;
Doc:=IE.Document;
Bod:=Doc.Body;
Bod.InnerHTML:=s;
s:=Bod.InnerText;


 
Reindeer Moss Eater   (2002-12-09 14:57) [9]

>SKing
Страница же на русском языке.
Если все же совсем трудно читать на нем, то зайди в кладовку.



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

Текущий архив: 2003.02.03;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.016 c
14-5232
hatchy
2003-01-13 18:14
2003.02.03
Проблемы с windows98se и kernel32.dll


14-5201
Akela
2003-01-14 23:25
2003.02.03
Что общего ? :)))


4-5327
a-leksey
2002-12-18 14:36
2003.02.03
Запаковать 3х байтный цвет в 2х. (24милиона ц. в 16милн.)


1-4954
Antosya
2003-01-26 19:03
2003.02.03
Как сделать консоль?


1-4864
alois
2003-01-21 23:13
2003.02.03
Выравнивание текста в Memo/RichEdit текста по ширине