我是个VB.net的初学者，请教高手们VB和SQL如何查询 - 编程论坛

#2

chen53222008-09-17 19:10

Dim cmd1 As New SqlClient.SqlCommand(SQL语句, conStr)
        Dim rd1 As SqlDataReader
        conStr.Open()
        ComboBox1.Items.Clear()
        rd1 = cmd1.ExecuteReader(CommandBehavior.CloseConnection)
        Do While rd1.Read
            ComboBox1.Items.Add(rd1.Item(0))

        Loop
        rd1.Close()
        conStr.Close()
I应该这样就可以了吧

#3

rogerss2008-09-18 21:20

不好意思啊，有的地方没看懂，能把每条语句的意思说一下吗？还有我把你这语句放到程序中，有些问题：
1.未申明名称“constr”
2.未申明名称“cmd1”
3.还有那个SQL语句是什么意思？是填上SQL的查询语句吗？

#4

jxyga1112008-10-17 17:22

Dim cmd1 As New SqlClient.SqlCommand(SQL语句, conStr)
應該在括號里還要打SQL語句如：select * from table
我是猜的

#5

carldu2008-10-20 08:41

应该是

#6

qlong07282008-10-20 15:21

Public conn As New SqlClient.SqlConnection
Dim SQLtile As String
conn = New SqlClient.SqlConnection("data source=SQL服务器IP;initial catalog=数据库名;user id=SQL用户;password=SQL密码;")
conn.Open()
SQLtile = "select * from s_update"
Dim RS_up As New DataSet
Dim DAup As New SqlClient.SqlDataAdapter
DAup.SelectCommand = New SqlClient.SqlCommand(SQLtile, conn)
DAup.Fill(RS_up)
TextBox1.Text=RS_up.Tables(0).Rows(第几行)("字段名")

[[it] 本帖最后由 qlong0728 于 2008-10-20 15:23 编辑 [/it]]

#7

jxyga1112008-10-21 14:52

回复 6# qlong0728 的帖子

Dim rs As String
        cn = New SqlClient.SqlConnection("data source=zx3;initial catalog=test;user id=sa;password=")
        rs = "select t_login.* from t_login"
        Dim RS_up As New DataSet
        Dim DAup As New SqlClient.SqlDataAdapter
        DAup.SelectCommand = New SqlClient.SqlCommand(rs, cn)
        DAup.Fill(RS_up)
解释一下这个中文意思，我是英语版的看不懂

[[it] 本帖最后由 jxyga111 于 2008-10-22 14:12 编辑 [/it]]

#8

jxyga1112008-10-22 18:35

怎么難道上面的沒人知道意思