Архив рассылки сайта VBNet

Книги

	Visual Basic 6. Мастер. Руководство для профессионалов Язык программирования Visual Basic - мощный инструмент разработки приложений для 32-разрядных систем Windows 95 и Windows NT. В книге рассматриваются как фундаментальные понятия и темы: от установки продукта на компьютер пользователя и описания интегрированной среды разработки до изложения основ техники программирования на Visual Basic, так и сложные вопросы, адресованные профессиональным программистам: создание интерфейса пользователя, применение стандартных элементов управления, в том числе и для работы с базами данных, программирование компонентов ActiveX, описание технологии OLE drag-and-drop, объектная модель FSO, функции работы с файлами, отладка и оптимизация программ, локализация и распространение готовых приложений. Автор: нет даных Издательсвто: нет данных Год издания: 1998 Кол-во страниц: 992 Стоимость: 112,48 р. Формат: 70х100/16 Переплёт: мягкий
	Visual Basic 6. Специальный справочник Главная цель этого справочника - научить читателя использовать инструменты и средства Visual Basic, позволяющие значительно облегчить и ускорить процесс создания приложений. Здесь вы найдете описание элементов языка, библиотечных функций и SQL-операторов. Особое внимание уделено различным мастерам, предназначенным для решения стандартных задач. Весь справочный материал в книге разбит на главы, в каждой из которых вы найдете информацию по созданию приложения определенной направленности. Разделы в главе содержат пошаговое описание операций, которые нужно выполнить для решения поставленной задачи, синтаксис необходимых операторов, а также подробно разобранные примеры. Предлагаемый справочник будет полезен не только пользователям, активно работающим с Visual Basic 6, но и начинающим программистам, желающим перейти к профессиональной разработке приложений с наименьшими затратами времени на изучение новой среды программирования. Автор: Б. Карпов Издательсвто: Питер Год издания: 2000 Кол-во страниц: 416 Стоимость: 70,78 р. Формат: 84х108/32 Переплёт: нет данных
	Visual Basic 6.0 for application Книга является систематизированным справочником по всем элементам языка программирования Visual Basic (VB), входящим, как в автономную версию VB, так и в основные реализации Visual Basic for Applications. Помимо тех официальных сведений, которые можно найти в документации и в справочной системе, книга содержит конкретные примеры, рекомендации и маленькие хитрости программиста, а также поправки к справочной системе, которая, увы, не без ошибок. Книга предназначена для всех специалистов, занимающихся разработкой приложений с применением Visual Basic и Visual Basic for Applications. Автор: Король В.И. Издательсвто: КУДИЦ-Образ Год издания: 2000 Кол-во страниц: 448 Стоимость: 113,87 р. Формат: 70х100/16 Переплёт: мягкий
	Win32 API и Visual Basic. / Для профессионалов / Книга является сборником полезных советов и приемов, хотя в ней, вероятно, описаны тысячи разных приемов. Она не была задумана как энциклопедия самостоятельных фрагментов программного кода, которые бездумно подключаются к приложению - хотя многие ее примеры можно использовать подобным образом. Автор: Д. Эпплман Издательсвто: Питер Год издания: 2001 Кол-во страниц: 1120 Стоимость: 489,08 р. Формат: нет данных Переплёт: нет данных
	Азбука программирования в Windows 32 API Изложены вопросы создания программных приложений для Window95 и Windows NT. Описаны основные типы переменных, макросов, функций. Материал книги иллюстрируется многочисленными примерами. 1 Настоящее издание (второе вышло в 2000 г.) дополнено описанием тех возможностей Windows, которые не были упомянуты в предыдущих изданиях. Автор: Румянцев П.В. Издательсвто: Радио и связь Год издания: 2001 Кол-во страниц: 312 Стоимость: 85 р. Формат: 60х88/16 Переплёт: нет данных
	Использование Visual Basic 6. Специальное издание В книге описана новая версия популярной системы программирования Visual Basic 6. Изложение материала построено по принципу "от простого к сложному". Первые главы этой книги адресованы новичкам, из которых они смогут почерпнуть основы языка Visual Basic и описание его стандартных компонентов. Для подготовленных пользователей будет интересен раздел, посвященный специальным методам программирования с использованием стандартных компонентов Windows, элементов управления ActiveX, ADO. RDO и др. В отдельную часть вынесены вопросы, связанные с разработкой приложений баз данных на Visual Basic и работе в Internet. Автор не обошел также вниманием различные версии языка Visual Basic - VBA и VBScript. В приложениях приведен обзор интегрированной среды разработки Visual Basic, а также краткий справочник по SQL. Книга рассчитана на широкий круг читателей. Автор: Сайлер Б., Споттс Дж. Издательсвто: Вильямс Год издания: 1999 Кол-во страниц: 832 Стоимость: 244,02 р. Формат: 70х100/16 Переплёт: твёрдый
	Обработка баз данных на Visual Basic 6 + CD Сердцем многих приложении, работающих в сфере бизнеса, являются базы данных. Своим широким распространением они обязаны возможности централизованного доступа к информации. который характеризуется последовательностью, эффективностью и относительной простотой создания и поддержки. В книге "Обработка баз данных на Visual Basic 6" описываются все технологии доступа к базам данных с помощью Visual Basic. Приведенные в этой книге примеры взяты из реальной жизни, поэтому, ознакомившись с ними, вы узнаете, как можно использовать базы данных для принятия решений в сфере бизнеса. Если вы еще не готовы перейти к версии Visual Basic 6, это вовсе не значит, что данная книга вам не подходит. Практически 95% материала этой книги удовлетворит в равной степени пользователей как пятой, так и шестой версий Visual Basic. Книга рассчитана на программистов средней и высокой квалификации. Автор: Мак-Манус Дж.П. Издательсвто: Вильямс Год издания: 1999 Кол-во страниц: 672 Стоимость: 294,66 р. Формат: 70х100/16 Переплёт: твёрдый

