㈠ 如何建立mdb数据库
新建表:首先打开或新建一个数据库,在该数据库上使用CDaoTableDef的构赵函数定义一个对象,在调用Create函数建新表,之后调用Append函数加入数据库:
sql">voidChangeUserPassword()
{
CStringstrSystemDB=
_T("路径");
SetSystemDB(strSystemDB);
//
//byusingMicrosoftAccess
CStringstrUserName=_T("NewUser");
CStringstrOldPassword=_T("Password");
CStringstrNewPassword=_T("NewPassword");
SetDefaultUser(strUserName,strOldPassword);
ChangePassword(strUserName,strOldPassword,
strNewPassword);
}
//设置默认用户和密码
voidSetDefaultUser(CString&strUserName,CString&strPassword)
{
COleVariantvarUserName(strUserName,VT_BSTRT);
COleVariantvarPassword(strPassword,VT_BSTRT);
DAODBEngine*pDBEngine=AfxDaoGetEngine();
ASSERT(pDBEngine!=NULL);
//设置默认用户
DAO_CHECK(pDBEngine->put_DefaultUser(varUserName.bstrVal));
//设置默认密码
DAO_CHECK(pDBEngine->put_DefaultPassword(varPassword.bstrVal));
}
///更改密码
voidSetDBPassword(LPCTSTRpDB,LPCTSTRpszOldPassword,LPCTSTRpszNewPassword)
{
CDaoDatabasedb;
CStringstrConnect(_T(";pwd="));
//数据库必须打开
//设置密码
db.Open(pDB,TRUE,FALSE,
strConnect+pszOldPassword);
COleVariantNewPassword(pszNewPassword,VT_BSTRT),
OldPassword(pszOldPassword,VT_BSTRT);
DAO_CHECK(db.m_pDAODatabase->NewPassword(V_BSTR(&OldPassword),
V_BSTR(&NewPassword)));
db.Close();
}
㈡ 数据库报表怎么做
数据库报表就是通过对原始数据的分析整合,将结果(表现表式为文字\表格\图形等)反馈给企业客户的一种形式.
是一种可以直接连接数据库,对数据库中的数据进行读取、汇总计算,形成电子报表。
这种报表因为能够实时读取数据库,所以每次运行看到的都是最新的统计报表。
一般由各种单据提供原始数据,由存储过程(或查询语句)通过分析整合形成数据结果,再经由程序的设置将数据经果转化成多种形式呈现(表格\文字\图表).
㈢ 用vb.net 怎样建立一个mdb数据库及一张表
首先在项目的VB.NET界面,使用菜单【项目】--【添加引用】--【COM】
选择 Microsoft ADO Ext. 2.x for DDL and Security
然后单击【确定】,完成引用。
完整代码如下:
ImportsADOX
PublicClassForm1
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
'创建空的access数据库文件--数据库文件.mdb,密码为123
DimMycatAsCatalog=NewCatalog()
Mycat.Create("Provider=Microsoft.Jet.OLEDB.4.0;JetOLEDB:EngineType=5;DataSource=数据库文件.mdb;JetOLEDB:DatabasePassword=123")
'以下代码创建一个名为“实验数据表”
DimMyTableAsADOX.Table=NewADOX.Table'定义新表
MyTable.Name="实验数据表"'表命名
'给表“实验数据表”创建一个字符串字段,字段名“姓名”
MyTable.Columns.Append("姓名",,ADOX.DataTypeEnum.adWChar)
'给表“实验数据表”创建一个整数字段,字段名“学号”
MyTable.Columns.Append("学号",ADOX.DataTypeEnum.adInteger)'追加一个数字型字段
'给字段“学号”创建一个主键“PimaryKey_Field”
MyTable.Keys.Append("学号",ADOX.KeyTypeEnum.adKeyPrimary,"学号")
Mycat.Tables.Append(MyTable)'把所有的新字段追加到表
MyTable=Nothing
Mycat=Nothing
EndSub
EndClass
㈣ 如何用程序创建access 的mdb数据库和表
创建生成表查询时,请指定:
新数据库表(目标表)的名称。
要从中复制行的一个或多个表(源表)。可以从单个表或联接表中进行复制。
要复制其内容的源表中的列。
排序次序(如果想以特定的次序复制行)。
定义要复制行的搜索条件。
“分组依据”选项(如果仅想复制汇总信息)。
例如,下列查询将创建称为 uk_customers 的新表并将信息从 customers 表复制到其中:
SELECT *
INTO uk_customers
FROM customers
WHERE country = 'UK '
为成功使用生成表查询,必须拥有在目标数据库中创建表的权限。