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

Statusfunctions, etc.

Browse Source
This commit is contained in:
d.breimaier
2026-05-19 16:47:48 +02:00
parent 8ff020bde4
commit c1345d67ec
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Aviso/AvisoStatusFunctions.vb
View File

@@ -2265,7 +2265,7 @@ ELSE_ATILLA:
Dim PathTmp = (New VERAG_PROG_ALLGEMEIN.cDATENSERVER(DsId)).GET_TOP1_PATH(False) Dim PathTmp = (New VERAG_PROG_ALLGEMEIN.cDATENSERVER(DsId)).GET_TOP1_PATH(False)
If PathTmp <> "" Then anhaenge.Add(PathTmp) : found = True If PathTmp <> "" Then anhaenge.Add(PathTmp) : found = True
End If End If
If IsNumeric(DsId) Then If IsNumeric(DsId2) Then
Dim PathTmp2 = (New VERAG_PROG_ALLGEMEIN.cDATENSERVER(DsId2)).GET_TOP1_PATH(False) Dim PathTmp2 = (New VERAG_PROG_ALLGEMEIN.cDATENSERVER(DsId2)).GET_TOP1_PATH(False)
If PathTmp2 <> "" Then anhaenge.Add(PathTmp2) : found = True If PathTmp2 <> "" Then anhaenge.Add(PathTmp2) : found = True
End If End If

4
Aviso/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("4.2.8.3")> <Assembly: AssemblyVersion("4.2.8.4")>
<Assembly: AssemblyFileVersion("4.2.8.3")> <Assembly: AssemblyFileVersion("4.2.8.4")>