OVH Cloud OVH Cloud

QBasic 4.5, qui connaît ???

5 réponses
Avatar
surfeur75
Bonjour,

En QBasic 4.5 sur win 3.11 PC, j'ai fait un mot de passe en 1 exe
(interprété) qui est lancé par l'autoexec.bat (Call), comme suit:

CLS
mdp$ = "lucie"
100 INPUT "Entrez le mot de passe ou éteignez l'ordinateur ? ", message$
IF message$ <> mdp$ THEN GOTO 100
END

Questions:
-1- On voit la saisie clavier, comme c'est un mdp, comment rendre la saisie
invisible, ou mieux (étoilée ****" ?
-2- On peut sortir (shunter ce mdp) avec <Ctrl>+<C>, s'avez-vous comment
interdire, ou le rediriger pour qu'il soit sans effet dans ce programme ?
-3- Comme indiqué, j'ai mis le Call de ce programme dans l'Autoexec.bat,
mais puis-je le mettre dans un autre fichier qui soit appelé avant par le
Dos (par exemple le config.sys), je ne connais pas l'ordre des séquences
d'appel des fichiers du Dos au lancement, et en plus, je ne sais pas non
plus si on peut faire un call dans n'importe quel fichier, votre avis?

NB je sais, on peut accéder à l'Autoexec.bat pour enlever le Call ou effacer
l'exe mais bon, ce mdp est suffisant pour le profane...

Merci :o)
--
@+, bye, Joe.
Pour m'écrire ng75AROBASEnoosPOINTfr
Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!

5 réponses

Avatar
ng
Puis aussi un Ctrl+C sur l'autoexec.bat ou un Ctrl+Arret sur ton exe va
interrompre l'execution de ton prog...

Si tu veux protéger ton PC par mdp, utilise la fonction mot de passe du bios
!

