banner

[Rule] Rules  [Home] Main Forum  [Portal] Portal  
[Members] Member Listing  [Statistics] Statistics  [Search] Search  [Reading Room] Reading Room 
[Register] Register  
[Login] Loginhttp  | https  ]
 
Forum Index Thảo luận hệ điều hành Windows bác nào biết VB.NET chỉ em với  XML
  [Programming]   bác nào biết VB.NET chỉ em với 08/08/2007 05:36:00 (+0700) | #1 | 77674
kekhongnha1985
Member

[Minus]    0    [Plus]
Joined: 10/12/2006 00:15:41
Messages: 20
Offline
[Profile] [PM]
Em có một đoạn code dùng để tìm kiếm trong VB.NET nhưng nó không tìm được bác bào biết sữa lỗi này thì chỉ em với

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim connString As String
connString = "server = .\sqlexpress;integrated security = true;database = Data;"
Dim query As String = "SELECT * FROM NhanVien"
Dim connection As SqlConnection
connection = New SqlConnection(connString)
Dim adapter As SqlDataAdapter
adapter = New SqlDataAdapter(query, connection)
Dim ds As DataSet
ds = New DataSet()
adapter.Fill(ds, "NhanVien")
label1.DataBindings.Add("text", ds, "NhanVien.TenNhanVien")
label.DataBindings.Add("text", ds, "NhanVien.ChucVu")
End Sub

Mô tả: Khi tìm kiếm nhân viên thì trong DAta có rất nhiều nhân viên mỗi nhân viên có một mã nhân viên riêng. Em muốn khi mình nhập vào mã nhân viên thì nó hiện lên TenNhanVien và ChucVu trên label
[Up] [Print Copy]
  [Question]   bác nào biết VB.NET chỉ em với 08/08/2007 06:10:00 (+0700) | #2 | 77687
[Avatar]
YHT
Member

[Minus]    0    [Plus]
Joined: 21/04/2006 13:29:33
Messages: 173
Location: HCM
Offline
[Profile] [PM] [WWW] [Yahoo!]
YHT không có điều kiện check lúc này nhưng nhìn đoạn code thấy hình như là bạn chưa open cái connection đó.
Bạn thử thêm dòng connection.Open() xem sao.
--YHT
[Up] [Print Copy]
  [Question]   bác nào biết VB.NET chỉ em với 08/08/2007 06:13:55 (+0700) | #3 | 77688
bokinhvan_gl
Member

[Minus]    0    [Plus]
Joined: 19/07/2007 10:32:21
Messages: 95
Location: ngày hôm qua
Offline
[Profile] [PM] [Yahoo!]
Dim query As String = "SELECT * FROM NhanVien where MSNV='" & textboxMaSo &"'"
thêm cái connection.Open() nữa
[Up] [Print Copy]
[digg] [delicious] [google] [yahoo] [technorati] [reddit] [stumbleupon]
Go to: 
 Users currently in here 
1 Anonymous

Powered by JForum - Extended by HVAOnline
 hvaonline.net  |  hvaforum.net  |  hvazone.net  |  hvanews.net  |  vnhacker.org
1999 - 2013 © v2012|0504|218|