VB.NET錯誤：0x8007000B（壞圖像格式除外）

Question

__declspec(dllexport) void __cdecl memcopy(void *pDst, const void *pSrc, unsigned int nSize) {    __asm { 
        mov esi, pSrc 
        mov edi, pDst 
        mov ecx, nSize $L1: 
        movq mm7, [esi] 
        add esi, 8 
        movq [edi], mm7 
        add edi, 8 
        dec ecx 
        jne $L1    }; } 

從CopyBlit8x8.dll

我成功導入這個.dll成C++控制檯應用程序和複製一個字符串的「Hello World」這是代碼char * a，char * b。然後迴應b成功地顯示'Hello World'。

然後，因爲這是一個通用的內存拷貝例程，它接受兩個指針來執行拷貝，我在下面做了這個;

畫面基本上是說有關文章標題〜壞圖像格式異常。錯誤代碼：0x8007000B。

這是一個通用的錯誤，只有很少的信息，因爲它適用於各種場景。但是，我可以放心地假設，它與指針有關。

我想要的是一個快速的ASM模塊來執行通用內存拷貝，但對於vb.NET圖像。

任何提示，堆棧溢出！

Answer 1

當您嘗試加載程序集或dll時編譯的應用程序位數不同時，會引發A BadImageFormatException。例如，如果您嘗試在64位應用程序中加載32位dll（反之亦然）。

確保dll編譯的位數與應用程序相同。如果應用程序被編譯爲AnyCPU然後要麼迫使它是x86或x64，或編譯使用每個位數兩個DLL，然後導入每個功能（但有不同的名稱），並調用檢查後Environment.Is64BitProcess property正確的。

這是AnyCPU溶液的一個例子：

'32-bit dll 
<DllImport("CopyBlit8x8.dll")> _ 
Public Shared Function memcopy(<insert parameters here>) 
End Function 

'64-bit dll 
<DllImport("CopyBlit8x8_x64.dll")> _ 
Public Shared Function memcopy64(<insert parameters here>) 
End Function 

Public Sub DoStuff() 
    If Environment.Is64BitProcess = True Then 
     memcopy64(...) 'Call 64-bit dll 
    Else 
     memcopy(...) 'Call 32-bit dll 
    End If 
End Sub 

---

編輯：

根據漢斯帕桑特，ASM MMX指令不能在64使用，所以我的解決辦法以上不適合你。但是我將它留在那裏，因爲它適用於使用本機C/C++代碼編譯的DLL。

Answer 2

代碼：選擇上述所有

__declspec(dllexport) int __cdecl testApp(long *dst, long *src) 
{ 

    __asm { 
     mov eax, src 
     mov dst, eax 
    }; 

    return *dst; 
} 

此代碼是工作拷貝操作。

代碼：選擇所有

Option Explicit On 
Imports System.Runtime.InteropServices 
Imports System.Text 
Imports wow64 

Public Class Form1 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 


     Dim bm As New Bitmap("1.png") 
     Dim bm2 As New Bitmap(640, 400) 

     Dim sb As New StringBuilder 
     sb.Append("Helo World.") 

     Dim src() As Byte = ASCIIEncoding.ASCII.GetBytes("Hello") 
     Dim dst() As Byte = ASCIIEncoding.ASCII.GetBytes("World") 

     Dim a As IntPtr = Marshal.AllocHGlobal(10) 
     Dim o As IntPtr = Marshal.AllocHGlobal(10) 
     Dim i() As Integer = {2, 1} 
     Marshal.Copy(i, 0, o, 2) 
     a = (wow64.movq.testApp(a, o)) 
     Button1.Text = ASCIIEncoding.ASCII.GetChars(src) 
     TextBox1.Text = Marshal.ReadIntPtr(a, 4).ToString 
     Marshal.FreeHGlobal(a) 
     'Marshal.FreeHGlobal(o) 


    End Sub 
End Class 
Namespace wow64 
    Public Class movq 

     <DllImport("D:\CopyBlit8x8.dll", CallingConvention:=CallingConvention.Cdecl)> Public Shared Sub memcopy(ByRef pDsc As StringBuilder, ByRef pSrc As StringBuilder, ByVal nSize As Integer) 

     End Sub 
     <DllImport("D:\CopyBlit8x8.dll", CallingConvention:=CallingConvention.Cdecl)> Public Shared Function myPuts(ByRef str As StringBuilder) As Integer 

     End Function 
     <DllImport("D:\CopyBlit8x8.dll", CallingConvention:=CallingConvention.Cdecl)> Public Shared Function testApp(ByRef i As Long, ByRef p As Long) As Integer 

     End Function 

    End Class 
End Namespace 

此代碼是在VB.NET中實現複製操作。

代碼：選擇所有

TextBox1.Text = Marshal.ReadIntPtr(a, 4).ToString 

這名帥日常使用4 ^增量通過數組來讀取。

很簡單，呃？