Discussion :

[hackoofr]

Bonjour, je voudrais faire un petit script en Vbscript qui simule a peu prés le contrôle parentale.
Je m'explique si au cours de l'exécution de ce script qui se fait en boucle pour qu'il ne s'arrête pas et éventuellement et qu'il détecte les mots à éliminer ou à censurer par exemple les Mots "[Edit] Thierry : on a compris, c'est bon !"
voila j'ai fais ceci et biensûr, c'est du broullion et c'est une 1ère Tentative de ma part, alors je veux que quelqu'un expérimenté en Vbscript me donne un coup de main ou bien des idées et des trucs et des astuces pour que ce script marche bien.
Merci bien de votre précieuse AIDE !

'----------------------Censure.vbs----------------------------
dim variable
Set variable=CreateObject("WScript.Shell")
do
if variable.AppActivate ("s**e") Then variable.SendKeys "%{F4}" ' ici on tente de femer l'application qui porte le mot s**e en simulant la 'combinaison des touches Alt+F4
if variable.AppActivate ("s**") Then variable.SendKeys "%{F4}"
if variable.AppActivate ("p***") Then variable.SendKeys "%{F4}"
if variable.AppActivate ("b***") Then variable.SendKeys "%{F4}"
loop
'----------------------Fin du Script---------------------------

[ProgElecT]

Bonjour
.........
Merci bien de votre précieuse AIDE !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
'----------------------Censure.vbs----------------------------
dim variable
Set variable=CreateObject("WScript.Shell")
do
if variable.AppActivate ("s**e") Then variable.SendKeys "%{F4}" ' ici on tente de femer l'application qui porte le mot s**e en simulant la 'combinaison des touches Alt+F4
if variable.AppActivate ("s**") Then variable.SendKeys "%{F4}"
if variable.AppActivate ("p***") Then variable.SendKeys "%{F4}"
if variable.AppActivate ("b***") Then variable.SendKeys "%{F4}"
loop 
'----------------------Fin du Script-------------------------

[omen999]

bonjour,
il existe une façon plus efficace d'énumérer les fenêtres principales de windows en appelant directement l'api
mais honnêtement un contrôle parental en vbs, ça n'a pas grand sens.
recherche plutôt un logiciel déjà existant car sinon ton code risque de se retrouver dans le bétisier du site

[ced600]

Il ne fera pas long feu ton contrôle parental.
Il suffit d'aller dans le gestionnaire des processus et de killer le process VBS.