منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : خطأ عند تشغيل المشروع مع مكتبة DLL
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

عند تشغيل المشروع يظهر خطأ حيث قمت بالإستعانة بمكتبة BassMOD.Net.dll
حاولت بعددة طريق ولم أنجح بحل الخطأ مثل تشغيل كمسؤول

رسالة الخطأ:
System.BadImageFormatException: 'An attempt was made to load a program with an incorrect format.
(Exception from HRESULT: 0x8007000B)'


كما ما هو واضح في الصورة



لا أعرف ما هو السبب مع أني كاتب "code" بالشكل الصحيح ، كيف استطيع حلها !


رابط فيديو يشرح نفس المشروع
https://www.youtube.com/watch?v=QBZowzrAiuo



رابط تحميل المشروع مفتوح المصدر
https://up.top4top.net/downloadf-65674vee1-zip.html


وشكراً
لقد عمل المشروع، لكن لا يوجد أي صوت !
< Pjoject > WindowsApplication1 Properties
 < Compile > Advanced Compile Options
 Target CPU: x86


BassMOD.BASSMOD_MusicPlay
PHP كود :
Imports System.IO
Imports Un4seen
.BassMOD
Public Class Form1
    Private Sub Form1_FormClosing
(sender As ObjectAs FormClosingEventArgsHandles Me.FormClosing
        BassMOD
.BASSMOD_MusicStop()
 
       BassMOD.BASSMOD_Free()
 
   End Sub
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        System
.IO.File.WriteAllBytes("BassMOD.dll"My.Resources.BASSMOD)
 
       BassMOD.BASSMOD_Init(044100BASSInit.BASS_DEVICE_DEFAULT)
 
       BassMOD.BASSMOD_MusicLoad(My.Resources.Orion_Nero00BASSMusic.BASS_MUSIC_LOOP)

 
       BassMOD.BASSMOD_MusicPlay()

 
   End Sub

End 
Class 
(20-10-17, 10:50 AM)a.ahmed كتب : [ -> ]< Pjoject > WindowsApplication1 Properties
 < Compile > Advanced Compile Options
 Target CPU: x86


BassMOD.BASSMOD_MusicPlay
PHP كود :
Imports System.IO
Imports Un4seen
.BassMOD
Public Class Form1
    Private Sub Form1_FormClosing
(sender As ObjectAs FormClosingEventArgsHandles Me.FormClosing
        BassMOD
.BASSMOD_MusicStop()
 
       BassMOD.BASSMOD_Free()
 
   End Sub
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        System
.IO.File.WriteAllBytes("BassMOD.dll"My.Resources.BASSMOD)
 
       BassMOD.BASSMOD_Init(044100BASSInit.BASS_DEVICE_DEFAULT)
 
       BassMOD.BASSMOD_MusicLoad(My.Resources.Orion_Nero00BASSMusic.BASS_MUSIC_LOOP)

 
       BassMOD.BASSMOD_MusicPlay()

 
   End Sub

End 
Class 
شكراً لك، أحلى تقييم و شكر Heart