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

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

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

Visual Basic 6.0 - Подскажите как найти что за форма зависает в памяти?


Re: Подскажите как найти что за форма зависает в памяти?

Dim frm As Form
For Each frm In Forms
MsgBox (frm.Name)
Next frm

А у меня на такую конструкцию (Visual.net) ругается, говорит
Name 'Forms' is not decrared
* Origin: SVZ-Service (2:5006/1 [@] fidonet)

Re: [***SPAM*** Score/Req: 06.90/05.00] Re: Подскажите как найти что за

From: Алексей Вишневский <alexv [@] yna.alrosa-mir.ru>

Subject: Re: [***SPAM*** Score/Req: 06.90/05.00] Re: Подскажите как найти что за форма зависает в памяти?

Привет Vasenin Michael,

пятница, 21 ноября 2003 г., 20:36:30, Вы писали:

VM> Dim frm As Form

VM> For Each frm In Forms

VM> MsgBox (frm.Name)

VM> Next frm


VM> А у меня на такую конструкцию (Visual.net) ругается, говорит

VM> Name 'Forms' is not decrared


А в .Net и нет такой коллекции...

--
С наилучшими пожеланиями,
AlexV ICQ: 147480482
*** CPU cooler error - air is not found! ***

* Origin: Институт "Якутнипроалмаз" (Лаб. АСУТП) (2:5020/400)

Re: VB & Exel

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


Hello, Igor! You wrote to All on Fri, 21 Nov 2003 07:54:06 +0300:

IK> Привет All!


IK> При работе с Exel делаю быстрый экспорт из рекордсета через

IK> CopyFromRecordset, возможно ли организовать такой же быстрый импорт?

IK> А то документ - прайс и обрабатывать 5000 строк по я чейкам, долго

IK> получается.


IK> И возможен ли импорт только одного столбика Exel в рекордсет без

IK> перебора строк?


А если сначала из экселя в csv а уж оттуда в Recordset? По моему опыту тормозит именно итерация по ячейкам а рекордсет размером 10000*40 за пару секунд заполняется в цикле.

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

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

Re: Вопрос ?

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


Hello, Mihail! You wrote to Igor Evgrafov on Thu, 20 Nov 2003 20:54:20 +0000 (UTC):

SM>>> ??>> Кто ни будь может объяснить почему при передачи текста (String)

SM>>> через Winsock размер его возрастает? Перед передачей текста например

SM>>> 30 441 символ подсчитываю функцией Len, получаю 33 326 или еще

SM>>> больше когда как, почему так?

AT>>>> Потому что руки.


IE>> ... лишние три кило текста? Тут блин внатуре нет телепатов.


MB> Какой лишний текст?

MB> Текст тот же, а размер разный


%) Это какое-то новое открытие наверно.

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

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

Re: [***SPAM*** Score/Req: 06.90/05.00] Re: Подскажите как найти что за

Subject: Re: [***SPAM*** Score/Req: 06.90/05.00] Re: Подскажите как найти что за

> А в .Net и нет такой коллекции...

А какая есть,
То есть как перебрать все открытые формы.


* Origin: SVZ-Service (2:5006/1 [@] fidonet)

Re: Подскажите как найти что за

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


Hello, Vasenin! You wrote to All on Fri, 21 Nov 2003 20:49:25 +0300:

??>> А в .Net и нет такой коллекции...

VM> А какая есть,

Вроде никакой нет(не уверен)

VM> То есть как перебрать все открытые формы.


Запусти Spy++ и там точно все твое формы есть. Точнее там окна но по заголовку не трудно определить ху из ху.

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

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

Re: [***SPAM*** Score/Req: 06.90/05.00] Re: Подскажите как найти что за

From: Alexander Trishin <trialFORSPAM [@] trishin.com>

Subject: Re: [***SPAM*** Score/Req: 06.90/05.00] Re: Подскажите как найти что за

Vasenin Michael wrote on Fri, 21 Nov 2003 20:49:25 +0300:

>> А в .Net и нет такой коллекции...

> А какая есть,

> То есть как перебрать все открытые формы.


Разные есть, но для форм нет.
Читать это:
HOW TO: Create a Forms Collection in Visual Basic .NET
http://support.microsoft.com/default.aspx?id=308537

Я бы еще сделал бы MyBaseForm в которой бы реализовывались
добавление/удаление из custom forms collection и наследовался от нее, а не
от стандартной Form. MyBaseForm есс-но наследцется от Form.

--
AT
* Origin: Demos online service (2:5020/400)

Re: Вопрос ?

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

20 Nov 03 23:54:20 в RU.VISUAL.BASIC Mihail Borisov -> Igor Evgrafov:


IE>> Ты че чувак, сам не можеш сравнит две строки и пасмотрет че там за лишние

IE>> три кило текста? Тут блин внатуре нет телепатов.

MB> Какой лишний текст?

MB> Текст тот же, а размер разный


Hу как же он может быть тем же? Посмотри внимательно. Может быть, там часть
текста сдупилась, может быть, кодировка поплыла (смесь анси и юникода - в
результате фазы луны иногда такое бывает). От того, что случилось с твоим
текстом, зависит то, что тебе придется делать, чтобы пофиксить это. :)

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

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

Вопрос по MS SQL серверу.

Hello All!

Вопрос, вероятно, офтопик и если кто знает четкий ответ и может кое что
просветить, то просьба отвечать или мылом или на e-mail.

Вопрос такой: Проведен импорт из файла *.mdb в MS SQL версию точно не
помню, то ли 6,5 то ли 7... Импорт прошел хорошо. Теперь стоит задача: при
работе с сервером (с таблицами из файла) хотелось бы иметь постоянное
обновление этих данных и в файле *.mdb Понятно, что необходима
репликация... но как это сделать? Визард не помог:(

Второй вопрос о типах данных в сервере: при импорте данных из файла все
поля типа "счетчик" превратились в тип int, потом стоит 4 и далее какая то
precision 10? В акцессе счетчик, по моему, длинное целое, а тут просто
целое с какой то точностью 10?


* Origin: Home PC (stas [@] mednet.kirov.ru) (2:5056/40.2)

Выдача больших результатов Select`а в list

Hello All!

Пеpиодически встpечаю совет в эхе: пpи возвpащении селектом большого
кол-ва записей и заполнении ими к пpимеpу листбокса, то что бы не
тоpмозило заполнять поpционно, по меpе надобности. А как поpционно?
Интеpесует не конкpетная pеализация, а идея сама - не могу додуматься как
это сделать? Пpочитать, к пpимеpу пеpвые 100 записей, поставить закладку,
заполнить листбокс. Пpи движении по боксу если достигнут конец списка
пpочитать следующие 100 записей, подвинуть закладку, постоянно пpовеpяя на
BOF и EOF. Так? Или нужно как то иначе?

Спасибо за внимание.

* Origin: Home PC (stas [@] mednet.kirov.ru) (2:5056/40.2)