Imports System.IO
Imports Microsoft.VisualBasic
Module modManifest
''' <summary>
'''
''' THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND
'''
''' STEITZ® IT-Solutions
'''
''' Diese Funktion erstellt eine Manifestdatei welche unter Windows Vista™
''' erhöhte Rechte beim Betriebssystem abfordert. Es wird - beim Anwendungs-
''' start gefragt, ob die Anwendung ausfgeführt werden darf.
'''
''' Ist die Manifestdatei beim ersten Programmstart nicht vorhanden, wird
''' sie sofort erstellt. Gleiches gilt auch, wenn Sie gelöscht wurde.
'''
''' Beim 2. Start der Anwendung werden dann die entsprechenden Rechte
''' abgefragt.
'''
'''
''' </summary>
''' <returns></returns>
''' <remarks></remarks>
Function Manifest() As String
If File.Exists(Application.StartupPath & "" & Application.ProductName & "".exe.manifest"") = True Then
Alte URL:
/snippet/for-vista-create-manifest-at-runtime/471