Daten speichern in UWP App

matthias40 · 21. September 2022, 09:45

Hi alle zusammen!

Ich bin relativ neu in UWP Programmierung und VB.Net, also bitte nicht über meine blöde Frage wundern...

Ich habe ein ViewModel erstellt, kann meinen Datensatz auch anzeigen, aber wie speichere ich jetzt die Daten wenn ich was ändere? Ebenso würde ich gerne wissen wie ich es schaffe einen neuen Datensatz anzulegen.

Hier der Code von meinem ViewModel:

VB.NET-Quellcode

Imports System.ComponentModel
Imports System.Data.SqlClient
Imports Windows.UI.Popups
Public Class MitarbeiterViewModel
Implements INotifyPropertyChanged
Private myConn As SqlConnection
Private myCmd As SqlCommand
Private _MitarbeiterListe As List(Of ModelMitarbeiter)
Private ReadOnly _MyCommand As ICommand
Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged
Public Property MitarbeiterListe As List(Of ModelMitarbeiter)
Get
Return _MitarbeiterListe
End Get
Set
_MitarbeiterListe = Value
NotifyPropertyChanged("MitarbeiterListe")
End Set
End Property
Private Sub NotifyPropertyChanged(ByVal info As String)
RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs(info))
End Sub
Public Sub GetMitarbeiter()
Dim MyMitarbeiter As New List(Of ModelMitarbeiter)
myConn = GetConnection()
myCmd = myConn.CreateCommand
myCmd.CommandText = "SELECT * FROM tblMitarbeiter"
myConn.Open()
Dim rdr As SqlDataReader = myCmd.ExecuteReader
Try
While rdr.Read()
If rdr.HasRows() Then
Dim M As New ModelMitarbeiter With {.Anrede = rdr("strAnrede"), .VName = rdr("strVName"), .NName = rdr("strNName"), .Strasse = rdr("strStrasse"), .PLZ = rdr("intPLZ"), .Ort = rdr("strOrt"), .SV = rdr("intSV"),
.GebDat = rdr("dtGebDat"), .TelNr = rdr("strTelNr"), .Handy = rdr("strHandy"), .Email = rdr("strEmail"), .PersonalNr = rdr("intPersonalNr"), .BIC = rdr("strBIC"), .IBAN = rdr("strIBAN"),
.Kontoinhaber = rdr("strKontoinhaber"), .Bemerkungen = rdr("strBemerkungen"), .PersNrBarCode = rdr("strPersNrBarCode"), .SollStunden = rdr("intSollStunden"), .SollUrl = rdr("intSollUrl")}
MyMitarbeiter.Add(M)
End If
End While
MitarbeiterListe = MyMitarbeiter
Catch ex As Exception
Return
End Try
End Sub
Public Sub New()
GetMitarbeiter()
End Sub

Ich hoffe ihr könnt mir helfen. Danke im Voraus

Nofear23m · 22. September 2022, 19:52

Hallo und Willkommen

Naja, mit SELECT .... rufst du Daten ab.
Mit z.b.

SQL-Abfrage

UPDATE table_nameSET column1 = value1, column2 = value2, ...WHERE condition;

kannst du Daten aktualisieren (zurückspeichern)
Mit

SQL-Abfrage

INSERT INTO table_name (column1, column2, column3, ...)VALUES (value1, value2, value3, ...);

kannst du einen neuen Datensatz erstellen.

Schau mal hier vorbei.

BTW: Lass bitte tunlichst die Finger von sowas:

VB.NET-Quellcode

End While
MitarbeiterListe = MyMitarbeiter
Catch ex As Exception
Return
End Try

Du verschluckst damit ALLE Fehler. Glaub mir, das willst du nicht.
Überlege dir genau was du machst wenn ein Fehler auftritt und Zeige diesen evtl. dem User auch an damit man im ernstfall zumindest eine Fehlermeldung hat.

Grüße
Sascha

matthias40 · 23. September 2022, 07:38

Danke für deine Antwort. Ich habe mich nicht richtig ausgedrückt. Das mit den Update und Insert Statements war mir klar, was ich eigentlich wissen wollte ist, ob ich mir beim Speichern die Daten aus allen Feldern holen muss oder ob die mit dem PropertyChanged in meiner Liste aktualisiert werden und ich nur die Liste in meinem Update-Statement verwenden kann und wie das funktioniert. Sorry für meine eventuell schwammige Formulierung aber dieses UWP Zeugs treibt mich in den Wahnsinn.
Das mit dem Return im Catch-Teil war nur vorübergehend, an der Routine für die Fehlerbehandlung arbeite ich nebenbei.

Nofear23m · 23. September 2022, 14:51

