View Full Version : سوال: فراخوانی Dll از Resource
  
saeidmobashery
پنج شنبه 17 اسفند 1402, 16:37 عصر
سلام بر اساتید گرامی
بنده فایل DLL را به ریسورس اضافه کردم ، پیش از اضافه کردن با نوشتن عبارت Imports Ionic.Zip در ابتدای کلاس میتوانستم در محتوای کلاس از آن استفاده کنم ولی اکنون که به ریسورس اضافه شده نمیدانم به چه صورتی در کلاس از آن استفاده کنم
سپاس از راهنمایی دوستان گرانقدر
saeidmobashery
پنج شنبه 17 اسفند 1402, 23:07 عصر
فیلم زیر را در یوتوب دیدم و کد زیر را اعمال کردم و با خطای داخل عکس پیوست مواجه شدم :
https://youtu.be/a57wDNFZgMg?si=Q7kdypXNV-LB1jeF
Partial Friend Class MyApplication
    Private WithEvents CurrentDomain As AppDomain = AppDomain.CurrentDomain
    Private Function DomainCheck(sender As Object, args As System.ResolveEventArgs) Handles CurrentDomain.AssemblyResolve
        Using Stream As IO.Stream = System.Reflection.Assembly.GetExecutingAssembly(). GetManifestResourceStream _
            (GetType(WinData_Form).Namespace + ".Ionic.Zip")
            Dim assemblydata As Byte() = New Byte(Stream.Length - 1) {}
            Stream.Read(assemblydata, 0, assemblydata.Length)
            Return System.Reflection.Assembly.Load(assemblydata)
        End Using
    End Function
End Class
155491
saeidmobashery
پنج شنبه 17 اسفند 1402, 23:11 عصر
فیلم دیگری هم با آدرس زیر موجود است که کد زیر را پیشنهاد میکند و با پارامتر ناشناس داخل تصویر پیوست روبرو میشوم
https://youtu.be/fYgJMRLTc1A?si=RsVCekcAdnmEpGZz
Private WithEvents Domain As AppDomain = AppDomain.CurrentDomain
Private Function DomainCheck(sender As Object, e As System.ResolveEventArgs) As System.Reflection.Assembly Handles Domain.AssemblyResolve
    If e.Name.Contains("Ionic.Zip") Then
        Return System.Reflection.Assembly.Load(My.Resources.Shift TechControl)
    Else
        Return Nothing
    End If
End Function
155489
 
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.