其实在.Net中可以直接通过文件方式访问Access数据库，但是有时候也需要把Access数据库设置成为数据源，供其它程序适用。那么在程序中如何添加Access数据源，则只要去修改注册表，就可以进行添加了。

以下是我封装的一个函数用来创建Access数据源，大致代码如下：

using Microsoft.Win32;

///

/// Create access db source

///

/// DSN name

/// Access db file

/// If added successfully, return true; else return false

private bool CreateDBSource( string strDSN, string strFileName )

{

// get reference to the HKLM registry key...

RegistryKey rkHKLM = Registry.LocalMachine;

RegistryKey rkRun;

string strDriver = "";

// get access driver

try

{

rkRun = rkHKLM.OpenSubKey(

@"SOFTWAREODBCODBCINST.INIMicrosoft Access Driver (*.mdb)",

false );

strDriver = rkRun.GetValue( "Driver" ).ToString();

}

catch

{

// error while opening the subkey...

MessageBox.Show("Unable to open the ODBC subkey!");

// close the HKLM key...

rkHKLM.Close();

return false;

}

// write dsn in data source

try

{

rkRun = rkHKLM.OpenSubKey(@"SoftwareODBCODBC.INIODBC Data Sources", true);

rkRun.SetValue( strDSN, "Microsoft Access Driver (*.mdb)" );

}

catch

{

// error while opening the subkey...

MessageBox.Show( "Unable to open the data source subkey!");

// close the HKLM key...

rkHKLM.Close();

return false;

}

// write dsn detail info

try

{

rkRun = rkHKLM.CreateSubKey(@"SoftwareODBCODBC.INI" + strDSN);

rkRun.SetValue( "DBQ", strFileName );

rkRun.SetValue( "Driver", strDriver );

rkRun.SetValue( "DriverId", 25 );

rkRun.SetValue( "FIL", "Ms Access;" );

rkRun.SetValue( "SafeTransactions", 0 );

}

catch

{

// error while opening the subkey...

MessageBox.Show("Unable to write DSN detail info!");

// close the HKLM key...

rkHKLM.Close();

return false;

}

// write dsn engine info

try

{

rkRun = rkHKLM.CreateSubKey(@"SoftwareODBCODBC.INI"

+ strDSN + @"EnginesJet" ) ;

rkRun.SetValue( "ImplicitCommitSync", "" );

rkRun.SetValue( "MaxBufferSize", 2048 );

rkRun.SetValue( "PageTimeout", 5 );

rkRun.SetValue( "Threads", 3 );

rkRun.SetValue( "UserCommitSync", "Yes" );

rkHKLM.Close();

return true;

}

catch

{

// error while opening the subkey...

MessageBox.Show("Unable to write DSN info!");

// close the HKLM key...

rkHKLM.Close();

return false;

}

}

而具体调用很简单，如：

if( CreateDBSource( "DBNewTest", @"D:DBAccess.mdb" ) )

MessageBox.Show( "Successful!" );

else

MessageBox.Show( "Failed!" );

需要注意的一点是，以上的代码是在xp环境下，如果在别的环境下无法成功的话，那么先查阅，当成功注册一个Access数据库后的注册表的结构，先后根据不同，修改我的CreateDBSource函数即可。