Доступ к базе данных Access из VB
Формулировка задачи:
Привет ребята! Голову сломал уже,не соображу где ошибки.
Мне нужно выполнить поиск по Базе данных.
вот я так пишу
Я прикрутил парочку ОпшенБатон ,но они свою функцию не выполняют.Мне нужно чтобы в полях текст на форме клиенты появлялись данные.
Вложил маленькую бд свою и проект ,который мучаю.
Кто что-нибудь подскажет буду очень рад!
Решение задачи: «Доступ к базе данных Access из VB»
textual
Листинг программы
Public Sub OpenDB() Set conn = Nothing Set conn = New ADODB.Connection DSNName = "DRIVER=Microsoft Access Driver (*.mdb, *.accdb);DBQ=" & App.Path DSNName = DSNName & HomeDir & "\ALEKSEI.mdb" conn.Open DSNName If conn.State = 1 Then MsgBox "Соединение установлено" Else MsgBox "Соединение не установлено" End If End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д