Generate QR-code VB6

@Vika7714 · Регистрация: 16.02.2016

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

Всем салют.
Возможна ли генерация QR-кода на VB6?
На C# и VB.NET существуют библиотеки, для работы с QR.
Существуют ли таковые на VB6?

@UBUNTU · 15.03.2018, 15:44

Michael_B, офис на компьютерах скольки битный.

@Michael_B · 16.03.2018, 12:50

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

офис на компьютерах скольки битный.

UBUNTU, прошу прощения за своё невежество, но не смог найти, где это посмотреть

Предположительно, 64, так как оба компьютера 64-битные и Windows 7 тоже 64-битный.

@sergeos · 16.03.2018, 13:35

Неее, ну это уже верх невежества...

@The trick · 16.03.2018, 20:55

Michael_B, скиньте лучше сюда проект.

@Michael_B · 17.03.2018, 20:08

sergeos, спасибо большое !

UBUNTU, Вы правы, удивительно, я не понимаю как это могло случиться, но на ноутбуке 32-разрядная версия, а на настольном 64-разрядная. Разные. Буду приводить в соответствие и потом уже отпишусь.

The trick, и Вам большое спасибо ! Если что-то будет не так после переустановки Office, обязательно выложу проект. Надеюсь, правда, что всё решится переустановкой.

@nouyana · 10.01.2020, 17:41

Сообщение от The trick

Visual Basic
1
2
3
4
5
6
7
8
Private Declare Sub GenerateBMP _
Lib "C:\Temp\quricol32.dll" _
Alias "GenerateBMPW" ( _
ByVal FileName As Long, _
ByVal Text As Long, _
ByVal Margin As Long, _
ByVal Size As Long, _
ByVal Level As TErrorCorretion)

The trick, не могли бы вы помочь мне скомпилировать библиотеки quricol32.dll и quricol64.dll? У меня нет C++, только VB.

@UBUNTU · 11.01.2020, 07:41

nouyana, Зачем ? Они как бы готовы используйте их или я не понял что то

@nouyana · 11.01.2020, 21:33

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

nouyana, Зачем ? Они как бы готовы используйте их или я не понял что то

UBUNTU, да, прошу прощения - немного запутался с гитхабом и увидел сначала только исходники.
Вот ссылка на релиз, если кому ещё нужно.
Спасибо!

@Wawan_ · 11.11.2021, 23:17

Доброго здравия!
Люди,добрые, сами мы не местные, отстали от поезда, помогите, кто чем может.
Проблема в следующем, сделал всё как было указано, но код читается "?????? ???? ????????? ???????" как-то так, а если латиница или цифры, то всё нормально.
Кто знает как исправить?

I can · 12.11.2021, 07:12

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

но код читается

Какой код? Покажи.

@Wawan_ · 12.11.2021, 07:54

Вот

@Alex77755 · 12.11.2021, 08:58

крутой код!!!

@Wawan_ · 12.11.2021, 09:07

даа, я такой.
Или нужен VBA код?
вот он

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Option Explicit
Private Enum TErrorCorretion
    QualityLow
    QualityMedium
    QualityStandard
    QualityHigh
End Enum
Private Declare Sub GenerateBMP _
                Lib "C:\Temp\Swelio32.dll" _
                Alias "GenerateBMPW" ( _
                ByVal FileName As Long, _
                ByVal Text As Long, _
                ByVal Margin As Long, _
                ByVal Size As Long, _
                ByVal Level As TErrorCorretion)
Private Sub Form_Load()
    GenerateBMP StrPtr("C:\Temp\Example.bmp"), StrPtr(П_Уважаем), 3, 5, QualityLow
End Sub

Добавлено через 1 минуту
Библиотека

Visual Basic
1
Lib "C:\Temp\Swelio32.dll" _

Это новая версия, на том же сайте который указан выше по ттеме.

I can · 12.11.2021, 09:08

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

??????

Нормальный код, читается. "Уважаемый Абдюшев Ф.." (там больше информации, я сократил)

Добавлено через 49 секунд
Wawan_, выкиньте свой QR-сканер.

@Wawan_ · 12.11.2021, 09:10

И ещё, всё это в VBA Access.

Добавлено через 48 секунд
у меня телефон не читает, выдаёт ???????

I can · 12.11.2021, 09:11

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

у меня телефон не читает

И телефон тоже выкиньте...

Добавлено через 32 секунды
Точнее, программу - читалку кодов.

@Wawan_ · 12.11.2021, 09:11

мне нужно жестко прописать кодировку (правда не знаю какую ANSI или UNICOD)

I can · 12.11.2021, 09:12

Я же телефоном проверял, у меня читает.

