| Вопрос: Access | Добавлено: 04.08.08 13:10 |
Автор вопроса:  Иван
|
|
Здравствуйте!
Я пытаюсь программировать базы данных в VB6. С помощью VisData создал файл базы access, в нем одну таблицу, создал форму, подключился к базе, сделал несколько записей. Вопрос: можно ли сделать так чтобы по нажатии кнопки открывалась заполненная таблица, т.е либо сам access или экспорт в excel. Подскажите пожалуйста, если можно пример кода. Спасибо! |
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:  Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | | #1 | Добавлено: 04.08.08 16:03 |
|
API ShellExecute
Вот тебе пример из API-Guide: 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) As Long
Const SW_SHOWNORMAL = 1 Private Sub Form_Load() 'KPD-Team 1998 'URL: http://www.allapi.net/ 'E-Mail: KPDTeam@Allapi.net 'Send an E-Mail to the KPD-Team ShellExecute Me.hwnd, vbNullString, "mailto:KPDTeam@Allapi.net", vbNullString, "C:\", SW_SHOWNORMAL End Sub Вместо "mailto:KPDTeam@Allapi.net" указываешь свою базу. |
||
|
Номер ответа: 2 Автор ответа: Иван Вопросов: 14 Ответов: 16 |
Профиль | | #2 | Добавлено: 04.08.08 17:25 |
| Извените, Arseny, за бестактность, но все же, что выполняет данный код? | ||
|
Номер ответа: 3 Автор ответа: ArsenyICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | | #3 | Добавлено: 05.08.08 08:41 |
|
именно данный - запускает почтового клиента по умолчанию с указанием адреса - "mailto:KPDTeam@Allapi.net"
если ты заменишь "mailto:KPDTeam@Allapi.net" на, скажем, "С:\baza.mdb" - откроется эта база в редакторе баз аксесса по умолчанию... |
||
|
Номер ответа: 4 Автор ответа: ИванВопросов: 14 Ответов: 16 |
Профиль | | #4 | Добавлено: 05.08.08 13:10 |
| Arseny, пожалуйста подскажите, что за ошибка Onlu comments may appear a fter End Sub? End Function or End Property, что я не так сделал? | ||
|
Номер ответа: 5 Автор ответа: mc-blackICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | | #5 | Добавлено: 27.08.08 11:52 |
| За пределами подпрограмм никакого коде не должно быть в принципе, разрешены только комментарии. | ||
Страница: 1 |