hi all
I`m trying to insert information in accdb
I wrote this code
and when I trying to debug the project and trying to insert info this gives methe errorCode:Try Label1.Visible = False UltraLabel7.Visible = False Dim ba As New databazaDataSetTableAdapters.saqoneliTableAdapter Dim ja As New databazaDataSetTableAdapters.historyTableAdapter Dim fi As New databazaDataSetTableAdapters.fizikuriTableAdapter Dim ma As New databazaDataSetTableAdapters.saqoneliTableAdapter Dim tg = ma.GetDataBysaqoneli(0) Dim dbpsw As Integer = tg.Rows(0).Item(0) Dim aaaa As String = UltraTextEditor1.Text Dim bbbb As String = UltraTextEditor10.Text Dim cccc As String = UltraTextEditor11.Text Dim dddd As String = UltraTextEditor9.Text fi.Insert(UltraComboEditor1.Text, UltraComboEditor2.Text, UltraComboEditor3.Text, UltraComboEditor4.Text, UltraComboEditor5.Text, UltraComboEditor6.Text) UltraLabel7.Text = UltraComboEditor1.Text UltraComboEditor1.Refresh() UltraComboEditor1.RefreshList() UltraComboEditor2.Refresh() UltraComboEditor2.RefreshList() UltraComboEditor3.Refresh() UltraComboEditor3.RefreshList() UltraComboEditor4.Refresh() UltraComboEditor4.RefreshList() UltraComboEditor5.Refresh() UltraComboEditor5.RefreshList() UltraComboEditor6.Refresh() UltraComboEditor6.RefreshList() UltraComboEditor1.SelectedItem.DisplayText = UltraLabel7.Text Dim momid As Integer = UltraComboEditor1.SelectedIndex ba.Insert(momid, aaaa, cccc, bbbb, dddd, UltraCalendarCombo1.Text) Form1.DataGridView1.DataSource.GetType() Form1.DataGridView1.Refresh() If SaqoneliTableAdapter.GetData.Rows(0).Item(3).ToString = Me.UltraTextEditor1.Text Then ja.Insert(momid, dbpsw, UltraCalendarCombo1.Text, "", dddd) Else Exit Sub End If
please help me...
I do not know what to do...
P.S. I`m trying to write the LOMBART system...
if anybody have exaples please give me or tell me what to do for this code....
thanks....



Reply With Quote

