Postovanje i pozdrav svima.
Hteo bih da se vratim na kod za zastitu baze koji nam je poslao DarkMan.
Lepo je sve objasnjeno i sve funkcionise, ali...
Uradio sam sve kako je gore navedeno, prijavio da nisam registrovan, pa pri podizanju pokrenuo formu sa upitom za sifru, ukucao 555555, pritisnuo dugme za proveru sifre, i, otvorio mi se moj Swithboard. Kada sam izasao iz programa i ponovo ga pokrenuo, nije me vise pitao, vec se odmah otvorio Switchboard. Taman sam se lepo obradovao, kad...
Iskopiram taj mdb na moj drugi racunar i pokrenem ga, - pita za sifru. Odlicno! Znaci, primetio je da je drugi disk-racunar u pitanju. Ukucam opet 555555 i gle, otvori se Switchboard! Onda sam shvatio da mi sve to ne vredi, jer "Perica" ce dati program "Mikici" i reci ce mu: "Kada te pita za sifru, ti ukucaj 555555, i radice". I bice u pravu.
Pokusavao sam da nekako nadjem taj broj diska koji je funkcija izbacila, pa da da na dugme za proveru sifre, umesto:
Code:
Private Sub ButtonProveraSifra_Click()
If EditSifra.Value = "vaša šifra" Then
Call RegisterProgram
DoCmd.Close
DoCmd.OpenForm "Switchboard"
Else
MsgBox "Šifra nije ispravna!", vbCritical, "Greška"
End If
End Sub
stavim sledece:
Code:
Private Sub ButtonProveraSifra_Click()
If EditSifra.Value = "BROJ DISKA + 555555" Then
Call RegisterProgram
DoCmd.Close
DoCmd.OpenForm "Switchboard"
Else
MsgBox "Šifra nije ispravna!", vbCritical, "Greška"
End If
End Sub
Ali nisam nasao gde mu je ta vrednost za serijski broj diska, pa nisam uspeo ni da ostvarim ono sto sam hteo:
Da umesto obicne provere sifre, istu pomnozim (podelim, napravim koren ili sl.) sa vrednoscu koja proizilazi iz date funkcije za iscitavanje serijskog broja diska, pa da to onda bude sifra za ulaz u program. Znaci, "Perica" ne bi mogao "Mikici" da da probram i sifru 555555, jer "Mikica" ima drugi racunar-disk sa drugim serijskim brojem, pa nece moci da pogodi kako sam ja to izracunao.
Mislim da bi na ovaj nacin zastita bila mnogo sigurnija.
Bilo bi dobro (barem ja mislim) kada bi DarkMan dopunio ovako lepo objasnjenu zastitu sa mojom preporukom, pa sve to opet stavio na ovaj post, jer je ovo do sada zaista dobro, i sto je najvaznije, sve je tu, korak po korak, pa svako moze da razume, cak i onaj koji je, kao ja, pocetnik.
Eh, da! Onda jos samo ostaje pitanje sa vremenskom "trial" verzijom. Banem je sve ovo napisao na sajtu "praktikum", ali ja nisam uspeo to da primenim. A samo to jos fali, pa da ova zastita bude stvarno kompletna (barem ja tako mislim).
Hvala i pozdrav DarkMan-u i ostalim.
Boban (otac šestoro dece).