Das kann ich dir nicht sagen. Du zeigst ja keinen XAML. Wie sollen wir wissen ob du korrekt gebunden hast. Wenn dem so ist dann ja.
Setze doch einen Haltepunkt beim Debuggen und schau welche wert du bekommst.
Das hättest du so in 10 Sekunden herausgefunden. Immer meine Devise. Einfach mal probieren, da erfährt man bei Debuggen sooooo viel.

Grüße

matthias40 · 23. September 2022, 15:54

Soo, hier mal Xaml:

XML-Quellcode

<Page
x:Class="ASF_OfficeSuite.PageMitarbeiterverwaltung"
xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
xmlns:local="using:ASF_OfficeSuite"
xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
xmlns:controls="using:Microsoft.Toolkit.Uwp.UI.Controls"
mc:Ignorable="d"
Background="{ThemeResource ApplicationPageBackgroundThemeBrush}">
<Grid ScrollViewer.VerticalScrollBarVisibility="Auto" ScrollViewer.HorizontalScrollBarVisibility="Auto" ScrollViewer.VerticalScrollMode="Auto" ScrollViewer.HorizontalScrollMode="Auto">
<Pivot Background="{ThemeResource SystemControlAccentAcrylicWindowAccentMediumHighBrush}" >
<Pivot.TitleTemplate>
<DataTemplate>
<Grid>
<TextBlock Text="Mitarbeiterverwaltung" Style="{ThemeResource HeaderTextBlockStyle}" FontSize="30"/>
</Grid>
</DataTemplate>
</Pivot.TitleTemplate>
<PivotItem >
<Grid >
<CommandBar x:Name="cmdBarMA" OverflowButtonVisibility="Collapsed" Background="Transparent" HorizontalAlignment="Right">
<AppBarButton Icon="Add" Click="btnAddMA_Click"/>
<AppBarSeparator/>
<AppBarButton Icon="Save" Click="btnSaveMA_Click"/>
<AppBarSeparator/>
<AppBarButton Icon="Edit" Click="btnEditMA_Click" />
<AppBarSeparator/>
<AppBarButton Icon="Delete" Click="btnDelMA_Click"/>
</CommandBar>
<ComboBox x:Name="cmbData" Header="Mitarbeiter auswählen" Width="200" Height="70" Margin="10,0,0,0" Background="LightGray" ItemsSource="{Binding MitarbeiterListe, Mode=TwoWay}">
<ComboBox.ItemTemplate>
<DataTemplate>
<StackPanel Orientation="Horizontal">
<TextBlock x:Name="t1" Margin="5" Text="{Binding VName, Mode=TwoWay}" />
<TextBlock x:Name="t2" Margin="5" Text="{Binding NName, Mode=TwoWay}" />
</StackPanel>
</DataTemplate>
</ComboBox.ItemTemplate>
</ComboBox>
<RelativePanel Margin="0,70,0,0" Background="Transparent" >
<StackPanel x:Name="stMitarbeiter" Margin="20,0,0,0">
<TextBox x:Name="tPersNr" Header="Personalnummer" Margin="0,24,0,0" MaxLength="50" Width="400" HorizontalAlignment="Left" InputScope="Number" />
<TextBox x:Name="tVorname" Header= "Vorname" Margin="0,24,0,0" MaxLength="180" Width="400" HorizontalAlignment="Left" />
<TextBox x:Name="tNachname" Header="Nachname" Margin="0,24,0,0" MaxLength="180" Width="400" HorizontalAlignment="Left" />
<TextBox x:Name="tStrasse" Header="Strasse" Margin="0,24,0,0" MaxLength="50" Width="400" HorizontalAlignment="Left"/>
<RelativePanel>
<TextBox x:Name="tPLZ" Header="Postleitzahl" Margin="0,24,0,0" MaxLength="5" Width="100" HorizontalAlignment="Left" InputScope="Number" />
<TextBox x:Name="tOrt" Header="Ort" Margin="120,24,0,0" MaxLength="50" Width="280" HorizontalAlignment="Left" />
</RelativePanel>
<RelativePanel>
<TextBox x:Name="tSV" Header="SV-Nummer" Margin="0,24,0,0" MaxLength="4" Width="100" HorizontalAlignment="Left" InputScope="Number" />
</RelativePanel>
<RelativePanel>
<DatePicker x:Name="GebDat" Header="Geburtsdatum" HorizontalAlignment="Left" Margin="0,30,0,0"></DatePicker>
</RelativePanel>
</StackPanel>
<StackPanel x:Name="stMitarbeiter2" Margin="20,0,0,0" RelativePanel.RightOf="stMitarbeiter">
<TextBox x:Name="tTelefon" Header="Telefon" Margin="0,24,0,0" MaxLength="150" Width="400" HorizontalAlignment="Left" />
<TextBox x:Name="tHandy" Header="Mobil" Margin="0,24,0,0" MaxLength="150" Width="400" HorizontalAlignment="Left" />
<TextBox x:Name="tEMail" Header="E-Mail" Margin="0,24,0,0" MaxLength="150" Width="400" HorizontalAlignment="Left" />
<TextBox x:Name="tIBAN" Header= "IBAN" Margin="0,24,0,0" MaxLength="320" Width="400" HorizontalAlignment="Left" />
<TextBox x:Name="tBIC" Header="BIC" Margin="0,24,0,0" MaxLength="50" Width="400" HorizontalAlignment="Left" InputScope="Number"/>
<TextBox x:Name="tInhaber" Header="Kontoinhaber" Margin="0,24,0,0" MaxLength="50" Width="400" HorizontalAlignment="Left"/>
</StackPanel>
<StackPanel x:Name="stMitarbeiter3" Margin="50,0,0,0" RelativePanel.RightOf="stMitarbeiter2">
<Button x:Name="btnAddDoc" Margin="0,44,0,0" Width="180" Content="Dokument hinzufügen" Click="btnAddDoc_Click"></Button>
<Button x:Name="btnGetAbwesenheit" Margin="0,24,0,0" Width="180" Content="Abwesenheit erfassen" Click="btnGetAbwesenheit_Click"></Button>
<Button x:Name="btnShowAbwesenheit" Margin="0,24,0,0" Width="180" Content="Abwesenheiten anzeigen" Click="btnShowAbwesenheit_Click"></Button>
<Button x:Name="btnGetZeitkonto" Margin="0,24,0,0" Width="180" Content="Zeitkonto anzeigen" Click="btnGetZeitkonto_Click"></Button>
<Button x:Name="btnGetDokument" Margin="0,24,0,0" Width="180" Content="Dokument anzeigen" Click="btnGetDokument_Click"></Button>
</StackPanel>
</RelativePanel>
</Grid>
</PivotItem>
</Pivot>
</Grid>
</Page>

