Курс валют

@vasiliw8 · Регистрация: 04.03.2014

Студворк — интернет-сервис помощи студентам

Возможно ли в VB6 в TextBox получить текущий курс Американского доллара к рублю, автоматически?

@The trick · 16.01.2015, 21:33

Курсы валют и удобный интерфейс (готовое решение)

@vasiliw8 · 17.01.2015, 09:59 **[ТС]**

The trick,
Как то все не понятно. Скачал, запускаю не работает.

Добавлено через 8 минут
Как пользоваться этой программой?

SoftIce · 17.01.2015, 10:43

Сообщение от vasiliw8

Как пользоваться этой программой?

У автора программы спрашивай

@Night Ranger · 18.01.2015, 12:00

vasiliw8,спросил бы у меня.. что тебе мешало это сделать, я 2 дня интересовался
запуститься ли ? еще у когонибудь..
..и почему надо-было создать отдельную тему и интерисоваться ..--почему не работает
не буду тебе отвечать, я записал тебя в свой чёрный блокнот. (с названием игнор)

Добавлено через 19 минут

Сообщение от vasiliw8

Возможно ли в VB6 в TextBox получить текущий курс Американского доллара к рублю, автоматически?

вам невозможно

@m-ch · 18.01.2015, 12:01

Функция получения котировки USD:

Visual Basic
1
2
3
4
5
6
7
8
9
Function GetUSD(Optional ByVal MyDate As Date) As Double
    Dim xmldoc, nodeList
    If MyDate = 0 Then MyDate = Date
    On Error Resume Next
    Set xmldoc = CreateObject("Msxml.DOMDocument"): xmldoc.async = False
    If Not xmldoc.Load("http://www.cbr.ru/scripts/XML_daily.asp?date_req=" & Format(MyDate, "dd\/mm\/yyyy")) Then Exit Function
    Set nodeList = xmldoc.SelectNodes("//Valute[@ID='R01235']")
    If nodeList.Length Then GetUSD = CDbl(nodeList.Item(0).ChildNodes(4).Text)
End Function

Не знаю, будет ли работать на VB6, но на VBA работает

@Night Ranger · 18.01.2015, 12:11

Ну и кому вы написали ?, или у вас тоже мода в разных темах писать..
ну ладно.. ладно..
найдите 5 отличий..
https://www.cyberforum.ru/post7114133.html

Visual Basic
1
2
3
4
Private Property Get DOMDocument() As Object
    If DDoc Is Nothing Then Set DDoc = CreateObject("Msxml.DOMDocument"): DDoc.async = False
    Set DOMDocument = DDoc
End Property

Добавлено через 3 минуты
vasiliw8, это не поможет, ему надо чтото другое, а вот что ?

Добавлено через 2 минуты
мне конечно по барабану что он не сможет, я бы сказал кто он.. да нельзя
но проблема остаёться, и ведь будут находиться такие -же с проблемами

@vasiliw8 · 18.01.2015, 12:29 **[ТС]**

Night Ranger,
Вас лично прошу не беспокоится.

@Night Ranger · 18.01.2015, 12:47

Сообщение от m-ch

Не знаю, будет ли работать на VB6

будет, не работает только у одного человека, которого можно не считать

@m-ch · 18.01.2015, 12:55

Сообщение от Night Ranger

Ну и кому вы написали ?, или у вас тоже мода в разных темах писать..

Вопрос ко мне?
Если да, то писал для ТС на его вопрос:

Сообщение от vasiliw8

Возможно ли в VB6 в TextBox получить текущий курс Американского доллара к рублю, автоматически?

Решение не полное, предложил функцию, которая запрашивает курс USD с сайта CBR

при чем тут разные темы?

@Night Ranger · 18.01.2015, 12:59

Сообщение от m-ch

Вопрос ко мне?
Если да, то писал для ТС на его вопрос:

Да вы не при чем, я тоже как-бы для ТС старался.. всё проехали, я в этой теме не собираюсь больше ничего писать

@vasiliw8 · 18.01.2015, 14:52 **[ТС]**

The trick,
Объясните пожалуйста, что такое - [ТС] рядом со временем написания сообщения?

@The trick · 18.01.2015, 14:54

Сообщение от vasiliw8

Объясните пожалуйста, что такое - [ТС] рядом со временем написания сообщения?

ТС - топикстартер (синоним op - original poster), автор темы.

Новые блоги и статьи Все статьи Все блоги /
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .

@vasiliw8 38 / 38 / 16 Регистрация: 04.03.2014 Сообщений: 249

	Курс валют 16.01.2015, 21:22. Показов 3442. Ответов 12 Метки нет (Все метки) Возможно ли в VB6 в TextBox получить текущий курс Американского доллара к рублю, автоматически? 0

@The trick Модератор 10048 / 3894 / 883 Регистрация: 22.02.2013 Сообщений: 5,847 Записей в блоге: 79
	16.01.2015, 21:33
	Курсы валют и удобный интерфейс (готовое решение) 2

@vasiliw8 38 / 38 / 16 Регистрация: 04.03.2014 Сообщений: 249
	17.01.2015, 09:59 [ТС]
	The trick, Как то все не понятно. Скачал, запускаю не работает. Добавлено через 8 минут Как пользоваться этой программой? 0

@vasiliw8 38 / 38 / 16 Регистрация: 04.03.2014 Сообщений: 249
	18.01.2015, 12:29 [ТС]
	Night Ranger, Вас лично прошу не беспокоится. 0

@vasiliw8 38 / 38 / 16 Регистрация: 04.03.2014 Сообщений: 249
	18.01.2015, 14:52 [ТС]
	The trick, Объясните пожалуйста, что такое - [ТС] рядом со временем написания сообщения? 0