Современные решения

для защиты Windows приложений

и восстановления исходного кода

Visual Basic 6.0 - БД


Re: БД

Здоровья тебе, #/Oleg/#.
XC: #RU.VISUAL.BASIC, #CC.MY.ECHOMAIL

13 Окт 03, в 23:48, *Oleg Yurchenko* писал я к _All_:

OY> Hа удалённом компе находится база данных, как можно её подключить к

OY> пpиложению (логин и паpоль на доступ нужно вводить тоже в

OY> пpиложении)???


Так, давай по порядку. 1) Какая база?
2) Какой способ доступа к ней открыт?
3) Какими библиотеками собираешься пользоваться для общения с БД.


Удачи, #*/Дмитрий/*#.
[SPBGPU 3083/1]
* Origin: It's all gone. What is left behind on the desert we (2:5030/1450.6)

Re[2]: Byte Array(Variant) and API (Part 2)

From: Alexander Asyabrik <belmis [@] mail.belpak.by>


Привет, Igor.

Вы, было дело, писали 14 октября 2003 г., 21:28:


IE> Я это не для того чтоб выпендрится а чтоб показать, что не так уж

IE> и сложно некоторые части кода, которые геморойно (если вообще

IE> возможно) писать на VB сделать в С++. Там хоть отлаживаться

IE> спокойно можно в VB при таких извращениях либо работает либо

IE> Access Violation и что там глючит ХЗ.


Да что же мне делать? Я опять соглашусь с тобой. И хватит уже меня в
очередной раз заставлять расписываться в неумении владеть 'серьезными'
языками программирования. "Зато яки гарны писни мы спиваэм!" :))

IE> PS: У тебя ж, насколько я понял, еще есть желание из сырого

IE> массива делать VBшный SAFEARRAY.


Да зачем _мне_ его делать? VB вроде сам делает, когда я его передаю в
качестве аргумента функции. Только вот не удавалось ухватиться за
данные этого массива внутри той функции.

IE> Причем без копирования. Тут уж, ИМХО, на VB совсем труба будет...


Dmitry Viazowkin так не считает и прислал мне абсолютно
работоспособный код (СПАСИБО!!!), решающий мою задачу. Из АПИ там
только CopyMemory, никаких OLE-заморочек. Есть там непонятные для меня
моменты, но это не помешало использовать их для реализации идеи. Я как
осмыслю все это, так опубликую здесь.

Hо все-таки интересно было бы определиться с размером для структуры
Variant. Прозвучало три цифры 12, 14, 16. Кто-нибудь может поставить
точку в этом вопросе? Hапример, тот, кто в отличие от меня понимает
разницу в safearray* и safearray** и точно знает, что есть этот
злосчастный union ;-)
--
С уважением, Alexander
12:26:31 AM
* Origin: Talk.Mail.Ru (2:5020/400)

MSDN

Hi, Alexej !

13 Окт 03 22:28, Alexej Bobylev писал All

AB> Великий ALL, может у тебя есть свежий MSDN или может ты знаешь где

AB> его можно скачать ?

Последний MSDN был за Апрель 2003 если мне память не изменяет.
В сетях eMule, Kazza, Shareza поищи.

Good-bye, Alexej !!! С вами был, есть и будет: Max Irgiznov [VS.NET] [FreeBSD]
* Origin: Взялся за грудь, говори что нибудь! (2:5051/36.20)

Удаление дублей в массиве

Доброго утра/дня/вечера/ночи таищ Igor!

Чет Окт 09 2003 00:44, Igor Evgrafov вpоте ту Jack Tyurin:

JT>> А хотелось бы не проверять массив на лету, а сначала заполнить

JT>> его полностью с дублями, а потом при помощи ??? создать копию

JT>> этого массива но уже без дублей(в C++/Perl решается при помощи

JT>> ассоциативного массива/хэша). Буду признателен за любые решения

JT>> этого вопроса.

IE> Collection

IE> Dictionary


Tnx.

За сим откланиваюсь, искpенне ваш...

* Origin: Out of order (2:5020/1581.14)

Re: Byte Array(Variant) and API (Part 2)

From: "Igor Evgrafov" <fornews [@] systems21.ru>


[Sorry, skipped]

AA> Hо все-таки интересно было бы определиться с размером для структуры

AA> Variant. Прозвучало три цифры 12, 14, 16. Кто-нибудь может поставить

AA> точку в этом вопросе? Hапример, тот, кто в отличие от меня понимает

AA> разницу в safearray* и safearray** и точно знает, что есть этот

AA> злосчастный union ;-)


Как велик VARIANT? http://www.rsdn.ru/article/com/varsafearr.xml довольно популярно написано.

With best regards, Igor Evgrafov. E-mail: ievgrafo<AT>systems21{DOT}ru

* Origin: Cronyx Plus ISP (2:5020/400)

Re: Byte Array(Variant) and API (Part 2)

From: Alexander Asyabrik <belmis [@] mail.belpak.by>


Привет, Master.

Вы, было дело, писали 14 октября 2003 г., 11:39:45:


AA>> Можно, но в обоих случаях возвращается 8205. Я толком не знаю, что

AA>> есть VT_BYREF, но VB его игнорирует.


DK> Хм... 8205 = 0x200D = VT_ARRAY | VT_UNKNOWN.


Значение 8205 возвращает VB-шная VarType. И это добро состоит из
vbArray + vbByte. "Байтовый массив, че ишо вам надо!?", - вот что
по-хамски заявляет нам VB. А констант, описывающих VT_UNKNOWN, VT_BYREF
и мн.др. там просто не предусмотрено.

DK> Фаза луны, не иначе.


Скорее это сдвиг по фазе у MS :)


--
Alexander
* Origin: Talk.Mail.Ru (2:5020/400)

Re: Byte Array(Variant) and API (Part 2)

From: Alexander Asyabrik <belmis [@] mail.belpak.by>


Привет, Igor.

Вы, было дело, писали 15 октября 2003 г., 9:55:31:


IE> Как велик VARIANT? http://www.rsdn.ru/article/com/varsafearr.xml

IE> довольно популярно написано.


Hадо же... Я уже с утра это обнаружил гуглем и вот все читаю.

====
Итак, VARIANT v это 8 байт плюс размер union. Union содержит
достаточно места для своего самого большого члена, в данном случае это
8 байт (для double, currency или date). Итак, VARIANT v это 16 байт.
Однако есть одно исключение...
====

Я просто счастлив читать такое:)

--
Alexander
* Origin: Talk.Mail.Ru (2:5020/400)

Re: Есть такая фyнкция в VB?

Мы где-то виделись, Dima?

10 Oct 03 15:34:05 в RU.VISUAL.BASIC Dima Zaika -> мне:


MB>>> Есть ли в VB .NET такая фyнкция котоpоя может опpеделить является

MB>>> ли число четным или нет?

DK>> Dim lValue As Long

DK>> ' ...

DK>> Dim bOdd As Boolean

DK>> bOdd = lValue And 1

DZ> Все веpно, только я не понял почемy?

DZ> Вpоде бы все, что отличается от ноля = true

DZ> тогда 21 and 1, должно веpнyть true

DZ> и 20 and 1, должно веpнyть то же самое, а возвpащает 1 и 0.

DZ> ?????


Есть два варианта оператора And: один для логических операций (работает именно
так, как ты описал), а другой - для побитовых операций над целыми числами. Вот
он выше как раз и используется. Принцип его работы аналогичен первому, но
только операция "И" выполняется над каждым битом в отдельности. Короче, мы
проверяем младший бит.

Всего хорошего!
Дмитрий Козырев aka Master

P.S. А в сях такой путаницы нет: там && и & - совершенно разные операторы.

* Origin: Дорогу осилит идущий. (2:5023/11.148)

Re: Byte Array(Variant) and API (Part 2)

Мы где-то виделись, Alexander?

15 Oct 03 02:00:38 в RU.VISUAL.BASIC Alexander Asyabrik -> Igor Evgrafov:


AA> Dmitry Viazowkin так не считает и прислал мне абсолютно

AA> работоспособный код (СПАСИБО!!!), решающий мою задачу.


2DV: Так в чем дело-то было?

AA> Hо все-таки интересно было бы определиться с размером для структуры

AA> Variant. Прозвучало три цифры 12, 14, 16.


Полный размер - 16. 2 байта для типа (vt), 6 зарезервированно, и 8 для данных.
В случае, если данными является указатель (для 32-битных систем его размер
равен 4 байта), копировать можно только 12 байт.

AA> точно знает, что есть этот злосчастный union ;-)


Union - это такая структура данных, поля которой наложены друг на друга.
Hапример:

union u1
{
DWORD dw;
BYTE b[4];
};

// ...

u1 u;
u.dw = 0x1020304;

Получаем:
u.b[0] равен 4, u.b[1] равен 3, и т.д.

Всего хорошего!
Дмитрий Козырев aka Master

* Origin: Дорогу осилит идущий. (2:5023/11.148)

Re: дата создания файла из JPEG

From: Alexander Asyabrik <belmis [@] mail.belpak.by>


Привет, Alexandr.

Вы, было дело, писали 14 октября 2003 г., 12:56:20:


AB> Вопрос такой - в JPEG хранится время создания файла - как его вытащить

AB> программно?

AB> Т.е. то время, что отображается в ACDSee в меню File->Properties, закладка

AB> Metadata


Смотри Exif file format.
Этот формат поддерживают в основном цифровые фотоаппараты и софт для
них специально разработанный. Многие графические редакторы без
зазрения совести удаляют эти данные из JPG-файлов (если они там
первоначально были), так что не стоит надеяться, что эти данные будут
наличествовать в любом JPG-е.

Упрощенное описание формата ушло в мыло.


--
Alexander
* Origin: Talk.Mail.Ru (2:5020/400)