HOME > .NET Framework > Forum > ถามเรื่องการวนข้อมูลขึ้นมาโชว์ แต่มันติด error ... The SelectCommand property has not been initialized before calling 'Fill'.
ถามเรื่องการวนข้อมูลขึ้นมาโชว์ แต่มันติด error ... The SelectCommand property has not been initialized before calling 'Fill'.
The SelectCommand property has not been initialized before calling 'Fill'.
ตรงโค้ด Da.Fill(Ds, "tb_gate")
อยากจะทราบหว่าต้องแก้ยังไงครับ
Code (VB.NET)
Imports System.Data
Imports System.Data.OleDb
Dim con As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=database/database.mdb;")
Dim cmd As OleDbCommand
Dim Da As New OleDbDataAdapter
Dim myDA As OleDbDataAdapter
Private Sub checkgate()
Dim DView As DataView
Dim DRowView As DataRowView
Dim Ds As New DataSet
If con.State = ConnectionState.Closed Then
con.Open()
End If
myDA = New OleDbDataAdapter("Select ip_gate From tb_gate", con)
Da.Fill(Ds, "tb_gate")
DView = Ds.Tables("tb_gate").DefaultView
If DView.Count > 0 Then 'ถ้า DView.Count มีค่ามากกว่า 0 แสดงว่ามีข้อมูลรหัสนั้นๆ แล้ว
For Each DRowView In DView
MessageBox.Show(DRowView.Item("ip_gate"), "เสร็จ", MessageBoxButtons.OK, MessageBoxIcon.Information)
Next
End If
con.Close()
End Sub
Dim objConn As New System.Data.OleDb.OleDbConnection
Dim objCmd As New System.Data.OleDb.OleDbCommand
Dim dtAdapter As New System.Data.OleDb.OleDbDataAdapter
Dim ds As New DataSet
Dim strConnString,strSQL As String
strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("database/mydatabase.mdb")&";Jet OLEDB:Database Password=;"
strSQL = "SELECT * FROM customer"
objConn.ConnectionString = strConnString
With objCmd
.Connection = objConn
.CommandText = strSQL
.CommandType = CommandType.Text
End With
dtAdapter.SelectCommand = objCmd
dtAdapter.Fill(ds)
dtAdapter = Nothing
objConn.Close()
objConn = Nothing