Replace bytes

[EDN Admin]

I want replace all hex B580FEFFFF8D4580 to 75889090908D4588 Dim fs As New IO.FileStream(fb.SelectedPath & "App.exe", FileMode.Open, FileAccess.ReadWrite)
Dim strHex As String = "75889090908D4588"

If strHex = "B580FEFFFF8D4580" Then
For j As Integer = 0 To strHex.Length - 1 Step 2
fs.ReadByte(CByte(Conversion.Val("&H" & strHex.Substring(j, 2))))
Next
fs.Close()
fs.Dispose()What is wrong?

View the full article