Braeuchte ein Code uebersetzt! Verfasst am: 24.06.2008, 08:38
Hallo, braeuchte folgendes in Visual Basic.Net geschrieben. Im moment ist es Visual Basic Classic.
Dim options As String * 100 Options = Text1.Text & "#" & Text2.Text & "#" Open (App.Path & "Programm.exe") For Binary As #1 Put #1, LOF(1) + 1, options Close #1
Dim buffer as string Open (App.Path & "*zensiert*") For Binary As #1 Open (App.Path & "Programm.exe") For Binary As #2 Buffer = Space(LOF(1)) Get #1, , Buffer Put #2, , Buffer
Dim file as string, options as string * 100, cmd() as string file = (App.Path & "" & App.EXEName & “.exe”) Open file For Binary As #1 Get #1, (LOF(1) - 99), options cmd() = Split(options, "#") Close
tr4st Überflieger
Anmeldedatum: 16.04.2008 Beiträge: 486
Verfasst am: 24.06.2008, 10:26
Lerne die einzelnen Befehle kennen dann wirst du sie alleine umsetzen können.
Registrieren
Login
