首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

请帮忙,关于在VB.net下操作Access 2000数据库的有关问题

2011-12-26 
请帮忙,关于在VB.net下操作Access 2000数据库的问题。请帮忙看看,在以下方式的数据库操作时,能否实现“查询

请帮忙,关于在VB.net下操作Access 2000数据库的问题。
请帮忙看看,在以下方式的数据库操作时,能否实现“查询记录”、“删除记录”等功能?如有可能,帮忙补充代码,
谢谢!
(顺便问一下:VB6下的“Adodc”、“DataGrid”、“Data”等控件不能正常操作Access   2000的数据库吗?)

==========================================================================
      Private   Sub   Form1_Load(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   MyBase.Load
                Timer1.Enabled   =   True                                       '使计时器有效
        End   Sub

        Private   Sub   Button3_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button3.Click
                OleDbDataAdapter1.Fill(Me.DataSet11)         '读入数据集数据
                Button3.Enabled   =   False                                   '使读入数据按钮无效
        End   Sub

        Private   Sub   Button5_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button5.Click
                '此处添加“查询记录”的代码
        End   Sub

        Private   Sub   Button1_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button1.Click
                '此处添加“增加记录”的代码
        End   Sub

        Private   Sub   Button2_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button2.Click
                '此处添加“删除记录”的代码
        End   Sub

        Private   Sub   Timer1_Tick(ByVal   sender   As   Object,   ByVal   e   As   System.EventArgs)   Handles   Timer1.Tick
                If   Me.DataSet11.HasChanges   =   True   Then     '检查判断数据集已有改变
                        Button4.Enabled   =   True                             '使刷新按钮有效
                Else
                        Button4.Enabled   =   False
                End   If
        End   Sub

        Private   Sub   Button4_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button4.Click
                Me.OleDbDataAdapter1.Update(Me.DataSet11)       '更新数据集数据
        End   Sub
==========================================================================



[解决办法]
问题需要具体,不可能全部代码别人帮你写的;

——就算别人找来一堆的代码,你也不能直接用的,只能参考;

======================================================
博客空间:http://blog.csdn.net/lovingkiss
资源下载:http://download.csdn.net/user/lovingkiss
Email:loving-kiss@163.com
本人说明: <我的帖子我做主,结贴率保持100%>
优惠接单,各类软件,欢迎咨询QQ 66840199 信誉保证
======================================================
[解决办法]
njlrg(阿波罗18船主) ( ) 信誉:100 Blog 加为好友 2007-07-02 09:00:16 得分: 0


谢谢楼上,我只是想学习一下查询、删除的示例代码。

很郁闷,我用VB6的Adodc不能正常操作Access2000的数据库,
VB6的Adodc必须用Jet 3.51,
而连接Access2000的数据库又必须要用Jet 4.0才行,
请教如何解决?
----------------------
就算你不懂,推理都知道,4.0一定兼容3.51
你用4.0一定行!


[解决办法]
硬件问题???
呵呵……………………
不是的。
关于这个问题5年前就有人研究过,你去网上搜一下吧!

热点排行