Aşağıdaki linkte değerli ozan hocama ait örnek uygulama üzerinden hareketle,lisans işlemi sorunsuz olarak çalışmaktadır..
https://accesstr.net/konu-kopyalama-koru...ght=lisans

Benim yapmak istediğim ise;
Lisans kontrol işlemleri uygulamada bulunan diğer 8-9 tane formda da yapılmasını istiyorum..Ozan hocamın örneğinde yanlış anlamadımsa sadece frm_lisans adlı formda kontrol yapılmakta..

Diğer formlarda da kontrol yaptırmak için neler yapmalıyım madde madde yazarsanız benim gibi amatörler için öğretici olacaktır.

İlginize şimdiden tşk ediyor öneri ve yardımlarınızı bekliyorum..

Saygılar..

Sayın mehami,

Bahsettiğiniz talebinize yönelik olarak,İlk etapta bir bilgilendirme yapılmış olması adına;
Öncelikle,bu bahsi yapıldığı üzere sıkı bir güvenlik yapmayı gerektirecek ya da geniş kapsamlı bir güvenliği yoğun olarak uygulama içeriğinde kullanmak isteği söz konusu ise,şu bir gerçek ki eğer işin içerisine art niyet girecekse,bu türde önlemler sadece geçici olmaktan öteye geçmiyor.bir şekilde mutlaka bu zihniyetten hareket ile uygulamanın gerek kodları ele geçirilebiliyor ve gerekse de istendiği takdirde uygulamanın işlerliğine veya kullanımına zarar verdirilebiliyor.

Kaldı ki,günümüzde dahi gerek önemli firmaların web sitelerinden tutun da piyasaya sürdükleri uygulamaların nasıl zarar gördürülebildiği de aşikar.

Elbette ki,bazı uygulama içi veya dışı olarak önlemlerin alınmak istenmesi bir nebze de olsa fayda getirdiği düşünülse de,hiçbir güvenlik önlemi tam bir rahatlık sağlamaktadır.

Burada,uygulamanın içeriği,özelliği,kullanılma yeri,değeri ve önemi gibi hususlara göre değişmekle birlikte,eğer sadece kullanım nedeni işlerin kolaylığına zemin oluşturmak ve bazı kayıt ya da bu kayıtların sorgulanması veya raporlanmasına verim sağlamak amacı ise;o zaman,buna neden bir art niyet gereksinimi doğsun sorusu ve bu soruya cevap aranması geçerli olmaktadır.

Bahsettiğiniz talebe dair,ilk akla gelebilecek şu olabilir;
Bu lisans kodu ya da onayı bilgisinin gerçekleştirildiğine dair ya ayrı bir tabloda ya da bir sorguda 1/0 değeri durumuna göre bir değer barındırılabilir.akabinde,her bir formun açılışında veya yüklenişinde geçerli olacak olay yordamında bu değerin kontrolü yaptırılmak sureti ile eğer 1 ise (olumlu ise) formlara giriş işlemlerinin yapılmasına izin verilebilir,değilse de aksi işlemler uygulatılabilir.

şimdilik paylaşılması uygun görülen açıklamalar bunlardır.sonrasında,gerek olduğu takdirde yeniden paylaşımlar yapılabilecektir.bilginize…iyi çalışmalar,saygılar.

Değerli atoz hocam ilginize çok tşk ederim..
Söylediklerinizde katiyen haklısınız Access ya da diğer program dillerinde %100 güvenlik diye bir durum sözkonusu değil..öyle olsaydı bugun crack yöntemleri ortaya çıkamazdı..

Benim ve benim gibi amatörlerin derdi,
yaptığımız ve yapmaya çalıştığımız uygulamaların %100 güvenliğini sağlamaya çalışmak değil,(zaten istesekte bunu yapamayız bu aşikar) bizim gibi yarı amatörlerin Bam diye programı lisanssız kullanımını engellemek..
Hani bir söz vardır eşşeğini sağlam kazığa bağla.......bunun misali biz alabileceğimiz önlemleri az-çok alalımda gerisi....Kabaca böyledir..Dinimizdeki yeri tevekküldür..Biz üzerimize düşeni yapalım gerisini Allah bilir,o kararlaştırmıştır..

Konumuza dönecek olursak;
Ozan hocamın uygulamasında kontrol sağlayan kodları olduğu gibi diğer formların arka planında çalışacak şekilde nasıl ayarlarız??

Bilen birisi aşama aşama izah ederse benim gibi amatörlere ışık tutmuş olacak..
Yardım ve önerilerinizi bekliyor,saygılar sunuyorum..

Not:Keşke ozan hocam kendi uygulamasına bu özelliğide eklemiş olsaydı..En az 3-5 formda lisans kontrol ettirme olayını yani..

Örnek kodu bilmiyorum ancak istediğiniz şeyi yapmak için sadece şunu kontrol edeceksiniz: "Lisanslımı değilmi nerede kontrol ediyor?"

Bu kontrolü diğer formlarda da yapacaksınız bu kadar basit.

Private Sub Form_Open(Cancel As Integer)







Dim CPU As String

Dim Kontrol As String



CPU = GetWmiDeviceSingleValue("Win32_Processor", "ProcessorID")

mtn_urunkimligi = CalculateMD5(CPU)

GCPU = CalculateMD5(mtn_urunkimligi)



Kontrol = Nz(DLookup("[Kimlik]", "tbl_lisans", "[lisanskodu]=" & "'" & GCPU & "'"), 0)



If Kontrol > 0 Then

DoCmd.Close acForm, "frm_lisans"

DoCmd.OpenForm "frm_kullanicigiris", acNormal, "", "", , acNormal

Else

DoCmd.GoToRecord acForm, "frm_lisans", acNewRec

End If



End Sub

Yazan kod bloğunda If Kontrol > 0 Then ile lisans kontrolü yapıyor. Eğer Kontrol değeri 1 den büyük ise lisanslı demek ve frm_kullanicigiris isimli formu açıyor. Eğer Kontrol > 0 değilse lisans penceresini açıyor. Bu kontrolü diğer formlarda da yapabilirsiniz.

Değerli alpeki diğer admin hocalarım;
Bu kod ile alpeki hocamın verdiği kod ile,diğer formlarda kontrolü nasıl sağlatacağımızla ilgili bir örnek verebilir misiniz??

Öneri ve yardımlarınızı bekliyor saygılar sunuyorum..