PDA

View Full Version : سوال: فراخوانی Dll از Resource



saeidmobashery
پنج شنبه 17 اسفند 1402, 15:37 عصر
سلام بر اساتید گرامی

بنده فایل DLL را به ریسورس اضافه کردم ، پیش از اضافه کردن با نوشتن عبارت Imports Ionic.Zip در ابتدای کلاس می‌توانستم در محتوای کلاس از آن استفاده کنم ولی اکنون که به ریسورس اضافه شده نمی‌دانم به چه صورتی در کلاس از آن استفاده کنم

سپاس از راهنمایی دوستان گرانقدر

saeidmobashery
پنج شنبه 17 اسفند 1402, 22: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, 22: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