EInbindung WIKI in AVISO

This commit is contained in:
2023-11-23 16:56:21 +01:00
parent c046e4c082
commit 3d145b186e
6 changed files with 233 additions and 167 deletions

View File

@@ -19,6 +19,8 @@ Public Class frmEssensbestellungen
Private Sub frmEssensbestellungen_Load(sender As Object, e As EventArgs) Handles MyBase.Load
PictureBox5.Visible = True
cbxMenu.fillWithSQL("SELECT Distinct Top 50 (REPLACE(MenuTitel,'Wochenkarte ','')) + ' - ' + Convert(varchar, Year(MenuDateVon)), MenuDateVon from tblEBMenu order by MenuDateVon desc", True, "AVISO", True) '/ where MenuDateVon >= GETDATE()
txtMA.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME
@@ -638,6 +640,10 @@ Public Class frmEssensbestellungen
End Sub
Private Sub PictureBox5_Click(sender As Object, e As EventArgs) Handles PictureBox5.Click
Dim webAddress As String = "https://wiki.verag.ag/aviso/featurerelease_essensbestellungen.pdf"
Process.Start(webAddress)
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
cbxMenu.changeItem("")