this is my project in my ojt. I have a problem in ds(DataSet), the error says that it is null, now, my question is, how can I fix this problem?
Private Sub RefreshData()
If Not con.State = ConnectionState.Open Then
con.Open()
End If
Dim dt As New DataTable("SELECT ID as [ID], " & _
"fname as [NAME], lname " & _
"FROM asdf ORDER by ID")
If ds IsNot Nothing And ds.Tables("asdf") IsNot Nothing Then****this part is were i get the error***
da.Fill(dt, "asdf")
End If
con.Close()
maxrows = ds.Tables("asdf").Rows.Count
inc = -1
End Sub