ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Utiliser Rundll32 pour accéder les fonctionnalités de Windows

	Description
Retour à la liste L'auteur Mike Gagnon Canada Membre Simple # 0000000025 enregistré le 14/10/2004 Gagnon Mike Pointe Cla H9R 3K8 de la société Carver Technologies Inc. Fiche personnelle Note des membres pas de note	Contributions > 09 - Automation > Windows Scripting Utiliser Rundll32 pour accéder les fonctionnalités de Windows # 0000000330 ajouté le 10/06/2006 15:00:11 et modifié le 10/06/2006 consulté 11810 fois Niveau initié Version(s) Foxpro : VFP 9.0 VFP 8.0 VFP 7.0
	Le code suivant requiert que Windows Scripting soit présent sur l'ordinateur. Veuillez noter que certains script ne fonctionnent que pour Windows XP.
	Code source :
	&& Faire appel à 'ajout/suppression de programmes' oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL appwiz.cpl,,0") && Faire appel à l'affichage oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL access.cpl,,3") && Faire appel au réglage de la carte de son oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL access.cpl,,2") && Faire appel au panneau de configuration oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL") && Faire appel pour copier une disquette oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe DISKCOPY.DLL,DiskCopyRunDll") && Faire appel au formattage du disque dur. oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe SHELL32.DLL,SHFormatDrive") && Ouvrir le répertoire de polices oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe SHELL32.DLL,SHHelpShortcuts_RunDLL FontsFolder") && Faire appel au controleur de jeux oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL joy.cpl") && Faire appel à l'ajout de matériel oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL hdwwiz.cpl") && Faire appel aux propriétés de la sourie oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL main.cpl @0") && Ajouter une connexion réseau oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe netplwiz.dll,AddNetPlaceRunDll") && Connecter un lecteur de réseau oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,SHHelpShortcuts_RunDLL Connect") && Ouvrir le panneau d'admninistration des connexions ODBC oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL odbccp32.cpl") && Oublié votre mot de passe? oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe keymgr.dll,PRShowSaveWizardExW") && Changer de mot de passe oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe keymgr.dll,PRShowRestoreWizardExW") && Connecter une imprimante oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe WINSPOOL.DRV,ConnectToPrinterDlg") && Ouvrir le répertoire des imprimantes oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe SHELL32.DLL,SHHelpShortcuts_RunDLL PrintersFolder") && Ouvrir les propriétés du modem oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL telephon.cpl") && Faire appel aux comptes des utilisateurs oShell = CreateObject("WScript.Shell") oShell.run("rundll32.exe %SystemRoot%\System32\netplwiz.dll,UsersRunDll") && Ouvrir l'interface du FireWall de Windows oShell = CreateObject("WScript.Shell") oShell.run("RunDll32.exe shell32.dll,Control_RunDLL firewall.cpl")
	Commentaires
	Aucun commentaire enregistré ...

Utiliser Rundll32 pour accéder les fonctionnalités de Windows

Contributions > 09 - Automation > Windows Scripting