FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  RechercherRechercher  Dernières imagesDernières images  S'enregistrerS'enregistrer  MembresMembres  Connexion  
Derniers sujets
» Logiciel de planétarium.
Arrêt ou reboot du pc Emptypar Pedro Aujourd'hui à 10:37

» Un autre pense-bête...
Arrêt ou reboot du pc Emptypar Froggy One Jeu 21 Nov 2024 - 15:54

» Récupération du contenu d'une page html.
Arrêt ou reboot du pc Emptypar Pedro Sam 16 Nov 2024 - 14:04

» Décompilation
Arrêt ou reboot du pc Emptypar JL35 Mar 12 Nov 2024 - 19:57

» Un album photos comme du temps des grands-mères
Arrêt ou reboot du pc Emptypar jjn4 Mar 12 Nov 2024 - 17:23

» traitement d'une feuille excel
Arrêt ou reboot du pc Emptypar jjn4 Jeu 7 Nov 2024 - 3:52

» Aide-mémoire mensuel
Arrêt ou reboot du pc Emptypar jjn4 Lun 4 Nov 2024 - 18:56

» Des incomprèhension avec Timer
Arrêt ou reboot du pc Emptypar Klaus Mer 30 Oct 2024 - 18:26

» KGF_dll - nouvelles versions
Arrêt ou reboot du pc Emptypar Klaus Mar 29 Oct 2024 - 17:58

» instructions panoramic
Arrêt ou reboot du pc Emptypar maelilou Lun 28 Oct 2024 - 19:51

» Figures fractales
Arrêt ou reboot du pc Emptypar Marc Ven 25 Oct 2024 - 12:18

» Panoramic et Scanette
Arrêt ou reboot du pc Emptypar Yannick Mer 25 Sep 2024 - 22:16

» Editeur d étiquette avec QR évolutif
Arrêt ou reboot du pc Emptypar JL35 Lun 23 Sep 2024 - 22:40

» BUG QR Code DelphiZXingQRCode
Arrêt ou reboot du pc Emptypar Yannick Dim 22 Sep 2024 - 11:40

