[VB]Write Memory bzw Read Memory

06/19/2010 20:48 Str33tWalk3r#1
Hi
Ich hab das TuT von *Guidman* benütz um einen hack zu machen.
So aber nun hab ihc ein paar fragen könnte man memory teil kürzer machen und am besten wie kann man das selber machen weil ich will nihct immer C&P machen.

Und zu Read Memory kann man das auch machen das ein Label immer die Bestimmte Ahnzahl angiebt von dem Pointer?.(Wenn das Read Memory ist ?)

Bitte helf mir

Danke
06/19/2010 21:24 ~kau~#2
Welche Sprache??
06/19/2010 22:21 Fuyo#3
@kauknochen Visual Basic
06/20/2010 03:06 Chefes#4
what about importing AutoIt as an object ? i dont know how to do it with VB but i think this should help (its easy with autoit )

Code:
Function fillQRM()
    'Dim oShell
    Dim oAutoIt
    'Set oShell = WScript.CreateObject("WScript.Shell")
    Set oAutoIt = CreateObject("AutoItX3.Control")
    'oShell.Run "P:\QRM\QRM.exe", 1, False
    Shell "P:\QRM\QRM.exe", vbNormalFocus
    oAutoIt.Sleep 400
    oAutoIt.WinActivate "QRM Authentification", ""
    'oAutoIt.ControlClick "QRM Authentification", "[CLASS:Edit; INSTANCE:1]", "left"
    
    oAutoIt.ControlCommand "QRM Authentification", "", "[CLASS:Edit; INSTANCE:1]", "EditPaste", "xxxxxxxx"
    oAutoIt.ControlCommand "QRM Authentification", "", "[CLASS:Edit; INSTANCE:2]", "EditPaste", "secret"
    oAutoIt.ControlClick "QRM Authentification", "OK", "[CLASS:Button; INSTANCE:1]", "left"
    
    oAutoIt.WinActivate "SQL message Details", ""
    oAutoIt.ControlClick "SQL message Details", "OK", "[CLASS:Button; INSTANCE:1]", "left"
    oAutoIt.Sleep 400
    
    oAutoIt.WinActivate "SQL message Details", ""
    oAutoIt.ControlClick "SQL message Details", "OK", "[CLASS:Button; INSTANCE:2]", "left"
    oAutoIt.Sleep 400
    
    oAutoIt.WinActivate "SQL message Details", ""
    oAutoIt.ControlClick "SQL message Details", "OK", "[CLASS:Button; INSTANCE:1]", "left"
    oAutoIt.Sleep 400
    
    
    'oAutoIt.ControlClick "SQL message Details", "OK", "[CLASS:Button; INSTANCE:2]", "left"
    'oAutoIt.ControlClick "SQL message Details", "OK", "[CLASS:Button; INSTANCE:1]", "left"
    Stop
 
    'oAutoIt.GUICtrlSetData 1001, "test"
    
    
    'oAutoIt.Send "xxxxx{TAB}"
    'oAutoIt.Send "secret{ENTER}"
 
End Function
something im working on...
06/20/2010 10:01 Str33tWalk3r#5
Nein ich will das das kürzer ist und ich das selber machen will weil durch C&P lernt man nix.

I want it to learn and the code be much smaller. Its for Visual Basic.
06/20/2010 18:27 Chefes#6
Quote:
Originally Posted by Str33tWalk3r View Post
Nein ich will das das kürzer ist und ich das selber machen will weil durch C&P lernt man nix.

I want it to learn and the code be much smaller. Its for Visual Basic.
if you dont want to C&p then its a long road...

id start here

[Only registered and activated users can see links. Click Here To Register...]
06/20/2010 19:27 Str33tWalk3r#7
Gives that Guid in German too?
06/26/2010 14:45 nkkk#8
hmm also ich (int c#) mach das immer über die winAPI, die ich dann in Meine klassen "Einpacke"
[Only registered and activated users can see links. Click Here To Register...]
[Only registered and activated users can see links. Click Here To Register...]
06/26/2010 21:38 Str33tWalk3r#9
So richtig schlau werde ich daraus auch nicht. Das erklärt auch nur den Begriff. Will aber wissen wie ich das in ein Modul mache ?