Listview控件有10列N条数据，怎么一起保存进数据库呀，求助 - VB6论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → Listview控件有10列N条数据，怎么一起保存进数据库呀，求助

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 1338 人关注过本帖， 1 人收藏

标题：Listview控件有10列N条数据，怎么一起保存进数据库呀，求助

只看楼主加入收藏

taking168

等　级：新手上路
帖　子：20
专家分：0
注　册：2018-8-13
结帖率：50%

楼主

已结贴√ 问题点数：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

等　级：版主
威　望：76
帖　子：279
专家分：1367
注　册：2006-6-25

第 2 楼

得分: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条数据，怎么一起保存进数据库呀，求助