Jaha... En enkel lösning är att skriva: Kanon... mmm.. Ja - det känns mer naturligt att skicka med kommandot i en funktion sådär...Datagrid uppdaterar sig flera gånger :/
Public Class frmMain
Dim db As New DataTable()
Dim db_kund As New DataSet()
Dim connstr As String = "Provider=Microsoft.jet.oledb.4.0; Data source =BoknDB.mdb"
Public Sub updater(ByVal sqlstr As String)
Dim dataAdapter As New OleDb.OleDbDataAdapter(sqlstr, connstr)
dataAdapter.ToString()
dataAdapter.Fill(db)
dataAdapter.Dispose()
End Sub
Private Sub frmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
txtFname.Text = ""
txtLname.Text = ""
txtStreetAdr.Text = ""
txtStreetNum.Text = ""
End Sub
Private Sub TabPage4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabPage4.Click
updater("SELECT * FROM tblCustmr")
dtvKundReg.DataSource = db
End Sub
Det som händer är att när man klickar på TabPage4_Click, så FINE... den kör sql-komandot. Men klickar man igen så kör den kommandot och lägger till det igen... typ:
[ett klick]
1
2
3
[två klick]
1
2
3
1
2
3
Hur får man den att sluta upp med det här... Har den visat informationen så skall den vara som den är om man inte klickar på en knapp (som jag har brevid som lägger till en post i samma tabell... då skall denna läggas till)
Säkert jättelätt men jag vet inte var felet ligger :S
Sv: Datagrid uppdaterar sig flera gånger :/
Public Class frmMain
Dim db_kund As New DataSet()
Dim connstr As String = "Provider=Microsoft.jet.oledb.4.0; Data source =BoknDB.mdb"
Public Function OpenDataTable(ByVal sqlstr As String)
Dim db As New DataTable()
Dim dataAdapter As New OleDb.OleDbDataAdapter(sqlstr, connstr)
dataAdapter.ToString()
dataAdapter.Fill(db)
dataAdapter.Dispose()
Return db
End Sub
Private Sub TabPage4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabPage4.Click
dtvKundReg.DataSource = OpenDataTable("SELECT * FROM tblCustmr")
End Sub
Annars kan du ha en flagga vilket du kontrollerar och sätter vid första gången.
Sv:Datagrid uppdaterar sig flera gånger :/