morika
پنج شنبه 27 مرداد 1390, 20:25 عصر
سلام
من یه usercontrol نوشتم dl. بعد این dll رو تویکی از برنامه هام با این کد لود می کنم
On Error Resume Next
Dim asm As System.Reflection.Assembly = System.Reflection.Assembly.LoadFile("C:\windows\system32\APconfig\APkernel32.dll")
Dim type As Type = asm.GetType("APkernel32.main", True, True)
Dim obj As Object = System.Activator.CreateInstance(type)
Dim control As System.Windows.Forms.Control = CType(obj, System.Windows.Forms.Control)
control.Location =
New System.Drawing.Point(0, 30)
control.BringToFront()
Me.Controls.Add(control)
من توی این پروژه که توش dll رو ساختم یک usercontrol دارم به نام main
تا حالا این dll درست کار می کرد و لود می شد ولی وقتی تو پروژه dll یه usercontrol دیگه به اسم update ساختم که می خواستم اونم تو یه فرم دیگه لود کنم دیدم که هیچ کدوم از این usercontrol ها دیگه کار نمی کنه. یعنی تا زمانی که یدونه usercontrol هست درست کار می کنه ولی وقتی usercontrolها میشن دوتا دیگه هیچکدوم لود نمیشه. البته برای کنترل دوم من این قسمت کد رو هم تغییر میدم:
Dim type As Type = asm.GetType("APkernel32.update", True, True)
ولی بازم درست نمیشه.
چیکار باید بکنم؟
ممنون
من یه usercontrol نوشتم dl. بعد این dll رو تویکی از برنامه هام با این کد لود می کنم
On Error Resume Next
Dim asm As System.Reflection.Assembly = System.Reflection.Assembly.LoadFile("C:\windows\system32\APconfig\APkernel32.dll")
Dim type As Type = asm.GetType("APkernel32.main", True, True)
Dim obj As Object = System.Activator.CreateInstance(type)
Dim control As System.Windows.Forms.Control = CType(obj, System.Windows.Forms.Control)
control.Location =
New System.Drawing.Point(0, 30)
control.BringToFront()
Me.Controls.Add(control)
من توی این پروژه که توش dll رو ساختم یک usercontrol دارم به نام main
تا حالا این dll درست کار می کرد و لود می شد ولی وقتی تو پروژه dll یه usercontrol دیگه به اسم update ساختم که می خواستم اونم تو یه فرم دیگه لود کنم دیدم که هیچ کدوم از این usercontrol ها دیگه کار نمی کنه. یعنی تا زمانی که یدونه usercontrol هست درست کار می کنه ولی وقتی usercontrolها میشن دوتا دیگه هیچکدوم لود نمیشه. البته برای کنترل دوم من این قسمت کد رو هم تغییر میدم:
Dim type As Type = asm.GetType("APkernel32.update", True, True)
ولی بازم درست نمیشه.
چیکار باید بکنم؟
ممنون