Остальные книги о VB можно найти здесь.

наверх

Citycat by Email

Программа Citycat by Email позволяет работать с сервером Subscribe.ru с помощью электронной почты. Теперь Вам не нужно тратить деньги на работу в online и просматривать мегабайты рекламы для того, чтобы подписаться на нужную рассылку! Вам просто необходимо скачать небольшую базу данных по всем рассылкам каталога с нашего сайта, после чего Вы сможете подписываться и отписываться от рассылок, заказывать архивы прошлых выпусков, выполнять поиск по каталогу рассылок и многое другое.
Программу Citycat by Email можно бесплатно загрузить с сайта http://sapisoft.h1.ru.

наверх

Новости сайта VBNet

Дата: 19.04.2002 11:10 | Раздел: ActiveX контролы | Автор: Борзенков Дмитрий

RunTurnImage - OCX представляет неограниченные возможности поворота и вращения картинки на плоскости. Думаю, в примере все довольно наглядно. Внимание: Данный OCX использует FoxCBmp.dll (происхождение его мне неизвестно, ко мне попал из третьих рук). Для корректной работы RunTurnImage Control'а, в папке с приложением и/или в директории инсталяции VB означенный DLL должен присутствовать. Автору FoxCBmp.dll - особая благодарность.

Дата: 19.04.2002 06:35 | Раздел: Статьи по VB | Автор: Садоян Рубен

<% ASP на блюдечке %>. Часть 2. ActiveX-компоненты и ASP - В первой статье серии "<% ASP на блюдечке %>" ("<% ASP на блюдечке %>. Часть 1. Построение интерфейса к базе данных") мы ознакомились с ASP, а также с принципами построения с его помощью простейшего интерфейса к базе данных (газетный сайт со встроенными возможностями его пополнения новыми статьями, снабжаемыми фотографиями непосредственно с самого сайта и без программирования). Теперь я предложу читателям обогатить этот интерфейс возможностями загрузки (upload) HTML-статьи и иллюстрации к ней непосредственно с сайта (то есть с HTML-формы), ведения автоматической статистики посещений, организации показа баннеров, а также методами использования и азами разработки Активных Серверных Компонентов (Active Server Components) для ASP. Статья будет весьма полезна начинающим Web-программистам, профессионалам же достаточно беглого взгляда, чтобы понять принципы и вникнуть в детали работы активных серверных страниц – ASP.

