1 ضمیمه
نقل قول: فراخوانی Dll از Resource
فیلم زیر را در یوتوب دیدم و کد زیر را اعمال کردم و با خطای داخل عکس پیوست مواجه شدم :
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
1 ضمیمه
نقل قول: فراخوانی Dll از Resource
فیلم دیگری هم با آدرس زیر موجود است که کد زیر را پیشنهاد میکند و با پارامتر ناشناس داخل تصویر پیوست روبرو میشوم
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