خارطة الموقع برنامج مبيعات ونقاط البيع وجرد المستودعات ومحاسبة الرئيسية من نحن اتصل بنا English
Yazsys.com
منذ عام 2012 - 2018
Skip Navigation Links
نظام إدارة المبيعات
|
تعليم & شروحاتExpand تعليم & شروحات
 
كود لجعل البرنامج نسخه تجريبيه
بواسطة مشرف ومهندس برمجيات
2015-07-28

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim GD As String
        Dim retvalue As Object
        retvalue = GetSetting("A", "0", "Runcount")
        GD = CStr(Val(retvalue) + 1)
        SaveSetting("A", "0", "RunCount", GD)
        If CDbl(GD) > 3 Then ' الرقم (3) يحدد عدد مرات التشغيل
            MsgBox("انتهت مدة تشغيل البرنامج ،،، قم بشراء النسخة الكاملة من المنتج")
            Me.Close()
        End If
    End Sub
End Class

 
 
إعلان ... لأصحاب المتجار فقط - برنامج تنفيذي وليس سورس كود
تحميل برنامج مبيعات وجرد المستودعات

 
 
الصفحة الرئيسية
اتصل بنا
نبذة عن هذا الموقع
خارطة الموقع
مشاريع برمجة متنوعة مفتوحة المصدر
مواضيع ودروس تعليمية
 
 
نظام YAZSYS لإدارة المبيعات