Дата: 19.04.2002 06:34 | Раздел: Статьи по VB | Автор: Садоян Рубен

<% ASP на блюдечке %> Часть 1. Построение интерфейса к базе данных> - Еще совсем недавно, когда Интернет являл собой лишь роскошь для избранных, профессия разработчика интерактивных Web-приложений была сродни профессии шофера в начале XX века или космонавта — в середине века. Как и в большинстве профессий, поначалу был просто врач, просто инженер, просто разработчик гипертекстовых страниц. В настоящее время уже довольно сложно разобраться во всевозможных профессиях, связанных с Интернетом, и инструментах для решения самых различных Интернет-задач. Давайте попробуем разобраться в этом пестром мире средств, служащих в конечном счете для нас с вами — читателей занимательных, ярких и разнообразных страниц всемирной компьютерной сети, и рассмотрим одно из них — ASP.

Дата: 17.04.2002 10:07 | Раздел: Примеры кода | Автор: Lessard Yves

SkinProject - Еще шкурки. На этот раз могу с уверенностью сказать, что этот пример лучший! Все сделано на высочайшем уровне. "Обтягивается" кожей все элементы формы, включая меню. В общем, вы пожелеете, если пропустите этот пример.

Дата: 17.04.2002 04:21 | Раздел: Статьи по VB | Автор: Смирнов Алексей

25 советов по оптимизации ASP-приложений - Данные советы вводят в проблему повышения производительности работы приложений, использующих технологии Microsoft Active Server Pages (ASP) и Visual Basic Scripting Edition (VBScript). Большинство из них были многократно обсуждены и c успехом проверены на практике и будут интересны как новичкам в программировании ASP и VBScript, так и тем, кто уже имеет опыт работы с этими технологиями.

Дата: 16.04.2002 12:09 | Раздел: ActiveX контролы | Автор: Борзенков Дмитрий

FreeButton - Контрол имитатор кнопки любой мыслимой формы. Единственное ограничение: только ваша фантазия. Использует растровые изображения как шаблон для контуров... Пример использования здесь же.

Дата: 15.04.2002 21:04 | Раздел: Примеры кода | Автор: Palladino Chris

SkinPadPlus - Skin-ы это самое модное направление на сегодняшний день. Этот пример - один из немногих, выполненных профессионалом. Если вам нужны шкурки, то обязательно посмотрите.

Дата: 15.04.2002 08:11 | Раздел: ActiveX контролы | Автор: Teh Ming Han

WindowsXPControls - Проект, которого ждали! Это сборник контролов (с исходниками) на тему Windows XP. Ваша программа будет выглядеть на все 100% и в Win 9x! Проект включает в себя семь нужных контролов: от кнопок до чекбоксов. Если Вы пропустите этот проект, то нет Вам прощения!

Последние 20 тем форума на VBNet.Ru:

11:58 / 21 апр.  Проблемма при работе с DataControl |  Ответов: 0
01:08 / 21 апр.  API помогите с константами |  Ответов: 0
00:42 / 21 апр.  Сохранение в gif |  Ответов: 0
22:10 / 20 апр.  Регистр EAX |  Ответов: 0
20:57 / 20 апр.  Эскпорт из DataGrid в Excel |  Ответов: 0
10:33 / 20 апр.  Выделение маркером!!! |  Ответов: 0
02:38 / 20 апр.  Я новичок в VB. С чего начать? |  Ответов: 1
21:37 / 19 апр.  WIN -> DOS -??? |  Ответов: 1
21:06 / 19 апр.  HTML броузер |  Ответов: 1
20:29 / 19 апр.  Как читать до первого пробела? |  Ответов: 1
20:17 / 19 апр.  Как сделать аналог командной строки? |  Ответов: 1
20:15 / 19 апр.  Как удалить папку со всеми файлами |  Ответов: 1
12:26 / 19 апр.  Передача катринки по сети |  Ответов: 0
08:25 / 19 апр.  Работа с кнопками Toolbar |  Ответов: 1
23:30 / 18 апр.  Где найти TrueDBGrid? |  Ответов: 0
20:51 / 18 апр.  Как получить код возврата из файла exe |  Ответов: 1
20:23 / 18 апр.  Убрать прогу из панели инструментов! |  Ответов: 1
17:05 / 18 апр.  Шрифты в WinNTWst 4.0 |  Ответов: 0
13:58 / 18 апр.  Можно ли запустить новый поток под VB |  Ответов: 2
13:54 / 18 апр.  Адрес пароля в Award BIOS v4.51PG |  Ответов: 1

