使用C#或者VB.NET读写Access数据库的标题（Caption）代码,CSharp代码库,德仔网

代码语言
代码分类
【CSharp】使用C#或者VB.NET读写Access数据库的标题（Caption）
作者:孟宪会 / 发布于2011/5/3/ 604
如何在使用 C# 或者 VB.NET 读写 Access 数据库的标题信息？Access 数据库的有些信息不能通过 ADO.NET 来读取的，需要使用 DAO 来进行读写，这些属性包括：
Caption
ColumnHidden
ColumnOrder
ColumnWidth
DecimalPlaces
Description
Format
InputMask
<div><span style="color: rgb(128,128,128)">///</span><span style="color: rgb(0,128,0)">需要添加引用 Microsoft DAO 3.6 Object Library
</span><span style="color: rgb(128,128,128)">///</span><span style="color: rgb(0,128,0)">在VS 2008和Access 2003下测试通过</span><span style="color: rgb(128,128,128)">
</span><span style="color: rgb(0,0,255)">const</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">int</span><span style="color: rgb(0,0,0)"> dbUseJet </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(128,0,128)">2</span><span style="color: rgb(0,0,0)">;
</span><span style="color: rgb(0,0,255)">const</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">int</span><span style="color: rgb(0,0,0)"> dbPropNotFound </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(128,0,128)">3270</span><span style="color: rgb(0,0,0)">;
</span><span style="color: rgb(0,0,255)">const</span><span style="color: rgb(0,0,0)"> dao.DataTypeEnum dbText </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> dao.DataTypeEnum.dbText;

String dbName </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(128,0,0)">@"</span><span style="color: rgb(128,0,0)">E:\WebSite1\MengXianhui\db3.mdb</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">;
dao.Workspace DAOWorkspace;
dao.Database DAODatabase;
dao.DBEngine DAODBEngine </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">new</span><span style="color: rgb(0,0,0)"> dao.DBEngine();
</span><span style="color: rgb(0,128,0)">//</span><span style="color: rgb(0,128,0)">创建一个工作区</span><span style="color: rgb(0,128,0)">
</span><span style="color: rgb(0,0,0)">DAOWorkspace </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> DAODBEngine.CreateWorkspace(</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">WorkSpace</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">, </span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">Admin</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">, </span><span style="color: rgb(128,0,0)">""</span><span style="color: rgb(0,0,0)">, dbUseJet);

</span><span style="color: rgb(0,128,0)">//</span><span style="color: rgb(0,128,0)">打开数据库</span><span style="color: rgb(0,128,0)">
</span><span style="color: rgb(0,0,0)">DAODatabase </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> DAOWorkspace.OpenDatabase(dbName, </span><span style="color: rgb(0,0,255)">false</span><span style="color: rgb(0,0,0)">, </span><span style="color: rgb(0,0,255)">false</span><span style="color: rgb(0,0,0)">, </span><span style="color: rgb(0,0,255)">null</span><span style="color: rgb(0,0,0)">);
dao.TableDef DAOTable;
dao.Field DAOField;

</span><span style="color: rgb(0,128,0)">//</span><span style="color: rgb(0,128,0)"> 表对象</span><span style="color: rgb(0,128,0)">
</span><span style="color: rgb(0,0,0)">DAOTable </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> DAODatabase.TableDefs[</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">Table1</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">];
DAOField </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> DAOTable.Fields[</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">BirthDay</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">];

</span><span style="color: rgb(0,128,0)">//</span><span style="color: rgb(0,128,0)">读取 UserName 字段的 &ldquo;标题&rdquo;属性，如果标题没有设置，则会抛出异常。
</span><span style="color: rgb(0,128,0)">//</span><span style="color: rgb(0,128,0)">如果标题不存在，我们就添加一个标题</span><span style="color: rgb(0,128,0)">
</span><span style="color: rgb(0,0,0)">String CaptionText;
</span><span style="color: rgb(0,0,255)">try</span><span style="color: rgb(0,0,0)">
{
CaptionText </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> DAOField.Properties[</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">Caption</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">].Value.ToString();
}
</span><span style="color: rgb(0,0,255)">catch</span><span style="color: rgb(0,0,0)">
{
</span><span style="color: rgb(0,0,255)">if</span><span style="color: rgb(0,0,0)"> (dbPropNotFound </span><span style="color: rgb(0,0,0)">==</span><span style="color: rgb(0,0,0)"> DAODBEngine.Errors[</span><span style="color: rgb(128,0,128)">0</span><span style="color: rgb(0,0,0)">].Number)
{
</span><span style="color: rgb(0,128,0)">//</span><span style="color: rgb(0,128,0)">此时属性不存在，添加一个属性</span><span style="color: rgb(0,128,0)">
</span><span style="color: rgb(0,0,0)">dao.Property dbProperty </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> DAOField.CreateProperty(</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">Caption</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">, dbText, </span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">出生日期字段标题</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">, </span><span style="color: rgb(0,0,255)">false</span><span style="color: rgb(0,0,0)">);
DAOField.Properties.Append(dbProperty);
DAOField.Properties.Refresh();
CaptionText </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> DAOField.Properties[</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">Caption</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">].Value.ToString();
}
</span><span style="color: rgb(0,0,255)">else</span><span style="color: rgb(0,0,0)">
{
CaptionText </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">无此标题，并且未能创建标题。</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">;
}
}
</span><span style="color: rgb(0,0,255)">finally</span><span style="color: rgb(0,0,0)">
{
DAODatabase.Close();
System.Runtime.InteropServices.Marshal.ReleaseComObject(DAOField);
System.Runtime.InteropServices.Marshal.ReleaseComObject(DAOTable);
System.Runtime.InteropServices.Marshal.ReleaseComObject(DAOWorkspace);
System.Runtime.InteropServices.Marshal.ReleaseComObject(DAODBEngine);
System.Runtime.InteropServices.Marshal.ReleaseComObject(DAODatabase);
DAOField </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">null</span><span style="color: rgb(0,0,0)">;
DAOTable </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">null</span><span style="color: rgb(0,0,0)">;
DAOWorkspace </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">null</span><span style="color: rgb(0,0,0)">;
DAOWorkspace </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">null</span><span style="color: rgb(0,0,0)">;
DAODatabase </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">null</span><span style="color: rgb(0,0,0)">;
GC.WaitForPendingFinalizers();
GC.Collect();
}
MessageBox.Show(</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">BirthDay 字段的标题是：</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,0)">+</span><span style="color: rgb(0,0,0)"> CaptionText);</span></div>
试试其它关键字
　读写Access数据库的标题　
同语言下
可能有用的
孟宪会贡献的其它代码(15)