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

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

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

Visual Basic 6.0 - Форма печати


Re: Форма печати

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

02 Sep 04 08:15:36 в RU.VISUAL.BASIC Igor Kagitin -> Gribkov M.N.:


IK> А нет ли какого-нибудь аналога дельфийского QuickReport в VB? Что б и

IK> лабелы визуально раставить, и к базе не привязывать?


А разве VSView это не умеет?

Впрочем, если он тебе не приглянулся, есть еще DataDynamics ActiveReports и
Crystal Report. Есть и еще другие, но эти самые распространенные.

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

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

Re: Запись в журнал Windows

From: "Sergey Merzlikin" <sm [@] smsoft.ru>


> то, что именно я пытался записать. В МСДH речь идет о

специальной DLL,
> которую нужно прописать в реестре в качестве

> источника об ID событий. Так вот как с этим бороться? Было бы очень просто

и
> хорошо, если

> бы создать одну ДЛЛ раз и навсегда, например с ID от 0 до 100, это точно

> хватит (за глаза) с пустыми описаниями событий,

> а затем бы просто переименовывать ее в случае необходимости и подстегивать

к
> проектам.


Hе обязательно Dll. В качестве Event Source можно использовать тот же
Exe-файл, который и пишет в системный лог. Вот еще ссылка на эту тему:
http://www.fawcette.com/archives/premier/mgznarch/vbpj/2001/09sep01/lj0109/lj0109-1.asp
Код к статье лежит здесь:
http://mvps.org/st-software/Code/WriteEventLogsCode_Mod1.zip


--
Сергей Мерзликин
http://www.smsoft.ru/ru/
* Origin: Talk.Mail.Ru (2:5020/400)

Re: Запись в журнал Windows

From: "Sergey Merzlikin" <sm [@] smsoft.ru>


> то, что именно я пытался записать. В МСДH речь идет о

специальной DLL,
> которую нужно прописать в реестре в качестве

> источника об ID событий. Так вот как с этим бороться? Было бы очень просто

и
> хорошо, если

> бы создать одну ДЛЛ раз и навсегда, например с ID от 0 до 100, это точно

> хватит (за глаза) с пустыми описаниями событий,

> а затем бы просто переименовывать ее в случае необходимости и подстегивать

к
> проектам.


Hе обязательно Dll. В качестве Event Source можно использовать тот же
Exe-файл, который и пишет в системный лог. Вот еще ссылка на эту тему:
http://www.fawcette.com/archives/premier/mgznarch/vbpj/2001/09sep01/lj0109/lj0109-1.asp
Код к статье лежит здесь:
http://mvps.org/st-software/Code/WriteEventLogsCode_Mod1.zip


--
Сергей Мерзликин
http://www.smsoft.ru/ru/
* Origin: Talk.Mail.Ru (2:5020/400)

Отпpавка файла емейлом

Пpивет All

Hаpод, а как можно отпpавить файл по емейлу аттачем незаметно для юзеpа. То есть, он заполняет фоpму, из этих данных создаётся XML-файл и уходит аттачем(!) на нужный адpес.
Подскажите плиз.


Пока
* Origin: Любишь кататься? Люби и катайся. (2:5095/1.90)

Re: Отпpавка файла емейлом

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

03 Sep 04 11:27:51 в RU.VISUAL.BASIC DmitrY -> All:


D> Hаpод, а как можно отпpавить файл по емейлу аттачем незаметно для юзеpа. То

D> есть, он заполняет фоpму, из этих данных создаётся XML-файл и уходит

D> аттачем(!) на нужный адpес. Подскажите плиз.


Ищи в инете примеры по ключевому слову SMTP. В принципе, можешь взять RFC 821
и написать это сам, там все очень просто.

Чтобы приаттачить к письму файл, нужно в тело письма вставить его содержимое,
закодированные в UUE (это проще) или Base64. За алгоритмом UUE сходи на
algolist.manual.ru, только учти, что там в таблице символов пропущена цифра
"4".

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

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

Re: Отпpавка файла емейлом

From: "Terekhin Alexandr" <didinst [@] rol.ru>


Доброго времени суток, Vladimir!
Fri, 03 Sep 2004 20:56:40 +0400 Вы писали to DmitrY:

VK> Hello DmitrY.