Последние поступления в Библиотеку кодов:

Нет новых кодов.

наверх

Новости сайта VBMania

15.04 - В связи с резким увеличением числа вопросов, поступающих на e-mail администрации сайта, было решено не дожидаться открытия форума, и начать отвечать на вопросы прямо на главной странице. Обсуждению последней новости ответы на вопросы не помешают. Вашего совета ждут, на ваш вопрос ответят.
25.01 - Сегодня открылся новый раздел, в котором вы можете найти ссылки на целую кучу книг по тематике VB и около него.
22.01 - 22 января вышел второй номер он-лайн журнала о Visual Basic 'VB Мания'. В нем можно почитать авторские статьи в уже устоявшихся разделах: Технологии, Система, Графика, Профессия, Человечество и Юмор. Так же не обошлось без новшеств: появился новый раздел dotNET и особенно рецензии ActiveX-компонентов. Обязательно заходите.
17.12 - В связи с тем что форум не горел желаением вести себя так, как должен обычный, порядочный форум, мы его прикрыли для проведения разъяснительных мероприятий. Надеемся, что они не затянутся и форум образумится.
06.12 - С сегодняшнего дня все желающие могут добавлять свои новости и статьи в наши архивы.
Да здраствует открытость!
27.11 - Наконец-то, после долгих дней и бессонных ночей это свершилось! Сайт объявляется открытым! Непременно прочитайте первый номер нашего журнала. Оцените наши дополнительные проекты. И конечно мы ждем ваших откликов в гостевой книге и по почте.
01.12 - Произошло несколько косметических улучшений, касающихся исключительно удобства работы с сайтом. Во-первых, можно видеть количество записей обсуждения новостей на главной странице; а во-вторых чуточку подправились директории.
Оценяйте!

наверх

Новости сайта Азбука VB

10 апреля 2001 года
Создание простого аналога к ListView на примере Mp3 проводника!. Пример создания листа + слайдера + применение как браузера.
Создание прогрессбара. Еще один оригинальный вариан создания своего прогрессбара.
Сохранения данных с рабочего листа Excel в Dbase таблицу. В связи с тем, что dbase формат до сих пор очень сильно распространен, очень часто возникает необходимость сохранения данных с рабочего листа Excel в Dbase таблицу.
Разборка форматированного текста состояшего из шести значений разделённых символом ";". Пример разборки форматированного текста состояшего из шести значений разделённых символом ";" с последуюшеё записью каждого значения в свою ячейку. Макрос также обрабатывает все непустые ячеки столбца.
Плагины! Создание и работа с ними. На примерах показано, как создавать плагины и как с ними можно работать.
Проверка на слэш (способ 2). Как избежать ошибки при обращении к файлу? Иногда нужно обратиться к файлу, используя три объекта: Drive (Диск), Dir (Каталоги) и File (Файлы). Drive.Drive возвращает значение равное "?:\", где ? - буква диска. Dir.Path возвращает значение равное "?:\?", где в первом случае ? - буква диска, а во втором - каталог. File.Filename же возвращает имя файла. Если нужно открыть файл на корневом каталоге (?:\), то делается это следующим образом:
'Справочники Советов' - Пять справочников !!!. Здесь собраны и скомпилированы в Help-файлы - "Советы тем, кто программирует на VB" А. Колесова и О. Павловой. Советы разбиты на 5 файлов (по 100 штук в каждом). Советы начинаются с № 1 (еще по VB3 - 1996 г.) по 2001 год включительно, в связи с переходом на работу в другой журнал, у последних советов появился новый соавтор Малинин. В 5-й файл добавлена статья Колесова (с советами) по работе с API-функциями.