» fichier.exe
Arrêt ou reboot du pc Emptypar leclode Ven 20 Sep 2024 - 19:02

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Novembre 2024
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier
-14%
Le deal à ne pas rater :
Lave-linge hublot HOOVER HWP 10 kg (Induction, 1600 trs/min, Classe ...
299.99 € 349.99 €
Voir le deal

 

 Arrêt ou reboot du pc

Aller en bas 
3 participants
AuteurMessage
JL35




Nombre de messages : 7112
Localisation : 77
Date d'inscription : 29/11/2007

Arrêt ou reboot du pc Empty
MessageSujet: Arrêt ou reboot du pc   Arrêt ou reboot du pc EmptyMer 27 Juil 2016 - 20:15

J'interviens sur la pointe des pieds pour ne pas réveiller tout le monde...
Un tout petit module bien pratique sous forme d'exécutable sur le bureau pour, au choix:
- arrêter définitivement le pc, avec option de suppression des traces de navigation internet: historique de navigation et cookies.
- rebooter le pc
ou... annuler l'opération si fausse manoeuvre.
Code:
' StopReboot: arrêt total ou reboot du pc, avec suppression éventuelle des
'             traces de navigation internet (historique et cookies).
LABEL Anul,OK
DIM i%,a$,fb$,fc$
fb$ = "C:\Temp\Supcook.bat": ' fichier de commande
fc$ = "C:\Temp\Flhcook.bat": ' flash cookies
' Suppression des cookies sur différents navigateurs, voir:
'    http://www.catonmat.net/blog/clear-privacy-ie-firefox-opera-chrome-safari/
DATA "@echo off"
DATA "set DataDir=C:\Users\%USERNAME%\AppData\Local\Mozilla\Firefox\Profiles"
DATA "del /q /s /f "+CHR$(34)+"%DataDir%"+CHR$(34)+"
DATA "rd /s /q "+CHR$(34)+"%DataDir%"+CHR$(34)+"
DATA "for /d %%x in (C:\Users\%USERNAME%\AppData\Roaming\Mozilla\Firefox\Profiles\*) do del /q /s /f %%x\*sqlite"
DATA "F1"
DATA "@echo off"
DATA "set FlashCookies=C:\Users\%USERNAME%\AppData\Roaming\Macromedia\Flashp~1"
DATA "del /q /s /f "+CHR$(34)+"%FlashCookies%"+CHR$(34)+"
DATA "rd /s /q "+CHR$(34)+"%FlashCookies%"+CHR$(34)+"
DATA "F2"
FILE_OPEN_WRITE 1,fb$
    READ a$: WHILE a$<>"F1": FILE_WRITELN 1,a$: READ a$: END_WHILE
FILE_CLOSE 1
FILE_OPEN_WRITE 1,fc$
    READ a$: WHILE a$<>"F2": FILE_WRITELN 1,a$: READ a$: END_WHILE
FILE_CLOSE 1
BORDER_HIDE 0: TOP 0,SCREEN_Y/2-60: LEFT 0,SCREEN_X/2-75
WIDTH 0,150: HEIGHT 0,120: FONT_BOLD 0: COLOR 0,255,0,0
BUTTON 1: TOP 1,10: LEFT 1,10: WIDTH 1,WIDTH(0)-20: CAPTION 1,"Arrêt total"
CHECK 2: TOP 2,TOP(1)+HEIGHT(1): LEFT 2,LEFT(1)-1: : WIDTH 2,WIDTH(1)
    COLOR 2,255,255,0: CAPTION 2,"Effacer traces web": MARK_ON 2
BUTTON 3: TOP 3,TOP(2)+22: LEFT 3,LEFT(1): WIDTH 3,WIDTH(1): CAPTION 3,"Reboot"
BUTTON 4: TOP 4,TOP(3)+28: LEFT 4,LEFT(3): WIDTH 4,WIDTH(3): CAPTION 4,"Annuler"
ON_CLICK 1,OK: ON_CLICK 3,OK: ON_CLICK 4,Anul
END
' =======
Anul:
TERMINATE
' ==============================================================================
OK:
i% = NUMBER_CLICK
SELECT i%
    CASE 1: IF CHECKED(2) = 1
                ' Suppression de l'historique des connexions internet
                EXECUTE_WAIT "CMD.exe /c C:\Windows\System32\ipconfig.exe /flushdns"
                ' suppression des cookies internet
                EXECUTE_WAIT "CMD.exe /C " + fb$
                EXECUTE_WAIT "CMD.exe /C " + fc$: ' Flash cookies'
            END_IF
            a$ = "-s -f -t 0": ' arrêt total
    CASE 3: a$ = "-r -f -t 0": ' reboot
END_SELECT
IF FILE_EXISTS(fb$) = 1 THEN FILE_DELETE fb$
IF FILE_EXISTS(fc$) = 1 THEN FILE_DELETE fc$
EXECUTE "Cmd.exe /c C:\Windows\system32\shutdown.exe "+a$
TERMINATE
' =============================================================================
l'icône du raccourci sur le bureau (elle est dans %SystemRoot%\system32\shell32.dll) :
Arrêt ou reboot du pc I210
et le programme lancé, au centre de l'écran, en attente du clic de l'opérateur:
Arrêt ou reboot du pc I110

Edit: J'ai revu le site internet cité plus haut, il y a aussi une suppression des 'Flash cookies', je ne sais pas trop ce que c'est, mais je l'ai rajouté à tout hasard...


Dernière édition par JL35 le Mer 27 Juil 2016 - 23:05, édité 4 fois
Revenir en haut Aller en bas
mindstorm

mindstorm


Nombre de messages : 685
Age : 55
Localisation : charente
Date d'inscription : 13/02/2013

Arrêt ou reboot du pc Empty
MessageSujet: Re: Arrêt ou reboot du pc   Arrêt ou reboot du pc EmptyMer 27 Juil 2016 - 20:42

merci JL35
Revenir en haut Aller en bas
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

Arrêt ou reboot du pc Empty
MessageSujet: Re: Arrêt ou reboot du pc   Arrêt ou reboot du pc EmptyMer 27 Juil 2016 - 21:14

Chouette !
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
JL35




Nombre de messages : 7112
Localisation : 77
Date d'inscription : 29/11/2007

Arrêt ou reboot du pc Empty
MessageSujet: Re: Arrêt ou reboot du pc   Arrêt ou reboot du pc EmptyMer 27 Juil 2016 - 21:50

Il y en a quand même deux qui suivent !
Merci à tous les deux,  mindstorm et Klaus, pour votre appréciation, je me sens moins seul ! Very Happy

PS: et c'est avec ça qu'on se rend compte que la navigation sur internet laisse énormément de traces sur le pc, historique et cookies !
Est-ce qu'il est indispensable, ou même utile, de supprimer ces traces, je ne sais pas trop.
En tout cas, moi je les efface allègrement avec ceci. Et je ne m'en porte pas plus mal.
Je précise que cet effacement éventuel ne se fait que sur l'arrêt total, mais c'est modifiable facilement, le code est très simple.

J'ai oublié de préciser qu'il faut modifier les lignes de datas en fonction de son navigateur internet, ici c'est pour Firefox, voir le lien qui est donné au-dessus et que je rappelle:
http://www.catonmat.net/blog/clear-privacy-ie-firefox-opera-chrome-safari/
Il y a les séquences pour Google Chrome, Firefox, Opera, Safari, et IE, à transformer en lignes de datas.

J'ai ajouté là-haut la suppression des 'Flash cookies' (?).
Revenir en haut Aller en bas
Contenu sponsorisé





Arrêt ou reboot du pc Empty
MessageSujet: Re: Arrêt ou reboot du pc   Arrêt ou reboot du pc Empty

Revenir en haut Aller en bas
 
Arrêt ou reboot du pc
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Arrêt du processus
» TERMINATE est un Arrêt critique ?!
» Bloquer le bouton d'arrêt de l'ordi
» Arrêt d'un programme dans l'éditeur

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Vos sources, vos utilitaires à partager-
Sauter vers: