edv/ADMIN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

neu

Browse Source
This commit is contained in:
Andreas Luxbauer
2019-11-06 16:31:56 +01:00
parent e2c05a5ea3
commit d4dfcd1744
46 changed files with 3412 additions and 678 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
UID/cSqlDb.vb
View File

@@ -819,6 +819,10 @@ Public Class cProgramme
If Not dr.Item("prog_installer_prod_path_NKD") Is DBNull.Value Then daten.prog_installer_prod_path_NKD = dr.Item("prog_installer_prod_path_NKD")
If Not dr.Item("prog_prod_path_NEU") Is DBNull.Value Then daten.prog_prod_path_NEU = dr.Item("prog_prod_path_NEU")
If Not dr.Item("prog_installer_prod_path_NEU") Is DBNull.Value Then daten.prog_installer_prod_path_NEU = dr.Item("prog_installer_prod_path_NEU")
If Not dr.Item("prog_prod_path_UNI") Is DBNull.Value Then daten.prog_prod_path_UNI = dr.Item("prog_prod_path_UNI")
If Not dr.Item("prog_installer_prod_path_UNI") Is DBNull.Value Then daten.prog_installer_prod_path_UNI = dr.Item("prog_installer_prod_path_UNI")
If Not dr.Item("prog_prod_path_AMB") Is DBNull.Value Then daten.prog_prod_path_AMB = dr.Item("prog_prod_path_AMB")
If Not dr.Item("prog_installer_prod_path_AMB") Is DBNull.Value Then daten.prog_installer_prod_path_AMB = dr.Item("prog_installer_prod_path_AMB")
Return daten
End If
@@ -834,8 +838,8 @@ Public Class cProgramme
Public Function insertProgramm(ByVal daten As cProgramm) As Boolean
Dim sql = "INSERT INTO tblProgramme " &
"(prog_codename, prog_name, prog_aktuelleVersion, prog_info, prog_source_path, prog_dev_path,prog_prod_path,prog_installer_source_path,prog_installer_dev_path,prog_installer_prod_path,prog_installer_prod_path_atilla,prog_prod_path_atilla,prog_prod_path_imex,prog_installer_prod_path_imex,prog_prod_path_SBG,prog_installer_prod_path_SBG,prog_prod_path_WAI,prog_installer_prod_path_WAI,prog_prod_path_NKD,prog_installer_prod_path_NKD,prog_prod_path_NEU,prog_installer_prod_path_NEU) VALUES " &
"(@prog_codename,@prog_name,@prog_aktuelleVersion,@prog_info,@prog_source_path,@prog_dev_path,@prog_prod_path,@prog_installer_source_path,@prog_installer_dev_path,@prog_installer_prod_path,@prog_installer_prod_path_atilla,@prog_prod_path_atilla,@prog_prod_path_imex,@prog_installer_prod_path_imex,@prog_prod_path_SBG,@prog_installer_prod_path_SBG,@prog_prod_path_WAI,@prog_installer_prod_path_WAI,@prog_prod_path_NKD,@prog_installer_prod_path_NKD,@prog_prod_path_NEU,@prog_installer_prod_path_NEU)"
"(prog_codename, prog_name, prog_aktuelleVersion, prog_info, prog_source_path, prog_dev_path,prog_prod_path,prog_installer_source_path,prog_installer_dev_path,prog_installer_prod_path,prog_installer_prod_path_atilla,prog_prod_path_atilla,prog_prod_path_imex,prog_installer_prod_path_imex,prog_prod_path_SBG,prog_installer_prod_path_SBG,prog_prod_path_WAI,prog_installer_prod_path_WAI,prog_prod_path_NKD,prog_installer_prod_path_NKD,prog_prod_path_NEU,prog_installer_prod_path_NEU,prog_installer_prod_path_UNI,prog_installer_prod_path_AMB) VALUES " &
"(@prog_codename,@prog_name,@prog_aktuelleVersion,@prog_info,@prog_source_path,@prog_dev_path,@prog_prod_path,@prog_installer_source_path,@prog_installer_dev_path,@prog_installer_prod_path,@prog_installer_prod_path_atilla,@prog_prod_path_atilla,@prog_prod_path_imex,@prog_installer_prod_path_imex,@prog_prod_path_SBG,@prog_installer_prod_path_SBG,@prog_prod_path_WAI,@prog_installer_prod_path_WAI,@prog_prod_path_NKD,@prog_installer_prod_path_NKD,@prog_prod_path_NEU,@prog_installer_prod_path_NEU,@prog_installer_prod_path_UNI,@prog_installer_prod_path_AMB)"
Using conn As SqlConnection = cSqlDb.GetNewOpenConnection()
Using cmd As New SqlCommand(sql, conn)
@@ -862,7 +866,11 @@ Public Class cProgramme
cmd.Parameters.AddWithValue("@prog_prod_path_NEU", daten.prog_prod_path_NEU)
cmd.Parameters.AddWithValue("@prog_installer_prod_path_NEU", daten.prog_installer_prod_path_NEU)
cmd.Parameters.AddWithValue("@prog_prod_path_UNI", daten.prog_prod_path_UNI)
cmd.Parameters.AddWithValue("@prog_installer_prod_path_UNI", daten.prog_installer_prod_path_UNI)
cmd.Parameters.AddWithValue("@prog_prod_path_AMB", daten.prog_prod_path_AMB)
cmd.Parameters.AddWithValue("@prog_installer_prod_path_AMB", daten.prog_installer_prod_path_AMB)
Try
cmd.ExecuteNonQuery()