[Nbras]

السلام عليكم

عند تشغيل المشروع يظهر خطأ حيث قمت بالإستعانة بمكتبة 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

وشكراً

[Nbras]

لقد عمل المشروع، لكن لا يوجد أي صوت !

[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 Object, e As FormClosingEventArgs) Handles Me.FormClosing
        BassMOD.BASSMOD_MusicStop()
        BassMOD.BASSMOD_Free()
    End Sub
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        System.IO.File.WriteAllBytes("BassMOD.dll", My.Resources.BASSMOD)
        BassMOD.BASSMOD_Init(0, 44100, BASSInit.BASS_DEVICE_DEFAULT)
        BassMOD.BASSMOD_MusicLoad(My.Resources.Orion_Nero, 0, 0, BASSMusic.BASS_MUSIC_LOOP)

        BassMOD.BASSMOD_MusicPlay()

    End Sub

End Class 


[Nbras]

(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 Object, e As FormClosingEventArgs) Handles Me.FormClosing
        BassMOD.BASSMOD_MusicStop()
        BassMOD.BASSMOD_Free()
    End Sub
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        System.IO.File.WriteAllBytes("BassMOD.dll", My.Resources.BASSMOD)
        BassMOD.BASSMOD_Init(0, 44100, BASSInit.BASS_DEVICE_DEFAULT)
        BassMOD.BASSMOD_MusicLoad(My.Resources.Orion_Nero, 0, 0, BASSMusic.BASS_MUSIC_LOOP)

        BassMOD.BASSMOD_MusicPlay()

    End Sub

End Class 


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