本项目下载地址http://cid-4b517bbe6c0b58a0./self.aspx/.Public/cnblogsCsharp/CreateAccess.rar
1.C#动态创建Access库需要在项目的解决方案中添加Microsoft
ActiveXData Objects
2.8Library和
MicrosoftADO Ext.2.8 for
DDLand 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();