@Wawan_ · 12.11.2021, 09:12

Новый, жалко-(

I can · 12.11.2021, 09:13

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

мне нужно жестко прописать кодировку

Какая разница, если ваш сканер не понимает?

Новые блоги и статьи Все статьи Все блоги /
Хитросплетение родственных связей пантеона греческих богов. russiannick 14.05.2026 Однооконник, позволяющий узреть и изучить отдельных героев древней Греции. <!DOCTYPE html> <html lang="ru"> <head> <meta charset="UTF-8"> <meta http-equiv="X-UA-Compatible". . .	[golang] Угол между стрелками часов alhaos 12.05.2026 По заданным значениям часа и минуты необходимо определить значение меньшего угла между стрелками аналогового циферблата часов. import "math" func angleClock(hour int, minutes int) float64 { . . .	Debian 13: Установка Lazarus QT5 ВитГо 09.05.2026 Эта инструкция моя компиляция инструкций volvo https:/ / www. cyberforum. ru/ blogs/ 203668/ 10753. html и его же старой инструкции по установке Lazarus с gtk2. . .	Нейросеть на алгоритме "эстафета хвоста" как перспектива. Hrethgir 06.05.2026 На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .
Асинхронный приём данных из COM-порта Argus19 01.05.2026 Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .	попытка написать игровой сервер на C++ pyirrlicht 29.04.2026 попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .	Контроль уникальности выбранного документа-основания при изменении реквизита Maks 28.04.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .	Благородство как наказание Maks 24.04.2026 У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .

@Vika7714 0 / 0 / 0 Регистрация: 16.02.2016 Сообщений: 13

	Generate QR-code VB6 18.03.2016, 12:37. Показов 40118. Ответов 74 Метки нет (Все метки) Всем салют. Возможна ли генерация QR-кода на VB6? На C# и VB.NET существуют библиотеки, для работы с QR. Существуют ли таковые на VB6? 0

@UBUNTU 352 / 213 / 42 Регистрация: 04.02.2015 Сообщений: 1,344
	15.03.2018, 15:44
	Michael_B, офис на компьютерах скольки битный. 0

@sergeos 207 / 23 / 6 Регистрация: 12.06.2012 Сообщений: 235
	16.03.2018, 13:35
	Неее, ну это уже верх невежества... 0

@The trick Модератор 10060 / 3905 / 885 Регистрация: 22.02.2013 Сообщений: 5,854 Записей в блоге: 79
	16.03.2018, 20:55
	Michael_B, скиньте лучше сюда проект. 0

@Michael_B 1 / 1 / 0 Регистрация: 23.10.2015 Сообщений: 99
	17.03.2018, 20:08
	sergeos, спасибо большое ! UBUNTU, Вы правы, удивительно, я не понимаю как это могло случиться, но на ноутбуке 32-разрядная версия, а на настольном 64-разрядная. Разные. Буду приводить в соответствие и потом уже отпишусь. The trick, и Вам большое спасибо ! Если что-то будет не так после переустановки Office, обязательно выложу проект. Надеюсь, правда, что всё решится переустановкой. 0

@UBUNTU 352 / 213 / 42 Регистрация: 04.02.2015 Сообщений: 1,344
	11.01.2020, 07:41
	nouyana, Зачем ? Они как бы готовы используйте их или я не понял что то 0

@Wawan_ 2 / 2 / 0 Регистрация: 08.09.2014 Сообщений: 78
	11.11.2021, 23:17
	Доброго здравия! Люди,добрые, сами мы не местные, отстали от поезда, помогите, кто чем может. Проблема в следующем, сделал всё как было указано, но код читается "?????? ???? ????????? ???????" как-то так, а если латиница или цифры, то всё нормально. Кто знает как исправить? 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	12.11.2021, 08:58
	крутой код!!! 0

@Wawan_ 2 / 2 / 0 Регистрация: 08.09.2014 Сообщений: 78
	12.11.2021, 09:10
	И ещё, всё это в VBA Access. Добавлено через 48 секунд у меня телефон не читает, выдаёт ??????? 0

@Wawan_ 2 / 2 / 0 Регистрация: 08.09.2014 Сообщений: 78
	12.11.2021, 09:11
	мне нужно жестко прописать кодировку (правда не знаю какую ANSI или UNICOD) 0

I can dive 4976 / 4687 / 848 Регистрация: 13.04.2015 Сообщений: 9,896
	12.11.2021, 09:12
	Я же телефоном проверял, у меня читает. 0

@Wawan_ 2 / 2 / 0 Регистрация: 08.09.2014 Сообщений: 78
	12.11.2021, 09:12
	Новый, жалко-( 0