在datagrid控件里,如何把其中的所有的数据插入到同一数据库的另一张有数据的表中?并把控件(实际也为一张表)里的数据清除掉

潇风逸雨 2004-08-27 03:53:25
在datagrid控件里,如何把其中的所有的数据插入到同一数据库的另一张有数据的表中?并把控件(实际也为一张表)里的数据清除掉
...全文
35 点赞 收藏 3
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
badboy168 2004-08-27
用一个循环来判断每一行的列数,套用下面的代码
If Adodc1.Recordset.RecordCount > 0 Then '总记录数
For Rowjs = 0 To Adodc1.Recordset.RecordCount - 1 '行列数
Data1.Recordset.AddNew '向目标表中写记录
For Coljs = 0 To 7 'DataGrid中有8字段
Data1.Recordset.Fields(Coljs) = DataGrid1.Text '向目标表中写数据
If Coljs < 7 Then DataGrid1.Col = DataGrid1.Col + 1 '向后走一列
Next
DataGrid1.Col = 0 '重新置0
Data1.Recordset.Update '更新目标表中的记录
If Rowjs < Adodc1.Recordset.RecordCount - 1 Then DataGrid1.Row = DataGrid1.Row + 1 '向后走一行
Next
End If
回复
haohaohappy 2004-08-27
或者你把datagrid控件的数据源关掉就行了
回复
haohaohappy 2004-08-27
实际就是把你的DATAGRID控件的数据源的记录集输出,用SQL语句就行,清空控件用CLEAR
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2004-08-27 03:53
社区公告
暂无公告