ODBC

← →
skirdov © (2003-02-06 20:47) [0]

Добрый вечер, мастера.

Необходимо соединиться с БД Access. Для этого вручную нужно настроить драйвер ODBC, где жестко прописать путь к БД и т.д. А как программно добраться до этого ODBC, потому что не каждый пользователь знает о его существовании и тем более умеет его настраивть? Если как-то это можно сделать, то хотелось бы увидеть пример...
Спасибо.

← →
sniknik © (2003-02-06 21:13) [1]

проще взять ADO и писать в строке драйвер напрямую, хоть драйвер из того же ODBC.

можно и алиас програмно настроить, (на работе есть пример для MySql), но и с Access не проблема, настраивай руками, потом лезь в реестр и смотри что записалось, остается повторить. Или сделай файловый будеш поставлять файл с программой, при установке переписать его в калог ODBC.

ну и правильный путь, инсталятор для проги.
любой (по моему) сборщик инсталяхи позволяет копировать ODBC алиасы с твоей машины на ту куда инсталится программа.

← →
DN © (2003-02-07 10:20) [2]

В дополнение к sniknik © (06.02.03 21:13)
строка подключения задается в свойстве ConnectionString, например:

Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DRIVER={Microsoft Paradox Driver (*.db )}; DBQ=D:\;DefaultDir=D:\База данных\;DriverId=282;FIL=Paradox 5.X;MaxBufferSize=2048;PageTimeout=5;"

← →
Stas © (2003-02-07 10:25) [3]

Сделай *.udl файл.

как бы обещаный пример для MySql (вырезан с этого же форума, сохранен ради интереса не опробовал), переделывай + BDE алиас его тоже надо настроить, а заодно сравни насколько с ADO проще (весь код в строке, приведен DN © (07.02.03 10:20))

так писал автор

gvb (28.11.02 10:46)
Иногда хочется установить все примочки для БД не инсталлятором, а прямо на лету.
Вот кусок из хелпа по MySQL, который показывает, чего куда нужно писать. Access - такое-же подключение через ODBC, так что все по аналогии.
(как сказал sniknik © Access есть по умолчанию, как сказала Lola © файлы нужно переписать)
**** Начало цитаты ****
Delphi
Also, here is some potentially useful Delphi code that sets up both an ODBC entry and a BDE entry for MyODBC (the BDE entry requires a BDE Alias Editor that is free at a Delphi Super Page near you. (Thanks to Bryan Brunton bryan@flesherfab.com for this):
fReg:= TRegistry.Create; fReg.OpenKey("\Software\ODBC\ODBC.INI\DocumentsFab", True); fReg.WriteString("Database", "Documents"); fReg.WriteString("Description", " "); fReg.WriteString("Driver", "C:\WINNT\System32\myodbc.dll"); fReg.WriteString("Flag", "1"); fReg.WriteString("Password", ""); fReg.WriteString("Port", " "); fReg.WriteString("Server", "xmark"); fReg.WriteString("User", "winuser"); fReg.OpenKey("\Software\ODBC\ODBC.INI\ODBC Data Sources", True); fReg.WriteString("DocumentsFab", "MySQL"); fReg.CloseKey; fReg.Free; Memo1.Lines.Add("DATABASE NAME="); Memo1.Lines.Add("USER NAME="); Memo1.Lines.Add("ODBC DSN=DocumentsFab"); Memo1.Lines.Add("OPEN MODE=READ/WRITE"); Memo1.Lines.Add("BATCH COUNT=200"); Memo1.Lines.Add("LANGDRIVER="); Memo1.Lines.Add("MAX ROWS=-1"); Memo1.Lines.Add("SCHEMA CACHE DIR="); Memo1.Lines.Add("SCHEMA CACHE SIZE=8"); Memo1.Lines.Add("SCHEMA CACHE TIME=-1"); Memo1.Lines.Add("SQLPASSTHRU MODE=SHARED AUTOCOMMIT"); Memo1.Lines.Add("SQLQRYMODE="); Memo1.Lines.Add("ENABLE SCHEMA CACHE=FALSE"); Memo1.Lines.Add("ENABLE BCD=FALSE"); Memo1.Lines.Add("ROWSET SIZE=20"); Memo1.Lines.Add("BLOBS TO CACHE=64"); Memo1.Lines.Add("BLOB SIZE=32"); AliasEditor.Add("DocumentsFab","MySQL",Memo1.Lines);

ODBC Найти похожие ветки