| |
|
|
Hans-Jürgen Trog | Allen ein gesundes neues Jahr.
In RGH's Foro habe ich die Frage schon gestellt, nun auch hier:
In meinem kleinen Funktionstool habe ich verschiedene Direktaufrufe bisher unter Windows XP. Diese möchte ich gern per Windows 8 anpassen:
proc benutzernamen
@winexec("rundll32.exe keymgr.dll,KRShowKeyMgr",1)
endproc
proc Uhr
@winexec("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl",0)
endproc
proc syssteuerung
@winexec("rundll32.exe shell32.dll,Control_RunDLL",1)
endproc
proc hardwareentfernen
@winexec("rundll32.exe shell32.dll,Control_RunDLL hotplug.dll",1)
endproc
proc drucker
@winexec("rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL PrintersFolder",1)
endproc
proc schriftarten
@winexec("RUNDLL32.exe SHELL32.DLL,SHHelpShortcuts_RunDLL FontsFolder",1)
endproc
'0 Allgemein
'1 Computername
'2 Hardware
'3 Erweitert
'4 Systemwiederherstellung
'5 Automatische Updates
'6 Remote
proc systemeigenschaften
@winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,0",1)
endproc
proc systComputername
@winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,1",1)
endproc
proc systHardware
@winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,2",1)
endproc
proc systErweitert
@winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,3",1)
endproc
proc systWiederherst
@winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,4",1)
endproc
proc systUpdates
@winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,5",1)
endproc
proc systRemote
@winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,6",1)
endproc
proc wiederherstellung
declare sys$
sys$= $WinPath +"\\System32\\restore\\rstrui.exe"
@WinExec(sys$,1)
endproc
proc systemkonfiguration
declare konf$
konf$= $WinPath +"\\PCHealth\\HelpCtr\\Binaries\\msconfig.exe"
@WinExec(konf$,1)
endproc
proc modem
@winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL modem.cpl @0,1",1)
endproc
PROC FORMATieren
WinExec("RUNDLL32 SHELL32.DLL,SHFormatDrive",1)
ENDPROC
Proc diskcopy
WinExec("RUNDLL32 DISKCOPY.DLL,DiskCopyRunDll",1)
EndProc
PROC SUCHEN
ShellExec("C:\\","find",1)
ENDPROC
PROC Arbeitsplatz
WinExec("explorer /n,::{20D04FE0-3AEA-1069-A2D8-08002B30309D}",1)
ENDPROC
PROC Papierkorb
WinExec("explorer /n,::{645FF040-5081-101B-9F08-00AA002F954E}",1)
ENDPROC
proc internet
@RunControl("INETCPL","@1")
endproc
proc software
@winexec("RUNDLL32.exe shell32.dll,Control_RunDLL appwiz.cpl",1)
endproc
proc Design
@winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,-1",1)endproc
proc Hintergrundeinstellung
@winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,0",1)
endproc
proc Schonerwahl
@winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,1",1)
endproc
proc Darstellung
@winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,2",1)
endproc
proc Einstellungen
@winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,3",1)
endproc
proc defragmentierung
@ShellExec($WinPath+"\\system32\\dfrg.msc","open",1)
endproc
proc bereinigen
@ShellExec($WinPath+"\\system32\\cleanmgr.exe","open",1)
endproc
Vielleicht kann mir jemand die entsprechenden Codes einsetzen!?
Vielen Dank Hans-Jürgen |
|
|
| |
|
|
|
Julian Schmidt | Hilft dir da vlt das hier [...] .
Dort werden alle Schnellaufrufe von Windows und Windows Server übersichtlich aufgelistet. |
|
|
| |
|
|
|
Hans-Jürgen Trog | Erst mal vielen Dank. Muss mal testen, wie die Aufrufe unter Win8 laufen. Beschrieben ist das Progi bis Win7. |
|
|
| |
|
|