高人请帮我看下代码!
过程:
if exists(select name from sysobjects where name='sp_sousuo' and type = 'p')
drop proc sp_sousuo
go
create proc sp_sousuo
as
select * from tb_cboss_code_cmpCode
go
类:
Namespace Liu
Public Class GetDataSet
Public Function Getds(ByVal sqlcon As String, ByVal sqlstr As String) As DataSet
Dim con As New System.Data.SqlClient.SqlConnection(sqlcon)
Dim cmd As New System.Data.SqlClient.SqlCommand("sp_sousuo", con)
cmd.CommandType = CommandType.StoredProcedure
Dim dap As New System.Data.SqlClient.SqlDataAdapter(cmd)
Dim ds As New System.Data.DataSet
dap.Fill(ds)
Return ds
End Function
End Class
End Namespace
程序中:
Imports WindowsApplication3.Liu
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim ss As New Liu.GetDataSet
DataGridView1.DataSource = ss.Getds("Data Source=127.0.0.1;Initial Catalog=test;Integrated Security=True", "select * from tb_cboss_code_cmpCode")
End Sub
End Class
为什么不报错,但是DataGridView1中什么也不显示呢
我还是学习中的菜鸟,请大家帮忙
[解决办法]
先看看数据库里是不是真的有数据。.
再看看SS.GETDS获取的DS里有没有数据。..
如果前两项都确定的话就是你绑定的问题了。你可以手动往DATAGRIDVIEW里写数据
dim ds as new dataset
ds =
ss.Getds("Data Source=127.0.0.1;Initial Catalog=test;Integrated Security=True", "select * from tb_cboss_code_cmpCode")
Dim nRowCount As Integer
DataGridView1.RowCount = ds.Tables(0).Rows.Count
for nRowCount = 0 to ds.table(0).rows.count -1
DataGridView1(0, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("NOTICE_ID").ToString.Trim '写你数据库的字段
......
end for
排除法解决困难..