本项目下载地址http://cid-4b517bbe6c0b58a0.office.live.com/self.aspx/.Public/cnblogsCsharp/CreateAccess.rar
1.C#动态创建Access库需要在项目的解决方案中添加Microsoft
ActiveX Data Objects
2.8 Library 和
Microsoft ADO Ext. 2.8 for
DDL and Security这二个引用
2.需要加入的USING 代码
using
System.IO; using
System.Data.OleDb; //连接Access数据库 using
ADOX; //引用COM:Microsoft ADO Ext. 2.8 for DDL and
Security //添加引用:Microsoft ActioveX Data Objects 2.8 Library
3.创建数据库函数
public void
creatDatabase(string fileName)
{
//if(创建无密码数据库){
string conn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +
fileName;
//}else if(要加密码){
//string conn = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" +
fileName + ";Jet OLEDB:Database Password=" + Pwd + ";Jet
OLEDB:Engine Type=5";
//}
ADOX.Catalog catalog = new ADOX.Catalog();
try
{
catalog.Create(conn);
}
catch
{ }
//连接数据库
ADODB.Connection cn = new ADODB.Connection();
cn.Open(conn, null, null, -1);
catalog.ActiveConnection = cn;
//建立新表
ADOX.Table table = new ADOX.Table();
table.Name = "AdPlayList";
ADOX.Column column = new ADOX.Column();
column.ParentCatalog = catalog;
column.Type = ADOX.DataTypeEnum.adInteger;
column.Name = "ID";
column.DefinedSize = 9;
column.Properties["AutoIncrement"].Value = true;
table.Columns.Append(column, ADOX.DataTypeEnum.adInteger, 0);
//设置主键
//table.Keys.Append("", ADOX.KeyTypeEnum.adKeyPrimary, "ID", "",
"");//现异常现在还没有搞明这是为什么
table.Columns.Append("FileName", DataTypeEnum.adVarWChar,
50);
table.Columns.Append("FileDate", DataTypeEnum.adDate, 0);
table.Columns.Append("FileSize", DataTypeEnum.adInteger, 9);
table.Columns.Append("OrderID", DataTypeEnum.adInteger, 9);
table.Columns.Append("Sha1", DataTypeEnum.adVarWChar, 50);
try
{
catalog.Tables.Append(table);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
//此处一定要关闭连接,否则添加数据时候会出错
table = null;
catalog = null;
Application.DoEvents();
cn.Close(); }
备注:
创建加密码数据库
创建加密数据库的时候可把我难住了,因为在Access中加密码的时候是以独占方式打开,然后加密码。所以总是想创建完数据库以后再加密,试了试没有成功,最后转变一下思想,在生成的时候加密码怎么样,一试果然成功了。(见上面代码的备注)
更改数据库密码:
SQL更改数据库密码的语句是:ALTER DATABASE
PASSWORD [NewPassword] [OldPassword]
用OleDbConnection打开数据库执行此SQL语句根本不行,所以我就用ADODB打开数据库执行,但是报以下错误:
给Access添加密码的时候会要求以“是以独占方式打开”,所以要设置打开的模式,详细说明如下:
ADO ConnectModeEnum含义
设置或返回以下某个 ConnectModeEnum 的值。
常量 说明 AdModeUnknown 默认值。表明权限尚未设置或无法确定。 AdModeRead 表明权限为只读。 AdModeWrite 表明权限为只写。 AdModeReadWrite 表明权限为读/写。 AdModeShareDenyRead 防止其他用户使用读权限打开连接。 AdModeShareDenyWrite 防止其他用户使用写权限打开连接。 AdModeShareExclusive 防止其他用户打开连接。 AdModeShareDenyNone 防止其他用户使用任何权限打开连接。
更改数据库代码如下:
string conn =
"Provider=Microsoft.Jet.Oledb.4.0;Data Source=" + fileName + ";Jet
OLEDB:Database Password=" + Pwd ;
string sql="ALTER DATABASE PASSWORD "+newpwd+" "+openpwd;
ADOBD.Connection cn=new ADODB.Connection();
cn.Mode=ADODB.ConnectModeEnum.adModeShareExclusive;
cn.Open(conn,null,null,-1);
//执行SQL改变密码;
object num;
cn.Execute(sql,out num,-1);
cn.Close();