by Ar-S » Tue Sep 30, 2008 4:54 pm
Salut salut,
De retour sur les épreuves avec un petit soucis du coté de cette épreuve..
je connaissais la technique de camoufflage sur des partoche NTFS mais voilà..
je découvre le "message" caché..
j'entre une formule DOS comme mot de passe contenant *3 caractères mais le code est erroné... je ne pige pas vraiment ou est mon erreur (j'ai bien pris c:\ comme base)
pourrai-je soumettre ma ligne de code à quelqu'un pour qu'il m'aiguille ?
D'avance merci... en attendant je vais essayer d'autre syntaxe même si je ne vois pas trop ce que je pourrais changer.
J'ai même fait un petit logiciel vite faf pour compter le nbr de caractères totale d'une suite de caractères.
Si ça en interesse quelque uns, voilà le soft :
[img:5bf91dd741]http://img519.imageshack.us/img519/7815/01pq0.jpg[/img:5bf91dd741]
[img:5bf91dd741]http://img519.imageshack.us/img519/631/02ga9.jpg[/img:5bf91dd741]
Signature MD5 du logiciel : 76ccd0ed02dc29d021fcc3208fc3e42b
Lien : [code:1:5bf91dd741]http://rapidshare.com/files/149714532/compte.exe[/code:1:5bf91dd741]
Source (en Pure Basic)
[code:1:5bf91dd741];{- Réalisé Par Ar-S / 2008 pour HACK BBS en Pure basic 4.20
;{ Windows
Enumeration
#Window_0
#res
#String_2
EndEnumeration
;}
Define.l Event, EventWindow, EventGadget, EventType, EventMenu
;}
Procedure OpenWindow_Window_0()
If OpenWindow(#Window_0, 508, 266, 380, 80, "Compteur de caractères par Ar-S", #PB_Window_SystemMenu|#PB_Window_MinimizeGadget|#PB_Window_TitleBar)
If CreateGadgetList(WindowID(#Window_0))
StringGadget(#res, 0, 60, 380, 20, "taper du texte ci dessus.", #PB_String_ReadOnly)
EditorGadget(#String_2, 0, 0, 380, 55)
RetourAuto(#String_2)
EndIf
EndIf
EndProcedure
OpenWindow_Window_0()
;{- Event loop
Repeat
Event = WaitWindowEvent()
Select Event
; ///////////////////
Case #PB_Event_Gadget
EventGadget = EventGadget()
EventType = EventType()
If EventGadget = #String_2
res$=GetGadgetText(#String_2)
SetGadgetText(#res,Str(Len(res$))+" Caractères")
EndIf
; ////////////////////////
Case #PB_Event_CloseWindow
EventWindow = EventWindow()
If EventWindow = #Window_0
CloseWindow(#Window_0)
Break
EndIf
EndSelect
ForEver
;
;}
[/code:1:5bf91dd741]