Hlavné menu
Vitajte
Anketa
Myslíte, že by sa mali články zamerať viac na:
programovanie
návody
hardware
software
tvorbu webu
zdrojové kódy
nemyslím si, že by sa malo niečo meniť
Preklad
Hľadať na Mastery.sk
Online
Posledne vzhliadnuté
- Ranger
[ 58 min, 44 sek pred ] - admin
[ 5 dní, 59 min, 27 sek pred ] - mates
[ 5 dní, 1 hodina, 37 min, 29 sek pred ] - Jakub89
[ 5 dní, 15 hodín, 32 min, 58 sek pred ] - ferko
[ 1 týždeň, 1 deň, 1 hodina, 57 min, 3 sek pred ] - Majo_SVK
[ 1 týždeň, 1 deň, 2 hodín, 1 min, 2 sek pred ] - tomsicko
[ 2 týždňov, 21 hodín, 47 min, 55 sek pred ] - golemjofo
[ 3 týždňov, 4 dní, 5 hodín, 36 min, 19 sek pred ] - ssp
[ 4 týždňov, 11 hodín, 18 min, 28 sek pred ] - cicuska
[ 4 týždňov, 1 deň, 21 hodín, 42 min, 20 sek pred ]
Reklamy
Link k nám
Ako ochrániť svoj program proti cracku?
Ako ochrániť svoj program proti cracku?
Tento návod vám ukáže ako naprogramovať jednoduchú ochranu proti cracku určitých častí programu. Ak váš program používa dôležité dáta tak túto ochranu odporúčam, aby bol váš program aspon s časti chránený.
Tento návod vám ukáže ako naprogramovať jednoduchú ochranu proti cracku určitých častí programu. Ak váš program používa dôležité dáta tak túto ochranu odporúčam, aby bol váš program aspon s časti chránený.
Na naprogramovanie ochrany použijeme sériu podmienok ktoré sa pri spustení programu budú overovať, ak bude náš program cracknutý a bude cracknutý na tom mieste kde sa nachádza podmienka, tak sa podmienka nesplní a program sa vypne. Miesto vypínania môžeme zvoliť napríklad spustenie odinštalačného programu alebo kódu pre zamknutie PC. Znova si vytvoríme projekt Standard EXE a Modul. Do formuláru Standard EXE vložíme svoj kód a dopíšeme k nemu volanie podmienok:
Private Sub Form_Load()
Form1.Caption = "..::Zabezpečenie::..::www.mastery.sk::.."
Label2.Caption = "www.mastery.sk"
ochrana
End Sub
Form1.Caption = "..::Zabezpečenie::..::www.mastery.sk::.."
Label2.Caption = "www.mastery.sk"
ochrana
End Sub
vytvoríme si Label1 a Label2, do labelu 2 vpíšeme text ktorý budeme mať pod ochranou a pre istotu tento text vložíme aj na začiatok programu. Návestie "ochrana" nám slúži ako volanie pre odtestovanie. Na odtestovanie použijeme pár podmienok ktoré zabezpečia aby sa prípadný pokus o crack nepodaril tak ľahko. Skúsenejší crackery túto ochranu nájdu no neskúsenejší ju budú mať ťažkosti. Každá ochrana dobrá ochrana, tak a poďme na tie podmienky ktoré budeme vkladať do modulu aby sa horšie hľadali pri prípadných pokusoch o crack:
Public Sub ochrana()
If Form1.Caption = "..::Zabezpečenie::..::www.mastery.sk::.." Then
GoTo sec
End If
If Label2.Caption = "www.mastery.sk" Then
GoTo sec
End If
MsgBox "Narušenie ochrany! Program bude vypnutý!", vbCritical, "Pozor!"
End
sec:
End Sub
Download
Public Sub ochrana()
If Form1.Caption = "..::Zabezpečenie::..::www.mastery.sk::.." Then
GoTo sec
End If
If Label2.Caption = "www.mastery.sk" Then
GoTo sec
End If
MsgBox "Narušenie ochrany! Program bude vypnutý!", vbCritical, "Pozor!"
End
sec:
End Sub
GoTo sec odkazuje na návestie sec ktoré pri schválení podmienky preskočí príkaz End. Pre zvýšenie ochrany môžeme povkladať viac rozdielnych návestí ale tak aby sa program nezacyklil. Pôvodne som nechcel pridávať zdorjový kód na stiahnutie, ale zmenil som názor.
DownloadMusíte byť prihlásený, aby ste mohli zasielať komentáre - prosím prihláste alebo zaregistrujte sa tu pre registráciu
