Главная страница
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.012 c
1-4850
Blacker77
2003-01-24 15:31
2003.02.03
Рекурсивный поиск по каталогам


14-5256
sniknik
2003-01-16 18:31
2003.02.03
Навеяно by Ketmar ...


3-4791
jackhigh
2003-01-17 10:58
2003.02.03
Торможу с DBGrid...


1-4939
Alex
2003-01-26 12:40
2003.02.03
MDI-формы


14-5184
DelAlanPhi
2003-01-11 23:45
2003.02.03
Программы без <B>GOTO</B>