| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1221 人关注过本帖, 1 人收藏
标题:Listview控件有10列N条数据,怎么一起保存进数据库呀,求助
只看楼主 加入收藏
taking168
Rank: 1
等 级:新手上路
帖 子:20
专家分:0
注 册:2018-8-13
结帖率:50%
收藏(1)
已结贴  问题点数:20 回复次数:1 
Listview控件有10列N条数据,怎么一起保存进数据库呀,求助
因为要存入的数据表不是固定的,导入的数据列数也是不固定的,所以想动态的存入数据库,怎么写都不对,到第三列的时候就自动换行了。
Dim j As Integer
    Call OpenConn
    Sql = "select * from " & & ""
    rs.Open Sql, cn, 1, 3
    j = 1
     rs.AddNew
            
            For i = 1 To Me.ListView1.ListItems.Count '×üDDêy
            For j = 1 To Me.ListView1.ColumnHeaders.Count
                rs.Fields(1).Value = ListView1.ListItems.Item(i)
                rs.Fields(j + 1).Value = ListView1.ListItems.Item(i).SubItems(j)
            Next j
            Next i
    rs.Update
   
    Call CloseConn
搜索更多相关主题的帖子: 数据库 控件 数据 Listview 保存 
2022-05-23 02:38
cwa9958
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:76
帖 子:270
专家分:1330
注 册:2006-6-25
收藏
得分:20 
    Dim j As Integer
    Call OpenConn
    Sql = "select * from " &
    rs.Open Sql, cn, 1, 3
   
    For i = 1 To Me.ListView1.ListItems.Count '×üDDêy
        rs.AddNew
        For j = 1 To Me.ListView1.ColumnHeaders.Count
            rs.Fields(1).Value = ListView1.ListItems.Item(i)
            rs.Fields(j + 1).Value = ListView1.ListItems.Item(i).SubItems(j)
        Next j
        rs.Update
    Next i
   
    Call CloseConn
2022-05-25 16:38
快速回复:Listview控件有10列N条数据,怎么一起保存进数据库呀,求助
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.014189 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved