Demo yapman daha mantıklı olur süre kısıtlamalı değlde 1-2 kod eksik halini sunsan daha iyi olur diye düşünüyorum... Bunları kırmak 3 ila 5 dakikanı almaz çünkü... En mantıklısı kısıtlı program yöntemi

tarih kaydını kaydedip kontrol ettirmen doğru.. ama yol yanlış bence. mantığı doğru tamam ama sen bu şekilde al kardeşim database burda gir bi aç tarihi değiştir istediğin kadar kullan demiş oluyosun. yüzlerce liralık programların bile kırıldığı günümüzde emin ol bu tür bi programı çıkarttığın dakika kırarlar bence database kullanmak yerine işletim sisteminde iz bırakıcı, hem kayıt defterinden hem sistem dosyalarından yararlanarak kompleks bişeyler üzerinde çalışmalısın. üstelik bunlarda da bıraktığın izler direk tarih değil şifreli metinler olmalı ki bulunsa bile kırılması zorlaşsın. sonuç olarak düşüncen, uygulaman doğru ama günümüz şartlarında geçersiz

End End If Label1. Caption = Date End Sub PROJE: .html Yaptığım işlem doğrumu yanlışmı sadece bir açıklık getirmenizi istiyorum. Bu işlem doğrumudur yoksa farklı bir çözüm olabilirmi. Teşekkürler.

Kod: Private Sub Command1_Click Text2. text = Text1. text Adodc1. Recordset. Fields = Text2. Text Adodc1. Recordset. Update End Sub Private Sub Form_Load Text1. Text = Date + 10 End Sub Private Sub Timer1_Timer If Label1. caption = Text2. text Then MsgBox "bu programın kullanım süresi dolmuştur" Close

End End If Label1. Caption = Date End Sub böyle dene bide You must log in or register to reply here. Alakalı Olabilecek Konular I Vb6 Msflexgrİd nesnesine Txt dosyasını okutma Hk. ikayserili 11 Şubat 2021 Yanıt 0 Gösterim 2K 11 Şubat 2021 ikayserili I Forum Programlama Visual Basic Bize Ulaşın Forum Kuralları Gizlilik Sözleşmesi Yardım Ana Sayfa RSS bafra oto ekspertiz, Tiktokbegeni.com, erkek cüzdan, eskişehir haber, çelik ranza, hasta yatağı kiralama, bonus veren siteler, ankara oto ekspertiz, istanbul oto ekspertiz, eskişehir oto ekspertiz, çorum oto ekspertiz, geobonus. org, deneme bonusu, bonusportali.com, vbet giriş, Pokerklas, Caddebet, megapari giriş, meritking giriş, meritking, kingroyal giriş, bahis siteleri, betwinner, rokubet giriş, deneme bonusu veren siteler, takipçi satın al, deneme bonusu veren siteler, betnano giriş, elektronik sigara, deneme bonusu veren siteler, replika saat, melbet giriş, smok, deneme bonusu, bahis forum, melbet, izmit oto ekspertiz, poppers turkiye, eskişehir oto ekspertiz, dalyan otel, hack forum, melbet, sohbet numaraları Wardom. Org Bilginin Adresi. 1998'den beri Wardom yayında! Wardom Türkiye'nin en eski forum sitelerinden biri olarak günümüz web sitelerine sponsor linkler yayınlanmaktadır. ataşehir escort maltepe escort pendik escort gaziantep rus escort xxx videos erotik film izle istanbul escort ankara escort istanbul escort gaziantep escort gaziantep escort Paylaşım sitemizde 5651/8 ve 125. madellere göre, tüm üyeler ve ziyaretçiler sitenin kullanımı ve yapılan paylaşımlarından kendileri sorumludur. Şikayetleriniz için bize ulaşabilirsiniz. Tüm hakları saklıdır 2015 Wardom. Org bilginin adresi. Forum ve bilgisayar güvenliği sitesi. var sc_project=2030864;var sc_invisible=1;var sc_security="c6df530c"; Üst <div class="tooltip-content-inner"> <div class="reactTooltip"> <a href="#" class="reaction reaction--1" data-reaction-id="1"><i aria-hidden="true"></i><img src="data:image/gif;base64, R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7" class="reaction-sprite js-reaction" alt="Like" title="Like" data-xf-init="tooltip" data-extra-class="tooltip--basic tooltip--noninteractive" /></a> <a href="#" class="reaction reaction--2" data-reaction-id="2"><i aria-hidden="true"></i><img src="data:image/gif;base64, R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7" class="reaction-sprite js-reaction" alt="Love" title="Love" data-xf-init="tooltip" data-extra-class="tooltip--basic tooltip--noninteractive" /></a> <a href="#" class="reaction reaction--3" data-reaction-id="3"><i aria-hidden="true"></i><img src="data:image/gif;base64, R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7" class="reaction-sprite js-reaction" alt="Haha" title="Haha" data-xf-init="tooltip" data-extra-class="tooltip--basic tooltip--noninteractive" /></a> <a href="#" class="reaction reaction--4" data-reaction-id="4"><i aria-hidden="true"></i><img src="data:image/gif;base64, R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7" class="reaction-sprite js-reaction" alt="Wow" title="Wow" data-xf-init="tooltip" data-extra-class="tooltip--basic tooltip--noninteractive" /></a> <a href="#" class="reaction reaction--5" data-reaction-id="5"><i aria-hidden="true"></i><img src="data:image/gif;base64, R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7" class="reaction-sprite js-reaction" alt="Sad" title="Sad" data-xf-init="tooltip" data-extra-class="tooltip--basic tooltip--noninteractive" /></a> <a href="#" class="reaction reaction--6" data-reaction-id="6"><i aria-hidden="true"></i><img src="data:image/gif;base64, R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7" class="reaction-sprite js-reaction" alt="Angry" title="Angry" data-xf-init="tooltip" data-extra-class="tooltip--basic tooltip--noninteractive" /></a> </div> </div> { "@context": "https://schema.org", "@type": "DiscussionForumPosting", "@id": "https:\/\/www.wardom.org\/threads\/yardim-shareware-kullanimsure-kistlamali.298985\/", "headline": " Shareware KullanımSüre Kıstlamalı", "articleBody": "Private Sub Command1_Click \r\nText2 = Text1\r\nAdodc1. Recordset. Fields = Text2. Text\r\nAdodc1. Recordset. Update\r\nEnd Sub\r\n\r\nPrivate Sub Form_Load \r\nText1. Text = Date + 10\r\nEnd Sub\r\n\r\nPrivate Sub Timer1_Timer \r\nIf Label1 = Text2 Then\r\nMsgBox \"bu programın kullanım süresi dolmuştur\"\r\nClose

anladım. Evet demo bir iki kod eksiklik daha iyi olur ama böle olsa göze hoş gelebilirdi neyse

Kod: Private Sub Command1_Click Text2 = Text1 Adodc1. Recordset. Fields = Text2. Text Adodc1. Recordset. Update End Sub Private Sub Form_Load Text1. Text = Date + 10 End Sub Private Sub Timer1_Timer If Label1 = Text2 Then MsgBox "bu programın kullanım süresi dolmuştur" Close

Kod: Option Explicit Private Sub Form_Load Dim kbel As String kbel = GetSetting("sınır", "sınırla", "kbel", 0) If kbel >= 5 Then 'Burdaki 5 rakamını isterseniz yükseltebilirsiniz bu rakam programın kaç kere çalışacağını belirtiyor. SaveSetting "sınır", "sınırla", "kbel", 111111 MsgBox "Programın kullanım süresi bitti", vbOKOnly, "Uyarı'" Unload Me End Else kbel = kbel + 1 SaveSetting "sınır", "sınırla", "kbel", kbel Label1. Caption = kbel End If End Sub Buda başka bir yöntem Aslında aynısı ama labellisi Ama dandik bir yöntem sen en iyisi demo yap Edit : Aslında binbir çeşit yöntem bulabilirsin. Mesela timer yardımıyla programı en fazla birkaç dakika görüntülenmesini sağlayabilirsin Amatörce ama işe yarar -