наверх

Доска объявлений

Ищу телеработу.

Переводы: английский, украинский, русский.
Cipper программист.
Assembler программист.
PIC разработчик
композитор
Прогрессивные стили
3D анимация
GIF анимация

Антон Лозовский.

наверх

Мои программы

BalloonMessage for MS Agent

BalloonMessage for Microsoft Agent реализует диалог программы с пользователем, используя при этом технологию Microsoft Agent. OCX реализует три типа диалоговых окон: InputBox, MsgBox и MsgLabels.

Автор: Шатрыкин Иван. Соавтор: Павел Сурменок.

Подробнее...

наверх

Вопрос/Ответ

Здесь Вы можете задать вопрос, или ответить на уже имеющиеся вопросы.

Вопросы:

Нет вопросов.

Ответы:

Вопрос:

   После изменения данных в ADO, подключенного к базе данных в Access, и update'a как определить, произошла ли физическая запись данных на диск? Проблема в том, что если тут же использовать такой же запрос из другого ADO, то приходят старые данные. А обновленные - со значительной задержкой по времени. Кто-нибудь сталкивался с такой проблемой?

Ответ:

Автор ответа: Ted

Я, к примеру, всегда делаю так:

Dim recAdd As New ADODB.Recordset

Private Sub AddNew()
     'на всякий случай ;)
     If recAdd.State = adStateOpen Then recAdd.Close
     With recAdd
         .ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;_
         Data Source=" & App.Path & "\Data\basa.mdb;Persist _
         Security Info=False"
         .Source = strSQL 'здесь содержится SQL-запрос
         .CursorLocation = adUseClient
         .CursorType = adOpenDynamic
         .LockType = adLockOptimistic
         .Open
         .AddNew
         .Fields("Поле1") = Text1.Text
         ... 'и т.д.
         .Update
         .Requery
         .Close
     End With

Теперь поясню. Самое странное, что после того как сделаешь Update и только Update, а затем с полным сознанием выполненного долга начинаешь обращаться к базе из других процедур, то вдруг видишь что только что сохраненных данных нет... Но если произведешь перезапуск программы целиком, то все оказывается на месте (включая твои данные ;)). Оказывается ADO после команды Update понимает что данные сохранены, но не считает себя обязанным скидывать эти самые данные из памяти на диск, а потому-то этих данных не видно. А вот если после команды Update произвести обновление данных (Requery) и заново обратиться к базе, то все будет Ок. Что и продемонстрировано выше :)

Вопрос:

Слушайте, а как может программа, написанная в Visual Basic узнать подключены ли мы сейчас к Internet и разорвать подключение, когда уже истекло время.

Ответ:

Автор ответа: Ted

Смотри http://www.vbip.com Там можно найти что-нить по этому поводу

Вопрос:

   Так я яаписываю в INI-файл

Dim Path As String
Path = App.Path & "\config.ini"
p = WritePrivateProfileString("www", "w1", "30", Path)

Все работает

А этим кодом я пытаюсь считать от туда данные, но нечего не выходит. Кто яанет почему ?

Dim Path As String
Path = App.Path & "\config.ini"
p = GetPrivateProfileString("www", "w1", "", "", 300, Path)

Ответ:

Автор ответа: Him

Ниже приведен код формы...
Option Explicit

Private Declare Function GetPrivateProfileString Lib "kernel32" _
     Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, _
     ByVal lpKeyName As Any, ByVal lpDefault As String, _
     ByVal lpReturnedString As String, ByVal nSize As Long, _
     ByVal lpFileName As String) As Long
