Código Delphi [-] if not SQLConfigDataSource(0, 1{ODBC_ADD_DSN}, 'Microsoft Access Driver (*.mdb)', 'DSN=MyDSN'#0'DBQ=c:\basesita.mdb'#0{'UID='#0'PWD=HAClave'#0}) then MessageBox(Handle, 'DSN creation error.', nil, MB_ICONERROR);
if not SQLConfigDataSource(0, 1{ODBC_ADD_DSN}, 'Microsoft Access Driver (*.mdb)', 'DSN=MyDSN'#0'DBQ=c:\basesita.mdb'#0{'UID='#0'PWD=HAClave'#0}) then MessageBox(Handle, 'DSN creation error.', nil, MB_ICONERROR);