Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
Comanche
1

Есть у кого-нибудь прога для чтения курса USD с какого-нибудь сайта?

25.01.2010, 20:21. Просмотров 1392. Ответов 9
Метки нет (Все метки)


См. сабж.
Лень писать, если честно ) Наверное, надо делать DOM-модель странички, потом её разбирать и т.д. ...
Да и некогда...
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.01.2010, 20:21
Ответы с готовыми решениями:

Есть у кого-нибудь примеры программ для МК51
Есть у кого - нибудь программа (пример решение любой задачи ) для МК51???? очень нужно.

У КОГО НИБУДЬ ЕСТЬ КОД АКТИВАЦИИ ДЛЯ ODNOBOT? СКИНЬТЕ ПОЖАЛУЙСТА
ОЧЕНЬ НУЖНО

У кого-нибудь есть спрайты для 2D платформера игры (типо дуллера)
Здравствуйте. Делаю игры на XNA для самообучения, но не могу найти толковых спрайтов. Делаю...

Есть у кого-нибудь таблица со всеми формулами для корней в степени?
Есть у кого-нибудь таблица со всеми формулами для корней в степени? А то никак не могу найти, чтобы...

9
Gloom
26.01.2010, 14:38 2
Прмер для акеса, на васик перекатать труда не составит
http://hiprog.com/access/article.asp?idd=179
Comanche
26.01.2010, 17:23 3
Спасибо, но у меня на компе нет Аксесса! Можно вас попросить скинуть код в какой-нибудь текстовый файл и прислать его на мейл pc-er@mail.ru? Заранее благодарен!
0 / 0 / 3
Регистрация: 27.03.2012
Сообщений: 2
26.01.2010, 17:53 4
с xml-работать умеешь?

там получается скрипт со ссылки
http://www.cbr.ru/scripts/XML_daily.asp?date_req=20/11/2003

и потом разбирается
0
Comanche
26.01.2010, 18:09 5
Не умею. Но разберусь.
Как я понимаю, мне надо 'считать' каким-то макаром тэг VALUTE, соответствующий ID нужной валюты, со всеми его 'кишками', а затем 'вычленить' из этих 'кишок' тэг VALUE, содержащий собственно значение курса. Так?
0 / 0 / 3
Регистрация: 27.03.2012
Сообщений: 2
26.01.2010, 23:30 6
подключи к проекту библиотеку msxml либо можно так же через ADO работать... поищи в форуме, наверное, есть примеры
0
0 / 0 / 3
Регистрация: 27.03.2012
Сообщений: 2
26.01.2010, 23:31 7
либо все-таки найди Access и скопируй код оттуда :-))))
0
Messir
27.01.2010, 04:28 8
Вот готовая проццедура - выдает все, что нужно, в MsgBox'e:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Private Sub GetUSD()
    Dim url_request As String
    Dim nodeList As Object
    Dim xmldoc As Object
    Dim xmlNode As Object
    Dim node_attr As Object
    Dim i As Integer
    Dim xdate As Date
    Dim Dollar As String
    
    Set xmldoc = CreateObject('Msxml.DOMDocument')
    xmldoc.async = False
    url_request = 'http://www.cbr.ru/scripts/XML_daily.asp?date_req=' + Format(Date, 'dd/mm/yyyy')
    If Not xmldoc.Load(url_request) = True Then
        MsgBox ('Äîêóìåíò íå çàãðóæåí')
        Exit Sub
    End If
    Set nodeList = xmldoc.selectNodes('ValCurs')
    Set xmlNode = nodeList.Item(0).cloneNode(True)
    Set node_attr = xmlNode.Attributes(0)
    xdate = node_attr.Value
    Set nodeList = xmldoc.selectNodes('*/Valute')
    For i = 0 To nodeList.length - 1
        Set xmlNode = nodeList.Item(i).cloneNode(True)
        If xmlNode.childNodes(1).Text = 'USD' Then
           Dollar = 'Курс доллара на ' & xdate & ': ' & xmlNode.childNodes(4).Text & ' рублей за ' & xmlNode.childNodes(2).Text & ' доллар'
        End If
    Next
    MsgBox Dollar
    Set xmldoc = Nothing
    Set nodeList = Nothing
    Set xmlNode = Nothing
End Sub
Таким же образом можно получать и другие валюты - только другую аббревиатуру используешь. Или вообще не делаешь никаких проверок - получаешь весь список и анализируешь потом.
Messir
27.01.2010, 04:30 9
Там глюк с кодировкой при вставке вышел
Visual Basic
1
2
3
4
If Not xmldoc.Load(url_request) = True Then    
  MsgBox ('Äîêóìåíò íå çàãðóæåí')        
  Exit Sub  
End If
Там, в этом сообщении ошибку выдать надо, типа не удалось загрузить данные.
Comanche
27.01.2010, 12:17 10
Спасибо большое!
Очень сэкономили моё время!
Хотя - со временем надо будет, конечно, разобраться с этим XML. Вроде штука-то полезная, только вот я всё равно не пойму, чем уж он так 'суперхорош', что одно время (сразу как он появился), только и разговоров было, что про XML...
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.01.2010, 12:17

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Есть какая-нибудь прога для создания резервной копии системы?
Я, к примеру, собираюсь поэкспериментировать с прошивкой планшета на андроне, и чтобы хоть как-то...

Есть ли какая нибудь нормальная прога для компилирования кода на ассемблере?
Нам препод дал TASM и TLINK через фар и все такое, но это настолько бессссит, прям не могу строчку...

У кого-нибудь когда-нибудь RegisterClassExW выдавал ошибку?
Во всех примерах шаблона оконного приложения пишут что-то в роде этого: /* Register the window...

Есть ли у кого-нибудь?
Есть ли у кого-нибудь спам бот годный. Для автоматизированной рассылки на e-mail адреса?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.