|
| Autor |
Nachricht |
chaozz_
Tutorial Leser
Anmeldedatum: 28.08.2007
Beiträge: 31
|
Hex...
Verfasst am: 11.12.2007, 17:30 |
|
|
Könnte man theoretisch in vb.net einen Hexeditor coden, der mir wie bei einem professionellen (oder auch nicht...) die hexcodes gibt. Es reichen die Hexcodes.
Thx schon mal im Vorraus!
Mfg chaozz
spiderschwein, spiderschwein |
|
| |
|
 |
chaozz_
Tutorial Leser
Anmeldedatum: 28.08.2007
Beiträge: 31
|
Verfasst am: 14.01.2008, 14:19 |
|
|
*PUSH*
spiderschwein, spiderschwein |
|
| |
|
|
ZiG_
Überflieger
Anmeldedatum: 07.03.2007
Beiträge: 1248
|
Verfasst am: 14.01.2008, 16:11 |
|
|
Ja, warum sollte man das nicht können.
Ich code zwar nicht VB.Net, aber sowas kann man ja schon in VB6 lösen.
Einziges Problem bei VB6 ist die Geschwindigkeit. Aber das bekommt man auch in den Griff wenn man weiß wie.
Aber bei VB.Net sollte das eigentlich noch leichter sein.
Evt. gibts wie bei VB6 die Funktion "Hex()".
mfg
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde) |
|
| |
|
|
chaozz_
Tutorial Leser
Anmeldedatum: 28.08.2007
Beiträge: 31
|
Verfasst am: 14.01.2008, 16:13 |
|
|
Aber ich kapier die funktion für hex in vb6 ja schon nich 
außerdem ist mein Vb6 kaputt, wenn ich nen Button oder so auf die Form ziehe, dann "laggt" der button dabei...
Könnte mir jemand die Hex() funktion erklären?
spiderschwein, spiderschwein |
|
| |
|
|
Rausch_
Poster
Anmeldedatum: 03.11.2007
Beiträge: 164
|
Verfasst am: 14.01.2008, 16:20 |
|
|
hex() macht zumindest in vb6 das den hex wert den du eingibst als buchstabe rauskommt:
hex(12) gibt "C"
hex(1) gibt "1" |
|
| |
|
|
chaozz_
Tutorial Leser
Anmeldedatum: 28.08.2007
Beiträge: 31
|
Verfasst am: 14.01.2008, 16:32 |
|
|
Lol, wie bekomme ich aber jetzt die hex werte aus einer exe datei?
spiderschwein, spiderschwein |
|
| |
|
|
The-God-of-all_
Poster
Anmeldedatum: 20.05.2007
Beiträge: 170
Wohnort: App.Path
|
Verfasst am: 14.01.2008, 16:44 |
|
|
In dem du die Datei Zeichen für Zeichen einliest und dann jeweils mit Hex oder wie die Funktion in VB.net heißt in eine Hexadezimale Zahl verwandelst und dann in die Textbox einfügst...
Hier mal eine VB6 Funktion um einen Text in eine Hexadezimale Zeichenfolge umzuwandeln:
| Code: | Public Function TextToHex(ByRef Text As String) As String
Dim bytes() As Byte
Dim i As Long
Dim WritePos As Long
Dim UB As Integer
'Initialisierung:
TextToHex = Space$(LenB(Text))
bytes = StrConv(Text, vbFromUnicode)
'Bytes hexadezimal einpassen:
WritePos = 1
UB = UBound(bytes)
For i = LBound(bytes) To UB
Mid$(TextToHex, WritePos) = ByteToHex(bytes(i))
WritePos = WritePos + 2
Next i
End Function
Private Function ByteToHex(ByVal n As Byte) As String
If n And &HF0 Then
'Hex$(n) ist bereits 2-stellig:
ByteToHex = Hex$(n)
Else
'Hex$(n) ist 1-stellig, also 0 davorsetzen:
ByteToHex = "0" & Hex$(n)
End If
End Function |
Und noch eine VB6 Funktion um Hexadezimale Zeichen Ketten zurück umzuwandeln:
| Code: | Public Function HexToText(ByVal Hexa As String) As String
Dim i As Integer
Dim LengthHexa As Integer
LengthHexa = Len(Hexa)
If LengthHexa Mod 2 <> 0 Then Exit Function
For i = 1 To LengthHexa Step 2
HexToText = HexToText & Chr$(Val("&H" & Mid$(Hexa, i, 2)))
Next i
End Function |
Die Funktionen lassen sich sicherlich recht leicht in VB.net konvertieren. |
|
| |
|
|
ZiG_
Überflieger
Anmeldedatum: 07.03.2007
Beiträge: 1248
|
Verfasst am: 14.01.2008, 16:45 |
|
|
Datei einlesen und jedes Zeichen in Dezimal (Ascii Wert) und dann in Hex konvertieren.
k, zu spät gesehen^^
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde) |
|
| |
|
|
chaozz_
Tutorial Leser
Anmeldedatum: 28.08.2007
Beiträge: 31
|
Verfasst am: 14.01.2008, 16:58 |
|
|
So, thx, wenn mir noch jemand bei meinem Vb6 Prob geholfen hat, kann ich anfangen...
Prob gibbet hier...
spiderschwein, spiderschwein |
|
| |
|
|
Registrieren
Login
