كيف أحمي مكتبة الربط dll ?

يمكنك تجريب الطريقة التالية (رغم أنها بدائية) :

Public Class MyOwnClass
    Private IsPassTrue As Boolean
    Public PassWord As String
    Public X, Y As Integer
    Public Sub New(ByVal Pass As String)
        If Pass <> PassWord Then
            IsPassTrue = False
        End If
    End Sub
    Public Function calc() As Integer
        If IsPassTrue = False Then Exit Function
        Return (X + Y)
    End Function
    Protected Overrides Sub Finalize()
        MyBase.Finalize()
    End Sub
End Class

لا أدري إن كانت هذه إجابة للسائل، لكن أضف تطوير بسيط لإجابة أخي Crazy،

Public Class MyOwnClass
   Public PassWord As String
   Public X, Y As Integer
   Public Sub New(ByVal Pass As String)
       If Pass <> PassWord Then
           Throw New SecurityException("Wrong Password") ' أو شيء من هذا القبيل
       End If
   End Sub
   Public Function calc() As Integer
        Return (X + Y)
   End Function
   Protected Overrides Sub Finalize()
       MyBase.Finalize()
   End Sub
End Class

بهذا لن يتمكن أحد من صنع شيء من هذه الفئة! لأن الصانع سيرمي خطأ لو الكلمة ليست صحيحة!!

شكري الكبير لاخوتي

كرازي مان

ابو مازن

شكرا لكم على المرور والرد

وهذا مااريد

ونسيت ان اذكر ان لدي دي ال ال تتضمن ادوات حيث Sub New سينفذ اثناء وضع الاداة اي

(ديزاين تايم) وليس (رن تايم)

ولاينفع وضع كود الحماية في New

فاذا كان في اجراء مستقل .... فكيف ذلك؟

رأيت ملفات دي ال ال لااستطيع حتى عمل (ريفرانس) لها

مع تكرار شكري الجزيل لكم

توجد طرق غيرها.. لكن هل لك أن تشرح عن فئاتك وماذا تفعل وكيف تستدعى؟

لدي dll تحوي UserControl الة حاسبة

اقوم باضافتها الى النموذج بعد عمل ( اد رفرانس) او (أد\ريموف إتمس) ل dll

سوف ترفق ال dll مع الملف التفيذي

هذا غير مهم

ولكن اذا اردت بيع مثل هذه الاداة فاني اريد حمايتها

لكي تطلب كلمة المرور عند اضافتها الى المشروع

وياليتني اعرف اعملها مثل تسجيل (regwiz.msm)

التابع لكرستال ريبورت

ومشكور اخي ابو مازن عالمتابعة

الرقم السري يكسر.

عموما، كيف تضيف الآلة إلى المشروع؟ هل لك أن تضع الشفرة التي تستعملها في ذلك؟؟ AddAll وغيرها...