Private Declare Function WritePrivateProfileString Lib "kernel32" _
     Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, _
     ByVal lpKeyName As Any, ByVal lpString As Any, _
     ByVal lpFileName As String) As Long
Private Path As String

Public Sub WriteString()
     Dim P As Long
     P = WritePrivateProfileString("www", "w1", "30", Path)
End Sub

Public Function ReadPrivateString() As String
     Dim N As Long ' длина возвращаемой строки
     Dim Word As String * 80 ' буфер для возвращаемой строки на 80 знаков
     Path = App.Path & "\config.ini"
     ' функция GetPrivateProfileString возвращает длину строки
     N = GetPrivateProfileString("www", "w1", "", Word, 80, Path)
     If N > 0 Then
         ReadPrivateString = Left(Word, N)
     Else
         ReadPrivateString = ""
     End If
End Function

Private Sub Form_Load()
     Me.AutoRedraw = True
     Path = App.Path & "\config.ini"
     WriteString
     Me.Print ReadPrivateString
End Sub

Вопрос:

   Так я яаписываю в INI-файл

Dim Path As String
Path = App.Path & "\config.ini"
p = WritePrivateProfileString("www", "w1", "30", Path)

Все работает

А этим кодом я пытаюсь считать от туда данные, но нечего не выходит. Кто яанет почему ?

Dim Path As String
Path = App.Path & "\config.ini"
p = GetPrivateProfileString("www", "w1", "", "", 300, Path)

Ответ:

Автор ответа: SC

p = GetPrivateProfileString("www", "w1", "", "", 300, Path)

У тебя ошибка на 3 значении (lpReturnedString). Там не пустые ковычки должны быть, а переменная в которую функция вернет полученное значение.

Объяви ещё одну переменную типа:
Dim szReturnedString As String * 300 'Объявляем переменную с длинной равной 300 байт
Получаем вырожение следующего вида:

Dim Path As String
Dim szReturnedString As String * 300

Path = App.Path & "\config.ini"
p = GetPrivateProfileString("www", "w1", szReturnedString, "", 300, Path)

После того как функция вернула какое-либо значение, твоей переменной p присваивается значение равное количеству символов в этом значении. Т.е. получил строку: "Тест", р = 4. Но так как переменная szReturnedString имеет длину 300 байт, то результат будет выглядеть так: "Тест|||||||||||||||||||||....." до 300. Чтобы избавиться от такого результата используй:

szReturnedString=Left(szReturnedString, p)
Всё теперь переменная будет содержать необходимый результат ("Тест").

Вопрос:

Как программно очистить корзину?

Ответ:

Автор ответа: Igoryk

Ответ на этот вопрос можно найти по адресу http://www.igoryksoft.narod.ru/vb/vbfile/vbfile5.htm

Вопрос:

Здравствуйте, подскажите пожалуйста, как удалить директорию (п-р: C:/Мои документы/Папка) из Excele?

Ответ:

Автор ответа: Duke

Ну помоему никак. Ну вообще сначала нада убить файлы а затем папку, кстати путь к файлу на винте пишется не C:/My document/Patch а C:\My document\Patch слэши или как их там называют в другую сторону.
Теперь серьезно
1.надо в VB в Exel'е зайти
2.Создать форму
3.создать на ней кнопку
4.Кликнуть на ней 2 раза
5. Написать следующий техт
RmDir "C:\Мои документы\Папка"
убьется "ПАПКА" если в ней нет файлов то сработает. А если есть только файлы то можно
kill "C:\Мои документы\Папка\*.*"
и они исчезнут а затем пункт 5
Если интересно мыль.

Вопрос:

   подскажите , как подключить поле Базы Acsess тип поля OLE с объектом OLE в форме? (можно ли использовать word и html одновременно)

Ответ:

