جزاء الله خيراً ولكن اريد تعديل بحيث يضع المستخدم كلمة سر لعمل البرنامج بشكل نهائي
ولكن المشكلة لا يختفي الفورم الاول ويظهر الفورم الثاني !!!
والمشكلة الثانية كل مره تظهر للمستخدم انتهت فتره استعمال البرنامج ع رغم انه وضع الباسورد الصحيح
يعني اريد ان الغي ايقونه انه انتهت عمليت استعمال البرنامج بمجرد المستخدم ان يضع الكملة السر الصحية ولا تظهر مره اخري
وشكراً
PHP كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
If My.Settings.SDate = Nothing Then
My.Settings.SDate = Now.Date
My.Settings.Save()
End If
Dim sdate As Date = My.Settings.SDate
Dim Ndate As Date = Now.Date
Dim Diff As Integer = DateDiff(DateInterval.Day, sdate, Ndate)
If Diff > 3 Then
MsgBox("عفواً انتهت الفتره التجريبيه للبرنامج برجاء الاتصال بالمبرمج")
Dim Response As String = "~"
While Response <> "Password here" And Response <> Nothing
Response = InputBox("The 3 day trial is up! Please enter a password to continue using this software!", "Trial")
End While
If Response = Nothing Then End 'A crude, but effective, way of forcing a close
Me.Hide()
Form2.Show()
Else
MsgBox("لقد مر علي استخدام البرنامج : " & Diff & " يوم ")
End If
End Sub
ولكن المشكلة لا يختفي الفورم الاول ويظهر الفورم الثاني !!!
والمشكلة الثانية كل مره تظهر للمستخدم انتهت فتره استعمال البرنامج ع رغم انه وضع الباسورد الصحيح
يعني اريد ان الغي ايقونه انه انتهت عمليت استعمال البرنامج بمجرد المستخدم ان يضع الكملة السر الصحية ولا تظهر مره اخري
وشكراً
