Expand|Select|Wrap|Line Numbers
- Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
- Dim state As String
- state = StateTextBox.Text
- FindByState(state)
- If CustInfoDataSet.tblNames.Count = 0 Then
- MessageBox.Show("No records found.", "Search Results")
- End If
- End Sub
Expand|Select|Wrap|Line Numbers
- Private Sub FindByState(ByVal state As String)
- CustInfoDataSet.Clear()
- Me.TblNamesTableAdapter.FillBy(Me.CustInfoDataSet.tblNames)
- End Sub
Expand|Select|Wrap|Line Numbers
- SELECT fldKey, fldEmail, fldFirst, fldLast, fldHomePhone, fldWorkPhone, fldCellPhone, fldStreet, fldCity, fldState, fldPostalCode
- FROM tblNames
- WHERE (fldState = '" & state & "')
Please tell me this is just a syntax issue, because I've been trying to get this VERY simple code to work for days and I'm pulling my hair out. Sorry for being such a newbie, but alas, I had to start somewhere.
If I'm completely leaving something out that you guys need to know, just tell me. It's 5:11 in the morning so I'm sure I forgot something.
Thanks in advance, really appreciate any help you guys can give me.