vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Blitzschnelles Erstellen von grafischen Diagrammen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Windows API
Re: Eintrag aus Startmenü löschen. 
Autor: Mortimer
Datum: 02.06.05 10:04

Der Code sieht wie folgt aus:


[codeOption Explicit

Declare Function CreateShellLink Lib "vb6stkit.dll" Alias _
"fCreateShellLink" (ByVal lpstrFolderName As String, _
ByVal lpstrLinkName As String, _
ByVal lpstrLinkPath As String, _
ByVal lpstrLinkArguments As String, _
ByVal fPrivate As Long, _
ByVal sParent As String) As Long

Function VerknuepfungAnlegenVB6(Ziel As String, Pfadname _
As String, Text As String, Privat As Boolean) As Boolean
Dim sParent As String

sParent = "$(Programs)"
VerknuepfungAnlegenVB6 = _
CreateShellLink(Ziel, Text, Pfadname, "", Privat, sParent)
End Function


Code im Codebereich der Form

Option Explicit

Private Sub Command1_Click()
Dim sZiel As String
Dim sPfad As String
Dim sText As String
Dim fPrivat As Boolean

If Option1(0).Value = True Then
sZiel = "..\..\Desktop"
ElseIf Option1(1).Value = True Then
sZiel = ".\Autostart"
Else
sZiel = "."
End If

sText = "VB-fun.de Beispiel"
sPfad = App.Path & "\Projekt1.exe"
fPrivat = True

If VerknuepfungAnlegenVB6(sZiel, sPfad, sText, _
fPrivat) = True Then
MsgBox "Verknüpfung wurde erstellt.", 64, Me.Caption
Else
MsgBox "Verknüpfung konnte nicht erstellt werden.", _
16, "Fehler"
End If
End Sub

]
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Eintrag aus Startmenü löschen.1.374Mortimer01.06.05 14:56
Re: Eintrag aus Startmenü löschen.848vbtricks01.06.05 17:49
Re: Eintrag aus Startmenü löschen.826Mortimer01.06.05 18:49
Re: Eintrag aus Startmenü löschen.895ModeratorMartoeng01.06.05 18:56
Re: Eintrag aus Startmenü löschen.938vbtricks02.06.05 09:50
Re: Eintrag aus Startmenü löschen.829ModeratorMartoeng01.06.05 18:08
Re: Eintrag aus Startmenü löschen.841Mortimer01.06.05 19:13
Re: Eintrag aus Startmenü löschen.808ModeratorMartoeng01.06.05 20:33
Re: Eintrag aus Startmenü löschen.902Mortimer02.06.05 10:04
Re: Eintrag aus Startmenü löschen.831ModeratorMartoeng02.06.05 12:21

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel