Input string was not in a correct format. mscorlib
ex.Message = Input string was not in a correct format. ex.Source = mscorlib
at the following line I have that error message,
what that problem is ??
Dim GetRow As DataRow = DataSet99.Tables("Documents").Rows.Find(searchPart)
Code:
Private Sub Search_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Search.Click
If IsValid Then
Try
SqlConnection1.Open()
Dim searchPart As String = txtName.Text
Dim DataAdapter1 As New SqlClient.SqlDataAdapter("Select * From Documents", SqlConnection1)
Dim Command As New SqlClient.SqlCommandBuilder(DataAdapter1) Dim DataSet99 As New DataSet
DataSet99.Clear()
DataAdapter1.Fill(DataSet99, "Documents")
Dim keys(1) As DataColumn
keys(0) = DataSet99.Tables("Documents").Columns("id_doc")
DataSet99.Tables("Documents").PrimaryKey = keys
'Dim NameS = "id_doc ='" & searchPart & "'"
Dim GetRow As DataRow = DataSet99.Tables("Documents").Rows.Find(searchPart)
txtInNum.Text = GetRow("cod_int")
txtExNum.Text = GetRow("cod_ext")
SqlConnection1.Close()
Catch ex As Exception
ErrorMsg.Text = ex.Message & " " & ex.Source
ErrorMsg.Visible = True
End Try
End If
End Sub