Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Updateproblem ........

Postades av 2004-11-25 16:28:34 - Patrik Strandberg, i forum vb.net, Tråden har 0 Kommentarer och lästs av 640 personer

Har ett antal textboxar som jag binder till en dataview .......
Till samma dataview binder jag en listbox ........

När jag väljer bland alternativen i listboxen ändras helt riktigt värden i textboxarna ...

Men nu till problemet .... vid kontroll av ändring känner inte Datasettet av ändringen och ingen uppdatering sker ... se exempel ..

Vad gör jag för fel, andra uppdateringar med "samma" kod funkar bra med den skillnaden att där använder jag ingen listbox .......

VB.NET
MySQL 4.1


Skapar dataset och dataview ...
<code>

adKontakt.SelectCommand = New MySqlCommand("SELECT * FROM bas_kund_kontakt", conKD)
cbKontakt = New MySqlCommandBuilder(adKontakt)
adKontakt.MissingSchemaAction = MissingSchemaAction.AddWithKey
adKontakt.FillSchema(dsKunddata, SchemaType.Mapped)
adKontakt.Fill(dsKunddata, "kontakt")

myKontaktview.Table = dsKunddata.Tables("kontakt")

</code>

Bindningskod ...
<code>

Me.listKontakt.DataSource = myKontaktview
Me.listKontakt.DisplayMember = "namn"

Me.txtKontakt_info.DataBindings.Add(New Binding("Text", myKontaktview, "information"))
Me.txtKontakt_telefon.DataBindings.Add(New Binding("Text", myKontaktview, "telefon"))
Me.txtKontakt_fax.DataBindings.Add(New Binding("Text", myKontaktview, "fax"))
Me.txtKontakt_mobil.DataBindings.Add(New Binding("Text", myKontaktview, "mobil"))
Me.txtKontakt_epost.DataBindings.Add(New Binding("Text", myKontaktview, "epost"))

</code>


Updatekod ...

<code>

myKontaktview.Item(0).EndEdit()

'// kollar efter ändrig i dataset
If dsKunddata.HasChanges = True Then

Dim A As MsgBoxResult = MsgBoxResult.Cancel

A = MsgBox("Ändringar har gjorts, skall de sparas ?", MsgBoxStyle.YesNoCancel, "SPARA ?")

If A = MsgBoxResult.Cancel Then Exit Sub

If A = MsgBoxResult.Yes Then

conKD.Open()

'// uppdaterar
adKontakt.Update(dsKunddata, "kontakt")
dsKunddata.Tables("kontakt").AcceptChanges()

conKD.Close()

Else

dsKunddata.RejectChanges()

End If

End If

</code>


Svara

Nyligen

  • 18:21 Casino Deutschland
  • 10:03 Pokerogue: The Pokémon Roguelite T
  • 04:12 Slope Rider
  • 09:37 A Fun Dive into the World of Slice
  • 05:11 Embrace the Chaos: Your Guide to L
  • 14:47 Långsiktig förvaltning av fastighe
  • 10:32 Wir suchen günstige Umzugsunterneh
  • 11:09 SEO

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 575 183
28 085
260 394
226
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies