METEZ DES LOGICIEL DANS RUN DU REGISTRE POUR QU'IL DÉMARRE À CHAQUE FOIS
Xav88
Messages postés
178
Date d'inscription
mercredi 8 octobre 2003
Statut
Membre
Dernière intervention
25 septembre 2008
-
28 déc. 2003 à 23:22
Xav88 Messages postés 178 Date d'inscription mercredi 8 octobre 2003 Statut Membre Dernière intervention 25 septembre 2008 - 29 déc. 2003 à 14:48
Xav88 Messages postés 178 Date d'inscription mercredi 8 octobre 2003 Statut Membre Dernière intervention 25 septembre 2008 - 29 déc. 2003 à 14:48
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/19048-metez-des-logiciel-dans-run-du-registre-pour-qu-il-demarre-a-chaque-fois
https://codes-sources.commentcamarche.net/source/19048-metez-des-logiciel-dans-run-du-registre-pour-qu-il-demarre-a-chaque-fois
29 déc. 2003 à 14:48
Xav
29 déc. 2003 à 10:49
'On reforme car les "antislash" n'apparaissent pas...
dim Wsch
Private sub CheckBox_Click
AppChanged=IIF(AppChanged False,True,False)
end sub
Private sub AppChanged(Etat as boolean)
Set Wsch = CreateObject("Wscript.Shell")
if Etat=False then
'on supprime
Wsch .regdelete "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunTon Programme"
else 'on inscrit
Wsch .regwrite "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunTon Programme", App.Path & "Ton Programme.exe", "REG_SZ"
end if
Bonne continuation
29 déc. 2003 à 10:41
Private sub CheckBox_Click
AppChanged=IIF(AppChanged False,True,False)
end sub
Private sub AppChanged(Etat as boolean)
if Etat=False then
'on supprime
Wsch .regdelete "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunTon Programme"
else
'on inscrit
Wsch .regwrite "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunTon Programme", App.Path & "Ton Programme.exe", "REG_SZ"
end if
Bonne continuation
29 déc. 2003 à 10:33
Set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete "HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRunNOM DU FICHIER QUE TU VEUT SUPP" ' supprime le paramètre
28 déc. 2003 à 23:22
Voila et Bonne Année 2004 à tous
Xav