Excelde sınırlı kullanım

[rekkezum]

Merhaba arkadaşlar
Excelde sınırlı kullanım mümkünmüdür, yani belli bir zaman sonra excel dosyası
açılmasın ve uyarı versin..

 

[uzmanamele]

merhaba

bununla ilgili birkaç dosya sitede olacak, araştırınız.

 

[rekkezum]

hocam arastırdım ama lınk acmadı ve nasıl yapılacagını anlayamadım
yardımcı olabılırmısınız...

 

[uzmanamele]

hocam arastırdım ama lınk acmadı ve nasıl yapılacagını anlayamadım
yardımcı olabılırmısınız...

merhaba
bir modüle yazın ve tarihi değiştirerek deneyiniz.

Sub auto_open()
Dim süre As Date
süre = "01/10/2009"
If Date > süre Then
MsgBox ("by by!")
ActiveWorkbook.Close
End If
End Sub

not:
dosya açılırken makrolar etkinleştirilmezse işe yaramaz!

 

[rekkezum]

Hocam ilginiz için teşekkür ederim. Şöyle birşey yapmak mümkünmü, diyelim 25/08/2009 da kullanımı bitti, o gün programı açmaya çalıştığında program açılmayarak uyarı versin. "satıcınıza başvurun" gibi
bana başvurduklarında ben süreyi uzatabileyim.

 

[fedeal]

Demo uygulamasıyla ilgili 2 örnek hazırladım(Sayın Süleyman ÖZYÜKSEL'in kodlarındanda yararlanarak)
Birincisi 30 gün kullanım izinli makrolar etkinleştirilmezse sayfalar gizlendigi için sayfalara ulaşılamıyor.Tabi visualasicde şifrelense şifre kırmak çok zor değil genede fikir verebilir.
İkinciside aynı mantık 30 kullanım sınırlaması var.

30 gün ve 30 kullanım çalışmayı ilk kullanımdan sonra işlemeye başlıyor.Yani doğruluğunu kontrol için 30 gün beklemelisiniz yada 30 kere çalışmayı açıp kapatın şaka bir yana ben denedim.
Umarım faydalı olur.
Saygılar.

 

[rekkezum]

Hocam çok saolun emeğinize sağlık sizler deolmasanız....

 

[rekkezum]

Peki hocam süre doldu bana başvurdular ben bu süreyi nasıl uzatabilirim. Yani bu süreyi 30 veya 60 veya 90 güne nasıl yapabilirim

 

[fedeal]

İzin vererek 30 60 90 kullanıma göre dosyayı uyarladım.Ancak program demo yapmak başlı başına bir olay siz şifreyi verdiniz bir dahaki sefere 30 kullanım daha uzatmaması için şifre tek kullanımlık olmalı.Onuda hallederiz ancak excelle bu işlem sağlıklı olmaz kolaylıkla şifreler kırılır.Ben yinede çalışmayı ekliyorum(şifre tek kullanımlık değil)
30 günlük şifre için şifre : excel.web.tr-30
60nlük şifre için şifre : excel.web.tr-60
90ünlük şifre için şifre : excel.web.tr-90

bu işlem için kafayı yorup müsait bir zamanda geniş kapsamlı bir çözüm düşünürüz.

 

[fedeal]

Bu çalışmada elimden geldigince zorlaştırmaya çalıştım.Demo şifresi 1 kere işe yarıyor.

 

[rekkezum]

Hocam şöyle yapsak olurmu. Ben elimde bir adet şifreli bir adet şifresiz dosya bulundurayım....ama olmaz yinede 30 gün sonra bitecek... dur bakalım bişeyler daha düşünelim

 

[rekkezum]

bu arada avatarınız cok güzel bende aynısını kullansam kızarmısınız. banada gonderebılırmısınız avatarınızı?

 

[fedeal]

bu arada avatarınız cok güzel bende aynısını kullansam kızarmısınız. banada gonderebılırmısınız avatarınızı?

Tabi burdan indirebilirsiniz,

http://images.google.com.tr/images?hl=tr&um=1&q=atatürk&sa=N&start=180&ndsp=18