Автор ответа: Ревягин_Алексей

   Размести на форме 2 OLE-объекта(в первом (OLE1) не помещай никакого объекта, а во втором (OLE2) объект MSWord), пять кнопок (Первая (cmdNew) будет создавать БД с полем типа OLE, вторая (command1) - переносить данные из OLE2 в OLE1, третья (command2(0)) - "добавить новою запись", четвёртая (command2(1)) - "Сохранить изменения"), пятая (command2(2)) - "Удалить запись" и, для удобства, стандартный объект VB6 - Data (пусть имя остаётся по-умолчанию - "Data1") Далее не забудь указать в Project->References ссылку на Microsoft DAO 2.5/3.5 Compatibility Library

   теперь впиши код в форму:

Private Sub cmdNew_Click()
Dim NewDB As Database
Dim NewWs As Workspace
Dim NewTbl As TableDef
Dim F1 As DAO.Field

     Set NewWs = DBEngine.Workspaces(0)
     Set NewDB = NewWs.CreateDatabase("ПУТЬ_К_БАЗЕ_ДАННЫХ", dbLangGeneral)
     Set NewTbl = NewDB.CreateTableDef("QWERTY")
     Set F1 = NewTbl.CreateField("ASD", dbLongBinary) 'OLE-объект
     NewTbl.Fields.Append F1
     Set F1 = Nothing 'освобождаем память
     NewDB.TableDefs.Append NewTbl
     NewDB.Close
     NewWs.Close
     Set NewDB = Nothing 'освобождаем память
     Set NewWs = Nothing 'освобождаем память
     Set NewTbl = Nothing 'освобождаем память

     Data1.DatabaseName = "ПУТЬ_К_БАЗЕ_ДАННЫХ"
     Data1.Connect = dbLangGeneral
     Data1.RecordSource = "QWERTY"
     Data1.Refresh
     Data1.Recordset.AddNew
     ' в результате у тебя будет создана БД с таблицей QWERTY и полем _
     с типом данных OLE - ASD

end sub

Private sub command2_click(index as integer)
Select Case Index
Case 0
     Data1.Recordset.AddNew
Case 1
     Data1.UpdateRecord
     Data1.Recordset.Bookmark = Data1.Recordset.LastModified
Case 2
     With Data1.Recordset
         .Delete
         .MoveNext
         If .EOF Then .MoveLast
     End With
End Select
end sub

Private Sub Data1_Reposition()
data1.Caption = "Запись № " & Data1.Recordset.AbsolutePosition + 1
End Sub

Private sub command1_click()
     OLE2.Copy
     OLE1.Paste
     Clipboard.Clear
end sub

Ну вот и всё.
Почему через буфер? - Да потому, что напрямую писать в пустом OLE-объекте, связанным с БД у меня не получилось (причина, думаю в том, что когда в БД создаётся объект (при создании БД), то ему ни присваивается ни MSWord, ни MSExcel и т.д.)

Вот ещё это не забудь к OLE1 добвить:
   в Properties->DataSource - Data1
   в Properties->DataField - QWERTY

Данный вариант самый простой, можешь ещё использовать CommonDialog и другие навороты! (тут уж фантазируй сам)

Можете заполнить эту форму, либо отослать вопрос СЮДА

Форма для добавления нового вопроса в этот раздел. Информация отсылается по E-mail владельцу сайта.
наверх

Visual Basic: новости сайтов, советы, примеры кодов.
Выпуск 50.

Visual Basic 6. Мастер. Руководство для профессионалов

Visual Basic 6. Специальный справочник

Visual Basic 6.0 for application

Win32 API и Visual Basic. / Для профессионалов /

Азбука программирования в Windows 32 API

Использование Visual Basic 6. Специальное издание

Обработка баз данных на Visual Basic 6 + CD

Выпуск подготовили:

Visual Basic: новости сайтов, советы, примеры кодов. Выпуск 50.

Visual Basic 6. Мастер. Руководство для профессионалов

Visual Basic 6. Специальный справочник

Visual Basic 6.0 for application

Win32 API и Visual Basic. / Для профессионалов /

Азбука программирования в Windows 32 API

Использование Visual Basic 6. Специальное издание

Обработка баз данных на Visual Basic 6 + CD

Выпуск подготовили:

Visual Basic: новости сайтов, советы, примеры кодов.
Выпуск 50.