首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

高人请帮小弟我看下代码

2011-12-22 
高人请帮我看下代码!过程:if exists(select name from sysobjects where namesp_sousuo and type p

高人请帮我看下代码!
过程: 
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

排除法解决困难..

热点排行