Visual Basic .NET

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Visual Basic .NET Управление внешней программой Доброго времени суток! Есть Форма с кнопкой, необходимо чтобы при нажатии на данную кнопку, нажималась кнопка Отправить в Telegramm Desctop Вроде весь форум и гугл просмотрел, есть немного инфы, но ничего не работает. Прошу помощи. Заранее спасибо! https://www.cyberforum.ru/ vb-net/ thread2411820.html	Visual Basic .NET Удаление (замена) тегов форматирования в тексте Доброго времени суток, коллеги! В процессе работы программа формирует некое описание. В условиях обязательно, что бы в окне TextBox каждый новый пункт описания начинался с новой строки. С этой целью код формируется следующим образом: Sub setdata() Form_Main.data = Form_Main.data1 & Chr(13) & Chr(10) & Form_Main.data2 & Chr(13) & Chr(10) & ...
Visual Basic .NET Проверка существования файла на удаленном ПК https://www.cyberforum.ru/ vb-net/ thread2410899.html Нашел команды для проверки,создания итп файлов, но только на локальном компьютере. IO.Directory.Exists("C:\Windows") - проверка, существует ли папка. (можно также указать "\\tets\C:\Windows", на удаленном пк) IO.Directory.CreateDirectory("C:\Dir") - создать папку. Как мне указать имя компьютера в переменной для этой команды? Тобишь:	Visual Basic .NET Проверка на символы в алфавитном порядке https://www.cyberforum.ru/ vb-net/ thread2410799.html Задача: Дана последовательность символов String. Необходимо определить: расположена ли данная последовательность в алфавитном порядке или нет. Я даже не знаю ка подступиться к этому. Проверять ли через цикл поэлементно? Или задать два массива, первый из них будет содержать 26 букв английского алфавита, а второй заданную последовательность и сравнивать их до того момента, пока сравнение не примет...
Поиск слова в текстовом файле и вывод Visual Basic .NET Вопрос такой есть текстовой файл TXT в нем записанны слова например Привет кошка собака	Visual Basic .NET DataGridView - добавить колонку https://www.cyberforum.ru/ vb-net/ thread2410669.html Всем привет! Как программно добавить колонку в DataGridView с заданным индексом, т. е. возможно в середину. И также удалить выбранную колонку. Добавлено через 6 минут Еще необходимо понять как считывать и устанавливать заголовок.
Visual Basic .NET Связь программы с ПЛК Может кто-то объяснить или поделиться материалом о том как контроллер связан с программой на ПК, написанной на Visual Basic? Контроллер дает команды вывода на экран, вызывает определенные сообщения, получает данные от оператора и т.д. https://www.cyberforum.ru/ vb-net/ thread2410624.html	Visual Basic .NET Дублирование кнопки Можно ли сделать кнопку в первом окне, которая бы вызывала нажатие(т.е. выполняла все задачи) другой кнопки, которая находится в 3-ем окне? Мой вариант сделать идентичную кнопку, скопировать содержание, но нужно добавлять к каждой команде адрес на 3-ю форму form3.
Visual Basic .NET Принудительный запуск процедуры обработки события https://www.cyberforum.ru/ vb-net/ thread2410377.html Коллеги, доброго времени суток. На форме есть Combobox6. Есть процедура обработки изменения значения в списке: Sub ComboBox2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox2.SelectedIndexChanged ... End Sub В коде программы необходимо принудительно запустить эту процедуру без фактической смены значения.	Visual Basic .NET Создать новое значение в реестре, на удаленном ПК https://www.cyberforum.ru/ vb-net/ thread2410271.html Здравствуйте, ошибка при выполнение кода, необходимо подключится к удаленному реестру на другом пк в локальной сети и изменить/создать значение в LastLoggedOnUser, которое пользователь вводит в textbox2. Проект собирает без ошибок,но во время нажатия button2, появляется ошибка(необрабатываемое исключение) Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click...
Visual Basic .NET Заполнение Combobox из базы данных по условию Добрый день, коллеги! На форме есть поле TextBox7, которое может быть не заполнено, либо может быть указана цифра. Есть Combobox6, который должен быть заполнен по условию. Условие: выборка всех строк из таблицы "Flange_pressure_rating_tb" базы данных в которых значение "Pressure_for_search" больше чем значение в поле TextBox7. Не могу правильно составить SQL запрос для заполнения (либо весь...	Visual Basic .NET Удалить весь текст из текстового поля, оставить только дату https://www.cyberforum.ru/ vb-net/ thread2409857.html Всем привет! В текстовом поле есть некий текст. в нем местами встречаются даты. формата (дд.мм.гггг) как из текстового поля удалить весь текст, оставив только последнюю по тексту дату?

TRAP_WORLD

65 / 59 / 14

Регистрация: 27.11.2017

Сообщений: 421

06.03.2019, 07:35

Получение сведений об ЮЛ (ИП) по ИНН - Visual Basic .NET - Ответ 13380194

06.03.2019, 07:35. Показов 5963. Ответов 13

Метки (Все метки)

Ответ

+ ко всему лучше воспользоваться готовыми программами для быстрого парсинга
к примеру старый добрый imacros ниже код сгенерирован менее чем за 30 сек

Bash

URL GOTO=https://zachestnyibiznes.ru/
' поиск по названию "Вася Пупкин"
TAG POS=1 TYPE=INPUT:TEXT ATTR=NAME:query CONTENT=Вася<SP>Пупкин
' кнопка поиск
TAG POS=1 TYPE=BUTTON:SUBMIT ATTR=CLASS:btn<SP>btn-default<SP>btn-search<SP>btn-lg
' Статус
TAG POS=19 TYPE=SPAN ATTR=* EXTRACT=TXT
' ИНН
TAG POS=2 TYPE=TD ATTR=CLASS:text-center EXTRACT=TXT
' Руководитель
TAG POS=1 TYPE=TD ATTR=ITEMPROP:founder EXTRACT=TXT
' Дата регистрации
TAG POS=3 TYPE=TD ATTR=CLASS:text-center EXTRACT=TXT
Адрес
TAG POS=1 TYPE=TD ATTR=WIDTH:220 EXTRACT=TXT

учитывая что сайт предоставляет платный api доступ то видно по коду что защиты нет не какой от парсинга

в vb.net он будет выглядеть так

VB.NET

Dim errrror as String ' - есть ли ошибки при выполнении
Dim статус_фирмы as String ' - получить статус фирмы
iim1 = CreateObject("imacros")
macro = "URL GOTO=https://zachestnyibiznes.ru/" + vbNewLine
macro = macro + "WAIT SECONDS=1" + vbNewLine
macro = macro + "TAG POS=1 TYPE=INPUT:TEXT ATTR=NAME:query CONTENT=Вася<SP>Пупкин" + vbNewLine
macro = macro + "TAG POS=1 TYPE=BUTTON:SUBMIT ATTR=CLASS:btn<SP>btn-default<SP>btn-search<SP>btn-lg" + vbNewLine
macro = macro + "WAIT SECONDS=1" + vbNewLine
macro = macro + "TAG POS=19 TYPE=SPAN ATTR=* EXTRACT=TXT" + vbNewLine
iim1.iimPlayCode(macro)
errrror = iim1.iimGetLastError()
статус_фирмы = iim1.iimGetExtract(1)
If tmpstring.Contains("OK (1)") Then '- если ошибок не было 
MsgBox(статус_фирмы) 'ликвидирован 
End If
 
'далее макрос нужно начинать с обнуления переменной [B]EXTRACT[/B]
macro = "SET !EXTRACT NULL" + vbNewLine

Вернуться к обсуждению:
Получение сведений об ЮЛ (ИП) по ИНН Visual Basic .NET

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

06.03.2019, 07:35

Готовые ответы и решения:

Получение сведений из переменной
Доброго времени суток. Помогите пожалуйста решить задачу: Сформирована переменная Assortim,...

Получение сведений о папке
Помогите кто может написать программу которая для некоторой папки находит дату её создания. И потом...

Получение сведений об игрушках
наименование задачи-Получение сведений об игрушках, структура записей исходного файла - название...

Получение сведений о версии ОС
Здравствуйте! Спортивный интерес. Как тоже самое переписать для юникодной версии функции ? ...

	06.03.2019, 07:35

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

06.03.2019, 07:35

Помогаю со студенческими работами здесь

Получение из регистра сведений
Подсккажите как из регистра сведений получить предпоследнюю и последнюю записи

Получение данных из регистра сведений
Ребята, нужна помощь)) Делаю отчет в 8.3, СКД продажи. Нужно добавить новое поле ЦенаП куда будут...

БП 2. Получение дополнительных сведений по Организации
Всем привет, помогите, пожалуйста. Не получается вынуть значение из дополнительных сведений. В...

Получение информации из регистра сведений
Здравствуйте вопрос в следующем, нужно достать контактную информацию организации из регистра...

Наверх