und hier der Code dahinter:

VB.NET-Quellcode

Imports System.ComponentModel
Imports Windows.UI.Popups
Imports Windows.UI.WindowManagement
Imports Windows.UI.Xaml.Hosting
Public NotInheritable Class PageMitarbeiterverwaltung
Inherits Page
Private Shared MitarbeiterViewModels As New MitarbeiterViewModel
Public Sub New()
InitializeComponent()
Me.DataContext = MitarbeiterViewModels
End Sub
Private Sub cmbData_SelectionChanged(sender As Object, e As SelectionChangedEventArgs) Handles cmbData.SelectionChanged
Dim mySelMitarbeiter As ModelMitarbeiter = cmbData.SelectedItem
tPersNr.Text = mySelMitarbeiter.PersonalNr
tVorname.Text = mySelMitarbeiter.VName
tNachname.Text = mySelMitarbeiter.NName
tStrasse.Text = mySelMitarbeiter.Strasse
tPLZ.Text = mySelMitarbeiter.PLZ
tOrt.Text = mySelMitarbeiter.Ort
tSV.Text = mySelMitarbeiter.SV
tTelefon.Text = mySelMitarbeiter.TelNr
tHandy.Text = mySelMitarbeiter.Handy
tEMail.Text = mySelMitarbeiter.Email
tIBAN.Text = mySelMitarbeiter.IBAN
tBIC.Text = mySelMitarbeiter.BIC
tInhaber.Text = mySelMitarbeiter.Kontoinhaber
GebDat.Date = mySelMitarbeiter.GebDat
End Sub
End Class

Irgendwie hab ich den Verdacht das ich das mit dem NotifyPropertyChanged verhauen hab, was anderes könnt ich mir nicht vorstellen. Macht es eigentlich mehr Sinn, die Felder alle im XAML zu binden? und falls ja, wie bekomm ich dann nach Auswahl in der ComboBox die Daten in die jeweiligen Felder? Habs mal im Code gelöst weil ich nicht gewusst habe wie es sonst funktioniert.

Danke schon mal,
LG

Nofear23m · 24. September 2022, 07:42

Hallo

Ok, da fehlen die Grundlagen.
Schau mal in meine Signatur und nimm dir mal einiges zur Brust.
Insbesonders Kapitel wie Binding, Command, DataTemplates und sowas.

UWP ist an einigen Stellen ein wenig anders, aber der Großteil ist so übertragbar.

Grüße

matthias40 · 24. September 2022, 08:22

Perfekt, ich werd mich mal einlesen. Danke erstmal!

Daten speichern in UWP App

Daten speichern in UWP App

VB.NET-Quellcode

SQL-Abfrage

SQL-Abfrage

VB.NET-Quellcode

XML-Quellcode

VB.NET-Quellcode

Benutzer online 1

Ähnliche Themen

2 Benutzer haben hier geschrieben