We help IT Professionals succeed at work.

SQL - Fill

VBdotnet2005
VBdotnet2005 asked
on
Medium Priority
1,550 Views
Last Modified: 2008-01-09
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
Comment
Watch Question

Carl TawnSenior Systems and Integration Developer
CERTIFIED EXPERT

Commented:
Are you getting any exceptions ? Have you checked your query to make sure it is returning any results ?
CERTIFIED EXPERT

Commented:
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

Author

Commented:
Ok. do you know any similair links to anything like above sample on how to retreive data and fill in appropriate textboxes?
Commented:
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.

Not the solution you were looking for? Getting a personalized solution is easy.

Ask the Experts
Access more of Experts Exchange with a free account
Thanks for using Experts Exchange.

Create a free account to continue.

Limited access with a free account allows you to:

  • View three pieces of content (articles, solutions, posts, and videos)
  • Ask the experts questions (counted toward content limit)
  • Customize your dashboard and profile

*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

OR

Please enter a first name

Please enter a last name

8+ characters (letters, numbers, and a symbol)

By clicking, you agree to the Terms of Use and Privacy Policy.