==初学ADO+ACCESS,搞了几天，比较烦燥，那位可以按我的要求，发我一份使用ADO控件的源代码。送分300==
要求使用ACCESS数据库。库中有两个表，表的内容自定。
然后有连接到库的按钮，
向表中插入记录的功能。从表中删除记录的功能。
这一切都必须在一个DBGIRD中显示并操作。
程序越简单越好。只要能显示出ADO的几个控件和一些数据库控件的使用方法即可。
分不多，但对我很有帮助，谢谢。
QQ30002580，也可直接Q我。
问题点数：20、回复次数：13Top
1 楼dreamnyj（梦晰(★★★★★★)特别想当"大猩猩"的三角裤勇士）回复于 2004-05-03 16:17:03 得分 0
帮忙的兄弟，另外开贴送分。
最好使用控件本身的属性或是方法来操纵ACCESS，当然使用简单的SQL语句也可。
谢谢您的关注。Top
2 楼sunliwen780502（孙立文）回复于 2004-05-04 18:22:55 得分 0
哪个地方不明白，尽管说。Top
3 楼huzhangyou（信仰(http://www.libing.net.cn)）回复于 2004-05-04 21:45:08 得分 5
使用ADOConnection的时候
你需要配置一个数据源
然后编辑ConnectionString
Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DBQ=C:\CAXAEBV2\Database\Users.mdb;DefaultDir=C:\CAXAEBV2\Database;Driver={Driver do Microsoft Access (*.mdb)};DriverId=281;FIL=MS Access;FILEDSN=C:\Program Files\Common Files\ODBC\Data Sources\test.dsn;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;"
上面的你应该明白吧
是我的一个data source 的连接的代码
C:\CAXAEBV2\Database\Users.mdb是我的数据库
Driver={Driver do Microsoft Access (*.mdb)};这个市数据库Driver
FILEDSN=C:\Program Files\Common Files\ODBC\Data Sources\test.dsn是文件dsn
然后就可以使用
ADOTable关联ADOConnection
也就是ADOTable的Connection是上面的那个Connection
然后使用一个DataSource控件关联上面的ADOTable
最后使用一个数据感知控件比如DBGrid关联这个DataSource
这样就可以显示数据了
如果需要填入密码的话
直接填入就可以了
如果没有默认就可以了Top
4 楼ssyqcwj（云中漫步）回复于 2004-05-04 23:51:19 得分 5
不必那么费事!连接Access数据库最好方法是使用jet 4.0
第一步:创建一个ACCESS数据库(当然里面包含两个表)
第二步:创建一个工程,主表单定为Form1
第三步:在表单上放一个ADOConnection,两个ADOTable,两个DataSource,两个DBGrid,一个DBNavigator
第四步:设置ADOConnection->ConnectString(点它右边的三个小点)
第五步:在弹出的窗口中选中Use Connection String,点它右边的Build按钮
第六步:在弹出的窗口中的"提供程序"中选择:Microsoft Jet 4.0 OLE DB Provider(当然,随着你的操作系统的不样,这个接口的版本可能也有差异)然后选择"下一步"
第七步:选第一项的"选择或输入数据库名称,在这里你选中你创建的.mdb文件,然后你测试连接,如果测试成功,你就基本上快完成这个程序了!
第八步:你让你的ADOTable组件的Connection都选中ADOConnection1,然后指定他们各自的表名
第九步:把DataSource1,2的DataSet分别指向ADOTable1,2
第十步:把你的DBGrid1,2的DataSource属性分别指向DataSource1,2
十一步:把DBNavigator->DataSource指向其中的一个DataSource组件
下一步:处理Form1::OnShow事件,加入:
ADOConnection1->Open();
ADOTable1->Open();
ADOTable2->Open();
下一步:处理DBGrid1,2的OnCellClick事件:在1中加入:
DBNavigator1->DataSource=DBGrid1->DataSource;
在2中加入:
DBNavigator1->DataSource=DBGrid2->DataSource;
最后一步:编译,执行,
OK!大功告成!接分!!Top
5 楼tiegerium（/*唐秀观*/）回复于 2004-05-05 11:49:37 得分 0
我不明白啊！老弟！用ADO可以一行代码都不用写。Top
6 楼h98458（零点起飞）回复于 2004-05-05 14:20:56 得分 0
是呀,用DBNavigator1控件一行代碼也不用寫呀Top
7 楼jinhaiwu（※※※※※※※※※※）回复于 2004-05-05 15:57:49 得分 0
同意h98458(零点起飞)Top
8 楼foxphoenix（run）回复于 2004-05-05 16:13:02 得分 0
哇 300 分啊 csdn.admin@126.com 给我发邮件，我给你做一个Top
9 楼ssyqcwj（云中漫步）回复于 2004-05-06 00:04:07 得分 0
老唐,你如果不在一些事件中写一些代码,怎么用一个DBNavigator控制两个表啊?请教了!!Top
10 楼sczyq（我又...........）回复于 2004-05-06 15:36:12 得分 5
// 用 TOpenDialog 组件来打开一个MDB文件，得到文件名。
if (OpenDialog1->Execule())
{
// 将 TOpenDialog 组件来打开的文件名加入到ADO连接串
ADOConnection1->ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + OpenDialog1->FileName + ";Persist Security Info=False";
ADOConnection1->Open();
}
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\ManPower.mdb;Persist Security Info=FalseTop
11 楼tiegerium（/*唐秀观*/）回复于 2004-05-07 22:30:56 得分 5
那就用两句代码吧：用TPageControl控件，Page1和Page2分别放TDBGrid控件，在TPanel上有
一个TDBNavigator共享。现在在写：
TDataSource* __fastcall TForm1::GetDataSource()
{
return PageControl1->Pages[1]->Visible? DataSource2:DataSource1;
}
void __fastcall TForm1::PageControl1Change(TObject *Sender)
{
DBNavigator1->DataSource=GetDataSource();
}Top
12 楼weixing979（★★★闪电侠★★★）回复于 2004-05-07 23:35:12 得分 0
ADO和access的，我这有一个，是以前照书上做的。想要的话发信。weixing979@163.comTop
13 楼myyinuo（myyinuo）回复于 2004-05-08 08:53:23 得分 0
要的话，我给你做个现成的例子，简单明了，发myyinuo@163.com给我，不过要多给分哟！哈哈。
Top
