• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 1530
  • Last Modified:

SQL - Fill

I need to retreive data from my SQL database , table name is CustomerAddress. Why it is not working?

..........
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



If Me.txtTNum.Text <> "" Then

DataSet11.Clear()

SqlDataAdapter1.SelectCommand.CommandText = "select * from results Where " & _

"transno = " & Me.txtTNum.Text

SqlDataAdapter1.Fill(DataSet11)

Display(DataSet11)



End If

End Sub





Private Sub Display(ByVal DataSet As DataSet)

Dim dataTable As DataTable = DataSet.Tables(0)

If dataTable.Rows.Count <> 0 Then

Dim recordNumber As Integer = Convert.ToInt32(dataTable.Rows(0)(0))

Me.txtAddress.Text = CStr(dataTable.Rows(0)(1))

Me.txtCity.Text = CStr(dataTable.Rows(0)(2))

Me.txtState.Text = CStr(dataTable.Rows(0)(3))

End If

End Sub







End Class
0
VBdotnet2005
Asked:
VBdotnet2005
1 Solution
 
Carl TawnSystems and Integration DeveloperCommented:
Are you getting any exceptions ? Have you checked your query to make sure it is returning any results ?
0
 
DrewKjellCommented:
I would guess that the Data adapter hasn't been set up correctly with the correct connection string, opening the connection to the database etc.

If you provide a little more info maybe I could be more specific, but that would be my best guess now.

Drew
0
 
VBdotnet2005Author Commented:
Ok. do you know any similair links to anything like above sample on how to retreive data and fill in appropriate textboxes?
0
 
FocusynCommented:
If this is MSSQL, take out the spaces around "=" in your select command - it usually works anyway but occasionally cause problems.  If the SQL data type is integer, then cast the value to INT like this

SqlDataAdapter1.SelectCommand.CommandText = "select * from results Where " & _
"transno=" & CInt(Me.txtTNum.Text)

If the SQL data type is NOT some numeric type, then you need single quotes around your value in your select command like this

SqlDataAdapter1.SelectCommand.CommandText = "select * from results Where " & _
"transno='" & Me.txtTNum.Text & "'"

The variable object type passed in the SELECT statement must match the SQL data type, or you will get either no results or an invalid casting error on the SQL side (which will sometimes show no error on the client side, just returns empty dataset)

My other suggestion is that using "dataTable" as a name for DataTable object is poor practice.  This can sometimes cause the interpreter to try and execute generic operations on object type instead of your object.  Same goes for your DataSet object.  

Also, there's really no need to instantiate a dataTable in your Sub Display() - the items from the dataset are accessible directly with the syntax dsDataSet.Tables(0).Rows(i).Items(x) where i is the zero-indexed row number and x is the zero-indexed column number in that row.

Me.txtAddress.Text = (dsDataSet.Tables(0).Rows(0).Items(1)).ToString

If your dataadapter connection string is hosed, then none of this will help, but if that's not the problem, try these suggestions.
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now