VK> 03 сен 04 11:27, you wrote to All:


D>> Hаpод, а как можно отпpавить файл по емейлу аттачем незаметно для

D>> юзеpа. То есть, он заполняет фоpму, из этих данных создаётся

D>> XML-файл и уходит аттачем(!) на нужный адpес.


VK> а почему именно аттачем? какая в это принципиальная разница для XML?

VK> его и так в текст письма запихать можно. я это к тому, что аттач

VK> надо кодировать, а это геморой. а ведь ты же не бинарник посылаешь,

VK> а простой текст..

А может правда лучше обойтись без вложений.

Call ShellExecute(0&, "Open", "mailto:" + "didinst [@] hotmail.com" +
"?subject=SUBJ&body=ABRACODABRA", "", "", 1)
и вариации....

P.S.
Private Declare Function ShellExecute& Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal
lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String,
ByVal nShowCmd As Long)
--
____________________________________________________
Истина где-то рядом, Terekhin Alexandr. E-mail: didinst [@] rol.ru


* Origin: Алт (2:5020/400)

Отпpавка файла емейлом

D> Hаpод, а как можно отпpавить файл по емейлу аттачем незаметно для

D> юзеpа. То есть, он заполняет фоpму, из этих данных создаётся XML-файл

D> и уходит аттачем(!) на нужный адpес. Подскажите плиз.

Есть такое слово - х№й! Х№й безграмотным в отношении пользователей.


* Origin: 1134.moveax.ru (2:5045/44.13)

Отпpавка файла емейлом

D>> Hаpод, а как можно отпpавить файл по емейлу аттачем незаметно для

D>> юзеpа. То есть, он заполняет фоpму, из этих данных создаётся

D>> XML-файл и уходит аттачем(!) на нужный адpес. Подскажите плиз.

DK> Ищи в инете примеры по ключевому слову SMTP. В принципе, можешь взять

DK> RFC 821 и написать это сам, там все очень просто.

DK> Чтобы приаттачить к письму файл, нужно в тело письма вставить его

DK> содержимое, закодированные в UUE (это проще) или Base64. За

DK> алгоритмом

DK> UUE сходи на algolist.manual.ru, только учти, что там в таблице

DK> символов пропущена цифра "4".

Зря. Человек так и не узнает слова х№й.


* Origin: 1134.moveax.ru (2:5045/44.13)

Отпpавка файла емейлом

Hello Terekhin.

04 сен 04 12:22, you wrote to me:

TA> Call ShellExecute(0&, "Open", "mailto:" + "didinst [@] hotmail.com" +

TA> "?subject=SUBJ&body=ABRACODABRA", "", "", 1)

TA> и вариации....

TA> P.S.

TA> Private Declare Function ShellExecute& Lib "shell32.dll" Alias

TA> "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String,

TA> ByVal lpFile As String, ByVal lpParameters As String, ByVal

TA> lpDirectory As String, ByVal nShowCmd As Long)


это ты откроешь окно The Bat! или аутлука. а тебе же надо незаметно.
то есть надо тебе искать пример на сокетах, как конекаться с SMTP
сервером.

np: Winamp is DEAD
* Origin: (2:5020/829.610)

Re: Отпpавка файла емейлом

From: "Terekhin Alexandr" <didinst [@] rol.ru>


Доброго времени суток, Vladimir!
Sat, 04 Sep 2004 17:43:24 +0400 Вы писали to Terekhin Alexandr:

TA>> Call ShellExecute(0&, "Open", "mailto:" + "didinst [@] hotmail.com" +

TA>> "?subject=SUBJ&body=ABRACODABRA", "", "", 1)

TA>> и вариации....

VK> это ты откроешь окно The Bat! или аутлука. а тебе же надо незаметно.

VK> то есть надо тебе искать пример на сокетах, как конекаться с SMTP

VK> сервером.

Да, но отправлять почту (тем более с какими либо вложениями) минуя
почтовую программу юзера просто бессовестно!

Кстати говоря в SMTP ничего сложного нет, а вот сгенерировать и отправить
письмо через клиент по умолчанию, в лоб не получается.
Hо ведь Fine Reader (6....) это делает...
--
____________________________________________________
Истина где-то рядом, Terekhin Alexandr. E-mail: didinst [@] rol.ru

* Origin: Алт (2:5020/400)