| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 969 人关注过本帖
标题:[求助]关于用程序访问数据库的问题(内见代码)
只看楼主 加入收藏
被放逐
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2008-6-18
收藏
 问题点数:0 回复次数:1 
[求助]关于用程序访问数据库的问题(内见代码)
在visual studio中,同一个窗体中的两个listbox,需要各自添加来自不同数据表的数据,但是一个按钮实现后,在运行另一个按钮,提示错误“在位置0处没有行”

请高手指教!!!

一个按钮
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       m_ = "select * from purchase where class='" & Cmbclass.Text & "'"
        m_cmd.Connection = m_con
        m_ada.SelectCommand = m_cmd
        m_ada.Fill(m_ds, "purchase")
        For i As Integer = 0 To m_ds.Tables(0).Rows.Count - 1
            ListBox1.Items.Add(m_ds.Tables(0).Rows(i)(3) & "  " & m_ds.Tables(0).Rows(i)(9) & "本")
       next
sub
第二个按钮
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        m_ = "select * from inventory where bookname='" & TextBox1.Text & "'"
        m_cmd.Connection = m_con
        m_ada.SelectCommand = m_cmd
        m_ada.Fill(m_ds, "inventory")
        ListBox2.Items.Add(m_ds.Tables(0).Rows(0)(0) & "  " & m_ds.Tables(0).Rows(0)(6))
    End Sub

[[it] 本帖最后由 被放逐 于 2008-6-18 22:34 编辑 [/it]]
搜索更多相关主题的帖子: 数据库 代码 访问 
2008-06-18 22:32
qlong0728
Rank: 3Rank: 3
等 级:新手上路
威 望:8
帖 子:272
专家分:0
注 册:2007-6-15
收藏
得分:0 
inventory 表中找不到条件中的记录

程序人员写程序,又拿程序换酒钱。 奔驰宝马贵者趣,公交自行程序员。 不见满街漂亮妹,哪个归得程序员。
2008-06-21 10:38
快速回复:[求助]关于用程序访问数据库的问题(内见代码)
数据加载中...
 
   



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

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