Demo yapmak

[ayhan2122]

Arkadaşlar, forumda aradım ama bulamadığım için sormak zorunda kaldım. Bir .mdb dosyasını demo haline getirmek mümkün müdür. Şöyle ki;

1-) Programdaki 'GG AYR' adlı tabloya en fazla 100 kayıt girilebilecek. Tablodaki BirincilAnahtar, OtomatikSayı alanı [HRK NO] alanıdır.

2-) Demo oluşturulduktan sonra programı yapan dahil hiç kimse açamayacak (geri düzeltemeyecek).

 

[mehmetdemiral]

Ayhan 2122.. Access'te demo yapmak kolay ama ikinci maddede bahsettiğin iş access'te pek olacak gibi değil.. Ama mde dosyası yapılırsa olabilir.

 

[simendifer]

demo yapmak mümkün

aşagıdaki kodla
Programınızın açılış formuna aşağıdaki kodları yapıştırın. Program 90 günlük siz istediğin rakamı yazabilirsiniz. İster 1 gün ister 10 gün.
NOT : Üretim Planlama yerine kendi programınızın ismini yazın.

Private Sub Form_Load()
On Local Error Resume Next
Dim d, x, y
d = GetSetting("Üretim Planlama", "Ayarlar", "Ilk Giris", "")
If d = "" Then
SaveSetting "Üretim Planlama", "Ayarlar", "Ilk Giris", Date
Else
If (Date - CDate(d)) > 90 Then
MsgBox ("Programin Demo Süresi dolmustur.Uzatmak Için E-Mail adresine Not mesaj atabilirsiniz")
DoCmd.Close
Else
x = GetSetting("Üretim Planlama", "Ayarlar", "Son Çikis Tarihi", "")
If CVDate(x) > Date Then
MsgBox ("Programin Deneme Süresi Doldu Lütfen Israr Etmeyin")
DoCmd.Close
Else
y = GetSetting("Üretim Planlama", "Ayarlar", "Son Çikis Saati", "")
If (CVDate(x) = Date) And (CVDate > Time) Then
MsgBox ("Programin Deneme Süresi Doldu Lütfen Israr Etmeyin")
DoCmd.Close
End If
End If
x = GetSetting("Üretim Planlama", "Ayarlar", "Sayi", "1")
MsgBox ("Programi" & x & ". defa çalistiriyorsunuz.")
SaveSetting "Üretim Planlama", "Ayarlar", "Sayi", x + 1
End If
End If
End Sub

Private Sub Form_Unload(Cancel As Integer)
SaveSetting "Üretim Planlama", "Ayarlar", "Son Çikis Tarihi", Date
SaveSetting "Üretim Planlama", "Ayarlar", "Son Çikis Saati", Time

End Sub


her açılışta birin ci ikinici diye sayar Programi" & x & ". defa çalistiriyorsunuz uyarısını verir ve belirlediğiniz günde kullanım Programin Deneme Süresi Doldu Lütfen Israr Etmeyin ikazı ile program kapanır açamazsınız kolay gelsin

 

[mraltin]

Verdiğiniz bilgiler için teşekkürler.
Peki kullanici programi satinalmak istersen ne yapicaz
yani ona bi serial filan versek devam edemez mi?
Ama verdiğimiz serial sadece 1 kere kullanilabilmeli yani o kişiye serial i verdiğimizde oda baskalarina dagitamasin diye

 

[alpeki99]

çok kolay bir konu. kendi yaptığım programda kullandığım kopya koruma sistemini bu akşam burada paylaşacağım onu incelersiniz.

 

[1Al2Ver]

Sn.Alpeki 99, merhaba, Filemaker9 Pro'yu okudum, ilginç bir programa benziyor, Filemaker'ı öğrenme adına, tarafınızdan tavsiye edilecekler ( Program versiyonu, Kitap, CD ve benzeri ) nelerdir, teşekkür ederim.

 

[alpeki99]

sevgili 1Al2Ver Türkiye'de Filemaker alanında birkaç otorite var. Bunlar içerisinden direk vatandaşla irtibat halinde olan kurs,ders,eğitim vs. veren tek yer www.filemakerx.com dur.

Bu kaynak dışında kitap,cd bulmanız çok çok çok zor. Çünkü diğer otoriteler sektörde yazılım firması olarak faaliyet göstermekte.

Filemaker ile uygulama geliştiren bir başka firma www.yordam.com dur. Zaten orada da göreceğiniz gibi Filemaker konusunda www.filemakerx.com a link vermiş durumdalar.

Filemaker hakkında her türlü sorunuza filemakerx.com da yanıt bulacaksınız. Ayrıca örnek video derslerde sitede var.

Filemaker için son haber THY nın da Filemaker'a geçiş halinde olduğunu hatırlatmak isterim.

 

[1Al2Ver]

sayın alpeki99, duyarlığınıza ve nezaketinize teşekkürler ederim, saygılarımla.

 

[karaayhan]

sayın alpeki99, baktım gece yarısı olmuş ama bahsettiğiniz örnek yok !
umarım unutmamışınızdır?

iyi geceler

 

[modalı]

Sayın karaayhan,

Örnekler diğer tarafta değil mi

http://www.excel.web.tr/showthread.php?t=41313


İyi çalışmalar