안녕하세요.
정말 도저히 안 되는게 있어서 이렇게 올립니다.
delphi5.0과 DB는 Access를 사용합니다.
odbc를 자동으로 셋팅되게 하려고 하는데요..
이곳 올라온 글들을 참고하여 아래 보시는 것처럼
코딩을 해봤습니다.
근데.. 만들라고 했던 알리어스 이름은 생성이 되는데..
모든게 정상인데..
제어판 odbc 있죠.. 거기서 금방 만들었던 test를 클릭하면
" 설치 루틴이 없으니 드라이버를 다시 설치하라는 거예요.."
정말 답답합니다..
아시는 분 좀 알려 주세요..
MyReg := TRegistry.Create;
with MyReg do begin
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey('SOFTWAREODBCODBC.INIODBC Data Sources', false) then
WriteString('test','Microsoft Access Dirver (*.mdb)');
if OpenKey('SOFTWAREODBCODBC.INI'+ 'test', true) then begin
WriteString('DBQ','C:test.mdb');
WriteString('Driver', 'C:WINNTSystem32odbcjt32.dll');
WriteInteger('DriverId', 00000025);
WriteString('FIL', 'MS Access;');
WriteInteger('Saft Transactions', 00000000);
WriteString('UID', '');
end;
if OpenKey('SOFTWAREODBCODBC.INItestEnginesJet', true) then begin
WriteString('ImplicitCommitSync','');
WriteInteger('MaxBufferSize', 00002048);
WriteInteger('PageTimeout', 00000005);
WriteInteger('Threads', 00000003);
WriteString('UserCommitSync','Yes');
end;
end;
부탁 드립니다..
그럼 이만..