AppCustom/SchaumKommi
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ms Änderungen RS Marvin

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber
2018-01-29 14:23:40 +01:00
parent 2aefc23b8c
commit 135e31f0d1
20 changed files with 89 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
SchaumKommiCollo/KommiCollo/frmAdressChange.vb
View File

@@ -1,7 +1,7 @@
Public Class frmAdressChange
Private Sub btnsave_Click(sender As Object, e As EventArgs) Handles btnsave.Click
Dim upd = String.Format("UPDATE TBKOMMCOLLI_SENDUNGEN SET NAME1 = '{0}', NAME2 = '{1}', STRASSE = '{2}', PLZ = '{3}', ORT = '{4}' WHERE GUID = {5}",
txtName1.Text, txtName1.Text, txtStrasse.Text, txtPLZ.Text, txtOrt.Text, CURRENT_SENDUNG)
txtName1.Text, txtName2.Text, txtStrasse.Text, txtPLZ.Text, txtOrt.Text, CURRENT_SENDUNG)
If ClassDatabase.Execute_non_Query(upd) = True Then
Me.Close()
End If