Bien que de toute facon il y aura moyen de démarrer le PC (il suffit
d'enlever la pile...)

Nicolas.

"surfeur75" a écrit dans le message de news:

Bonjour,

En QBasic 4.5 sur win 3.11 PC, j'ai fait un mot de passe en 1 exe
(interprété) qui est lancé par l'autoexec.bat (Call), comme suit:

CLS
mdp$ = "lucie"
100 INPUT "Entrez le mot de passe ou éteignez l'ordinateur ? ", message$
IF message$ <> mdp$ THEN GOTO 100
END

Questions:
-1- On voit la saisie clavier, comme c'est un mdp, comment rendre la


saisie
invisible, ou mieux (étoilée ****" ?
-2- On peut sortir (shunter ce mdp) avec <Ctrl>+<C>, s'avez-vous comment
interdire, ou le rediriger pour qu'il soit sans effet dans ce programme ?
-3- Comme indiqué, j'ai mis le Call de ce programme dans l'Autoexec.bat,
mais puis-je le mettre dans un autre fichier qui soit appelé avant par le
Dos (par exemple le config.sys), je ne connais pas l'ordre des séquences
d'appel des fichiers du Dos au lancement, et en plus, je ne sais pas non
plus si on peut faire un call dans n'importe quel fichier, votre avis?

NB je sais, on peut accéder à l'Autoexec.bat pour enlever le Call ou


effacer
l'exe mais bon, ce mdp est suffisant pour le profane...

Merci :o)
--
@+, bye, Joe.
Pour m'écrire ng75AROBASEnoosPOINTfr
Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!






Avatar
surfeur75
Yes, tu ne réponds pas à la question cher ami:
-1- moyen d'interdir le ctrl+c et saisie non visible ???
--
@+, bye, Joe.
Pour m'écrire ng75AROBASEnoosPOINTfr
Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!


"ng" a écrit dans le message de news:
#
Puis aussi un Ctrl+C sur l'autoexec.bat ou un Ctrl+Arret sur ton exe va
interrompre l'execution de ton prog...

Si tu veux protéger ton PC par mdp, utilise la fonction mot de passe du


bios
!

Bien que de toute facon il y aura moyen de démarrer le PC (il suffit
d'enlever la pile...)

Nicolas.

"surfeur75" a écrit dans le message de news:

> Bonjour,
>
> En QBasic 4.5 sur win 3.11 PC, j'ai fait un mot de passe en 1 exe
> (interprété) qui est lancé par l'autoexec.bat (Call), comme suit:
>
> CLS
> mdp$ = "lucie"
> 100 INPUT "Entrez le mot de passe ou éteignez l'ordinateur ? ",


message$
> IF message$ <> mdp$ THEN GOTO 100
> END
>
> Questions:
> -1- On voit la saisie clavier, comme c'est un mdp, comment rendre la
saisie
> invisible, ou mieux (étoilée ****" ?
> -2- On peut sortir (shunter ce mdp) avec <Ctrl>+<C>, s'avez-vous comment
> interdire, ou le rediriger pour qu'il soit sans effet dans ce programme


?
> -3- Comme indiqué, j'ai mis le Call de ce programme dans l'Autoexec.bat,
> mais puis-je le mettre dans un autre fichier qui soit appelé avant par


le
> Dos (par exemple le config.sys), je ne connais pas l'ordre des séquences
> d'appel des fichiers du Dos au lancement, et en plus, je ne sais pas non
> plus si on peut faire un call dans n'importe quel fichier, votre avis?
>
> NB je sais, on peut accéder à l'Autoexec.bat pour enlever le Call ou
effacer
> l'exe mais bon, ce mdp est suffisant pour le profane...
>
> Merci :o)
> --
> @+, bye, Joe.
> Pour m'écrire ng75AROBASEnoosPOINTfr
> Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!
>
>
>
>




Avatar
Patrice Henrio
Tu peux normalement en QuickBasic rentrer les appuis claviers un par un par
l'équivalent de Inkey. Tu testes alors chaque appui de touche et tu ne
concatènes qu'avec les lettres que tu veux.

Cela donnerait à peu près cela
90 CLS
Message$=""
Code$=""
Print "entrez le mot de passe ou éteignez l'ordinateur."
100 REP$=Inkey$
If REP$=Chr$(13) then 120
If REP$<"A" then 100
If REP$>"z" then 100
Message$=Message$+REP$
Code$=Code$+"*"
Print Code$
Goto 100
120 If Message$<>mdp$ then 90



Un call dans un .BAT permet d'appeler aussi bien un .COM, .EXE que .BAT.
Dans le .BAT la désativaction de CTRL+BREAK est BREAK OFF
Si tu ne veux pas que la ligne BREAK OFF apparaisse tu écris @BREAK OFF
Tu peux aussi rentrer, toujours dans le .BAT, ECHO OFF qui supprime l'écho
vers l'écran des commandes. De la même façon si tu veux que ta commande
ECHO OFF ne s'affiche pas tu tapes @ECHO OFF



"surfeur75" a écrit dans le message de
news:
Bonjour,

En QBasic 4.5 sur win 3.11 PC, j'ai fait un mot de passe en 1 exe
(interprété) qui est lancé par l'autoexec.bat (Call), comme suit:

CLS
mdp$ = "lucie"
100 INPUT "Entrez le mot de passe ou éteignez l'ordinateur ? ", message$
IF message$ <> mdp$ THEN GOTO 100
END

Questions:
-1- On voit la saisie clavier, comme c'est un mdp, comment rendre la


saisie
invisible, ou mieux (étoilée ****" ?
-2- On peut sortir (shunter ce mdp) avec <Ctrl>+<C>, s'avez-vous comment
interdire, ou le rediriger pour qu'il soit sans effet dans ce programme ?
-3- Comme indiqué, j'ai mis le Call de ce programme dans l'Autoexec.bat,
mais puis-je le mettre dans un autre fichier qui soit appelé avant par le
Dos (par exemple le config.sys), je ne connais pas l'ordre des séquences
d'appel des fichiers du Dos au lancement, et en plus, je ne sais pas non
plus si on peut faire un call dans n'importe quel fichier, votre avis?

NB je sais, on peut accéder à l'Autoexec.bat pour enlever le Call ou


effacer
l'exe mais bon, ce mdp est suffisant pour le profane...

Merci :o)
--
@+, bye, Joe.
Pour m'écrire ng75AROBASEnoosPOINTfr
Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!






Avatar
surfeur75
merci :o)


--
@+, bye, Joe.
Pour m'écrire ng75AROBASEnoosPOINTfr
Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!


"Patrice Henrio" a écrit dans le
message de news: #
Tu peux normalement en QuickBasic rentrer les appuis claviers un par un


par
l'équivalent de Inkey. Tu testes alors chaque appui de touche et tu ne
concatènes qu'avec les lettres que tu veux.

Cela donnerait à peu près cela
90 CLS
Message$=""
Code$=""
Print "entrez le mot de passe ou éteignez l'ordinateur."
100 REP$=Inkey$
If REP$=Chr$(13) then 120
If REP$<"A" then 100
If REP$>"z" then 100
Message$=Message$+REP$
Code$=Code$+"*"
Print Code$
Goto 100
120 If Message$<>mdp$ then 90



Un call dans un .BAT permet d'appeler aussi bien un .COM, .EXE que .BAT.
Dans le .BAT la désativaction de CTRL+BREAK est BREAK OFF
Si tu ne veux pas que la ligne BREAK OFF apparaisse tu écris @BREAK OFF
Tu peux aussi rentrer, toujours dans le .BAT, ECHO OFF qui supprime l'écho
vers l'écran des commandes. De la même façon si tu veux que ta commande
ECHO OFF ne s'affiche pas tu tapes @ECHO OFF



"surfeur75" a écrit dans le message de
news:
> Bonjour,
>
> En QBasic 4.5 sur win 3.11 PC, j'ai fait un mot de passe en 1 exe
> (interprété) qui est lancé par l'autoexec.bat (Call), comme suit:
>
> CLS
> mdp$ = "lucie"
> 100 INPUT "Entrez le mot de passe ou éteignez l'ordinateur ? ",


message$
> IF message$ <> mdp$ THEN GOTO 100
> END
>
> Questions:
> -1- On voit la saisie clavier, comme c'est un mdp, comment rendre la
saisie
> invisible, ou mieux (étoilée ****" ?
> -2- On peut sortir (shunter ce mdp) avec <Ctrl>+<C>, s'avez-vous comment
> interdire, ou le rediriger pour qu'il soit sans effet dans ce programme


?
> -3- Comme indiqué, j'ai mis le Call de ce programme dans l'Autoexec.bat,
> mais puis-je le mettre dans un autre fichier qui soit appelé avant par


le
> Dos (par exemple le config.sys), je ne connais pas l'ordre des séquences
> d'appel des fichiers du Dos au lancement, et en plus, je ne sais pas non
> plus si on peut faire un call dans n'importe quel fichier, votre avis?
>
> NB je sais, on peut accéder à l'Autoexec.bat pour enlever le Call ou
effacer
> l'exe mais bon, ce mdp est suffisant pour le profane...
>
> Merci :o)
> --
> @+, bye, Joe.
> Pour m'écrire ng75AROBASEnoosPOINTfr
> Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!
>
>
>
>




Avatar
45qbasic
Le mercredi 03 Décembre 2003 à 08:37 par surfeur75 :
Bonjour,

En QBasic 4.5 sur win 3.11 PC, j'ai fait un mot de passe en 1 exe
(interprété) qui est lancé par l'autoexec.bat (Call),
comme suit:

CLS
mdp$ = "lucie"
100 INPUT "Entrez le mot de passe ou éteignez l'ordinateur ?
", message$
IF message$ <> mdp$ THEN GOTO 100
END

Questions:
-1- On voit la saisie clavier, comme c'est un mdp, comment rendre la saisie
invisible, ou mieux (étoilée ****" ?
-2- On peut sortir (shunter ce mdp) avec +, s'avez-vous
comment
interdire, ou le rediriger pour qu'il soit sans effet dans ce programme ?
-3- Comme indiqué, j'ai mis le Call de ce programme dans
l'Autoexec.bat,
mais puis-je le mettre dans un autre fichier qui soit appelé avant par
le
Dos (par exemple le config.sys), je ne connais pas l'ordre des
séquences
d'appel des fichiers du Dos au lancement, et en plus, je ne sais pas non
plus si on peut faire un call dans n'importe quel fichier, votre avis?

NB je sais, on peut accéder à l'Autoexec.bat pour enlever le Call
ou effacer
l'exe mais bon, ce mdp est suffisant pour le profane...

Merci :o)
--
@+, bye, Joe.
Pour m'écrire ng75AROBASEnoosPOINTfr
Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!


bonjour

le programme est en qbasic 4.5
on peut utiliser le clavier en minuscules ou majuscules
pour le mot de pase

ex: mot de pase "a" ou "A"
"AbCd"
"AbCd EfGh"

les caractere alphabet son
a-z et A-Z et & é ' ( § è ! ç à ) - ^ $ ù % * < > : / , ; = +
ex: " *def*"

dans le prorammes il a la fleche retoure en arriere
en cas d'erreur dans le mot

en cas que le mot de pase est ok. fin du programmes

en cas que le mot de pase ne pas bon mot retoure au programmes

sortir du programmes en poussen sur le touche esc
fin du programmes

SCREEN 12
CLS : COLOR 15
cote$ = "AbCd EfGh": mot$ = ""
LOCATE 1, 1: PRINT "Entrez le mot de passe de l'ordinateur ? ";
PRINT STRING$(39, "-")
LOCATE 3, 1: PRINT "en cas d'erreur dans le mot pousser sur la fleche( <-- )"
LOCATE 5, 1: PRINT " pousser (Esc) pour sortir "

a = 0: a = 42

test: REM
LOCATE 1, a:
debut$ = "": debut$ = INKEY$
IF debut$ = "" THEN GOTO test
IF debut$ = CHR$(8) THEN GOTO erreur
IF debut$ = CHR$(27) THEN GOTO ordinateur
GOSUB longueur: GOSUB mot
GOTO test
END

erreur:
mot$ = mot$ + debut$: mot1$ = ""
mot1$ = LEFT$(mot$, LEN(mot$) - 2)
mot$ = mot1$: mot1$ = ""
a = a - 1
IF a = 42 THEN a = 42: mot$ = ""
LOCATE 1, a: PRINT "-"
GOSUB mot
GOTO test
END

longueur: REM
PRINT "*"
mot$ = mot$ + debut$
a = a + 1
IF a > 80 THEN a = 42: LOCATE 1, 42: PRINT STRING$(39, "-"): mot$ = ""
RETURN
END

mot: REM
IF mot$ = cote$ THEN GOTO fin
RETURN
END

ordinateur:
CLS
az$ = "ORDINATEUR VA C'ETEINDRE"
q = 1
LOCATE 15, 27 + z: PRINT az$
END

fin: REM
LOCATE 7, 1: PRINT "ok"