hoi, ik was een check in list aant maken voor mijn LAN organisatie.
Maar nu lukt me 1ding nie, schrijven-delete-update van de database wilt niet.
Uit de database lezen lukt anderzijds wel. Ik heb slechts een basis kennis in VB.NET
Ik vermoet dat de fout in de sql zit. Ik heb na genoege totaal geen ervaring met sql,hoewel dat ik weet wat het is , en hoe de statements ongeveer zijn.
Ook zou de fout mss kunnen liggen in de dataset
Om mijn programma te construeren heb ik de tutorial gebruikt=> http://www.homeandlearn.co.uk/NET/nets12p1.html
ik heb al geprobeerd in de table adapter van mijn dataset,querys in toe te voegen, maar dar zal ik misschien ook wel wat fout hebben gedaan : bij de query fill staat als parameter zijn aanspreek naam. Deze query stond er al standaard in. Nu bij mij querys kan ik die Methodename niet opgeven.
Anderzijds denk ik da ik eenf out heb staan in de sql van mijn code zelf.
afgebakende code:
Private Sub btnupdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnupdate.Click
con.Open()
sql = "Update list SET list WHERE list"
Dim da = New OleDb.OleDbDataAdapter(sql, con)
Dim cb As New OleDb.OleDbCommandBuilder(da)
ds.Tables("list").Rows(inc).Item(0) = IDTextBox.Text
ds.Tables("list").Rows(inc).Item(1) = UsernameTextBox.Text
ds.Tables("list").Rows(inc).Item(3) = VoornaamTextBox.Text
ds.Tables("list").Rows(inc).Item(4) = AchternaamTextBox.Text
ds.Tables("list").Rows(inc).Item(5) = PostcodeTextBox.Text
ds.Tables("list").Rows(inc).Item(6) = PlaatsTextBox.Text
ds.Tables("list").Rows(inc).Item(6) = LandTextBox.Text
ds.Tables("list").Rows(inc).Item(
= GeslachtTextBox.Text
ds.Tables("list").Rows(0).Item(inc) = txtgebdat.Text
ds.Tables("list").Rows(inc).Item(10) = HomepageTextBox.Text
ds.Tables("list").Rows(inc).Item(11) = Msn_adressTextBox.Text
ds.Tables("list").Rows(inc).Item(2) = EmailTextBox.Text
ds.Tables("list").Rows(inc).Item(12) = ProcessorTextBox.Text
ds.Tables("list").Rows(inc).Item(13) = Inter_geheugenTextBox.Text
ds.Tables("list").Rows(inc).Item(14) = Video_GPUTextBox.Text
da.Update(ds, "list")
con.Close()
MsgBox("Succesvol geupdate")
End Sub
deze fout melding krijg ik:

Ik kan dus met gevolg niet updaten.Kan iemand mij hiermee helpen?
Dank bij voorbaat
Cassini
Maar nu lukt me 1ding nie, schrijven-delete-update van de database wilt niet.
Uit de database lezen lukt anderzijds wel. Ik heb slechts een basis kennis in VB.NET
Ik vermoet dat de fout in de sql zit. Ik heb na genoege totaal geen ervaring met sql,hoewel dat ik weet wat het is , en hoe de statements ongeveer zijn.
Ook zou de fout mss kunnen liggen in de dataset
Om mijn programma te construeren heb ik de tutorial gebruikt=> http://www.homeandlearn.co.uk/NET/nets12p1.html
ik heb al geprobeerd in de table adapter van mijn dataset,querys in toe te voegen, maar dar zal ik misschien ook wel wat fout hebben gedaan : bij de query fill staat als parameter zijn aanspreek naam. Deze query stond er al standaard in. Nu bij mij querys kan ik die Methodename niet opgeven.
Anderzijds denk ik da ik eenf out heb staan in de sql van mijn code zelf.
afgebakende code:
Private Sub btnupdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnupdate.Click
con.Open()
sql = "Update list SET list WHERE list"
Dim da = New OleDb.OleDbDataAdapter(sql, con)
Dim cb As New OleDb.OleDbCommandBuilder(da)
ds.Tables("list").Rows(inc).Item(0) = IDTextBox.Text
ds.Tables("list").Rows(inc).Item(1) = UsernameTextBox.Text
ds.Tables("list").Rows(inc).Item(3) = VoornaamTextBox.Text
ds.Tables("list").Rows(inc).Item(4) = AchternaamTextBox.Text
ds.Tables("list").Rows(inc).Item(5) = PostcodeTextBox.Text
ds.Tables("list").Rows(inc).Item(6) = PlaatsTextBox.Text
ds.Tables("list").Rows(inc).Item(6) = LandTextBox.Text
ds.Tables("list").Rows(inc).Item(
ds.Tables("list").Rows(0).Item(inc) = txtgebdat.Text
ds.Tables("list").Rows(inc).Item(10) = HomepageTextBox.Text
ds.Tables("list").Rows(inc).Item(11) = Msn_adressTextBox.Text
ds.Tables("list").Rows(inc).Item(2) = EmailTextBox.Text
ds.Tables("list").Rows(inc).Item(12) = ProcessorTextBox.Text
ds.Tables("list").Rows(inc).Item(13) = Inter_geheugenTextBox.Text
ds.Tables("list").Rows(inc).Item(14) = Video_GPUTextBox.Text
da.Update(ds, "list")
con.Close()
MsgBox("Succesvol geupdate")
End Sub
deze fout melding krijg ik:
Ik kan dus met gevolg niet updaten.Kan iemand mij hiermee helpen?
Dank bij voorbaat
Cassini