1.在Datagrid中我只想显示一个表的特定几个字值怎样设置???
2.以下code
Dim cnn As New ADODB.Connectioncnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\SQL\库.mdb;Persist Security Info=False"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\SQL\库.mdb;Persist Security Info=False"
Adodc1.RecordSource = 收入表
Adodc1.CommandType = adCmdText
cnn.Execute "insert into 收入表(编号) values('a133')"
cnn.Execute "insert into 收入表(编号) values('a135')"
Adodc1.CommandType = adCmdTable
Adodc1.Refresh
DataGrid1.Refresh
以上Code在Datagrid中显示就只有一条记录,而在库.mdb中的"收入表"里面去看,
结果又有那插入的两条记录;
请都各位该怎么改在Datagrid中才把那所插入的所有记录显示出现????????????????????????????????????????????????????
2.以下code
Dim cnn As New ADODB.Connectioncnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\SQL\库.mdb;Persist Security Info=False"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\SQL\库.mdb;Persist Security Info=False"
Adodc1.RecordSource = 收入表
Adodc1.CommandType = adCmdText
cnn.Execute "insert into 收入表(编号) values('a133')"
cnn.Execute "insert into 收入表(编号) values('a135')"
Adodc1.CommandType = adCmdTable
Adodc1.Refresh
DataGrid1.Refresh
以上Code在Datagrid中显示就只有一条记录,而在库.mdb中的"收入表"里面去看,
结果又有那插入的两条记录;
请都各位该怎么改在Datagrid中才把那所插入的所有记录显示出现????????????????????????????????????????????????????
解决方案 »
- VB。点击桌面空白地点,托盘菜单消失,怎么实现
- 请教如何将别人创建的数据库文件(.MDF、.LDF)导入SQL Server 2000数据库环境?很急!
- 100分求解:"怎样锁定IE窗口的大小,设置为不可调整大小?并且显示在屏幕正中?"[ 急啊>_<b ]
- 实时错误 “3011”:Microsoft Jet数据库引擎找不到对象
- 请教各位高手如何用空行分割文本文件,并找出符合条件的数据,谢谢!!!
- 80004005 OraOLEDB 錯誤
- 急!在线等待。。
- 为什么POPUPMENU 就不能在前面加图形了呢?
- 各位VB论坛的朋友,本人需一套餐饮行业管理软件
- 在Vb 中怎么把标题栏放到状态栏中?
- 急急急!!!!!!如何在运行时创建新的lable控件
- 数据控件的RecordSource属性赋值的问题,请大家帮忙
在这段代码的最后再刷新一次Adodc和DateGrid就行了.
Dim rst As New ADODB.RecordSet
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\SQL\库.mdb;Persist Security Info=False"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\SQL\库.mdb;Persist Security Info=False"
'rst.open "select * from 收入表"
rst.open "insert into 收入表 (编号) values('a133')"
rst.open "insert into 收入表 (编号) values('a135')"
set DataGrid1.datasource=rst
DataGrid1.Refresh