Moin,
also wie der Titel schon verratet habe ich ein kleines Problem. Unzwar möchte ich eine verknüpfung erstellen die denn minimiert startet. Wenn ich den WindowsStyle auf 2 stelle funktioniert dies jedoch nicht, bei 3(Maximiert) oder 1(Normal) geht es schon. Kann mir da jemand weiter helfen?
########### Hat sich erledigt, es gibt bei WindowsStyle nur 1, 3 und 7 #########################
also wie der Titel schon verratet habe ich ein kleines Problem. Unzwar möchte ich eine verknüpfung erstellen die denn minimiert startet. Wenn ich den WindowsStyle auf 2 stelle funktioniert dies jedoch nicht, bei 3(Maximiert) oder 1(Normal) geht es schon. Kann mir da jemand weiter helfen?
VB.NET-Quellcode
- Private Function MakeShortcut(ByVal File As String, ByVal ShortcutFolder As String, ByVal Name As String, ByVal WorkDirectory As String)
- Dim WshShell As Object = CreateObject("WScript.Shell")
- Dim NewShortcut As Object = WshShell.CreateShortcut(ShortcutFolder & "\" & Name & ".lnk")
- NewShortcut.TargetPath = File
- NewShortcut.WindowStyle = 2 '1 = Normal, 2 = Minimiert, 3 = Maximiert
- NewShortcut.IconLocation = File & ",0"NewShortcut.WorkingDirectory = WorkDirectory
- NewShortcut.Save()
- End Function
########### Hat sich erledigt, es gibt bei WindowsStyle nur 1, 3 und 7 #########################