mitm olly kannste das auch mach .... geht ähnlich wie beim MUPing ... dann kommst du an die code im klartext.
den schnippelst du aus und compilierst dann inkl. deiner modifikationen neu.
Beiträge von WhiteLion
-
-
Ein VPN in AutoIt wird nicht möglich sein. Dazu müssen im System Treiber veranktert werden und ein effizientes Streaming ist nötig. AutoIt ist für beide Aufgaben nicht geeignet. Zum einen ist es zu langsam, zum anderen gibt es in AutoIt nicht die Möglichkeit, die nötigen Treiber zu erstellen.
klingt logisch ... stellt sich mir die frage ob es denn nicht die möglichkeit gibt das ganze in autoit zu realisieren, wenn man auf fertige dll´s/komponenten zurückgreift. leider bin ich da nicht so bewandert und bräuchte deshalb unterstützung ...
EDIT: wichtige wäre halt das man alles im autoit tool integriert (fileinstall) wäre oder man zumindest ein nutzerfreundliches interface in autoit bastelt
-
na ja, diese aussage könntest du bei 80% der veröffentlichen tools und scripte jedem entgegenschmettern... das gibts doch schon als freeware x oder y ... warum nimmste das denn nicht und programmierst es nach... irgendwie paradox oder ?
EDIT: wenn der sourcecode von open VPN in autoit geschrieben wäre , würde es mir sogar was nutzen und ich könnte ihn in meine programme einbinden
-
ich frage mich ob es möglich ist eine VPN netzwerk verbindung mit mehreren clients aufzubauen!?
also sowas wie hamachi oder tunngle nur natürlich den core ... ich habe ein beispiel von/für XP gefunden das aber offensichtlich auf fremdsoftware basiert ... jedenfalls hab ich sie nicht verstanden... ich suche jedenfalls ne möglichkeit mehrere clients in einem netzwerk zu verbinden per VPN. - gibts das was ? -
grundsätzlich mag ich solche tools... allerdings solltest du mal überlegen ob du das hier nicht mal quelloffen machst, denn das teil geht bei mir gar nicht und so viel source kann es ja wohl nciht sein. es freezt den ganzen rechner für 2-3 sekunden in 5 sekundenabständen....
-
aha, einfach vor dem listviiew... ich dachte schon da gibts was besonderes zu beachten thx!
-
mein listview bzw der inhalt ist ein bisschen groß für meine GUI... gibt es eine möglichkeit dem liestview eine schriftgröße zu zuweisen ?
-
das ganze so zu verwenden darauf bin ich noch gar nicht gekommen ... naja, nun ist es zu spät, aber gute idee fürs nächste mal
der link von fabian hat geholfen, allerdings ist in der udf auf seite eins noch ein regex fehler bei _inireadex ... den konnte ich allerdings lösen.
danke für die antworten jungs!
-
hallo leute, ich nutze eine ini datei mit einem wert der 380kb groß ist...
...dieser wird dann in ein listview eingtragen und ist editierbar. und wird dann wieder zurückgeschrieben ...
na ja, auf jeden fall hat das alles noch toll geklappt als die datei < 65kb war. jetzt fehlt der überhang
ich hab schon versucht das ganze aufzusplitten in verschiedene werte: commands0=, commands1=..aso
das geht auch, allerdings besteht das problem jetzt darin, dass der user auch die befehle editieren kann...
wenn ich jetzt also das listview schreibe, dann weiss ich nicht wie ich das am besten splitten soll was ja sein müsste ...wie würdet ihr das problem lösen ?
-
ich verwende gerade eine udf um die tab-farbe zu verändern. ( Eigenes Tab-Register (OwnTab-UDF) )
funktioniert ja auch, nur möchte ich diese farbe immer gleich mit dem setzen, was auch default hintergrundfarbe von meiner
GUI ist ... und die hängt ja (so weit ich weiss) vom verwendeten windows-farbschema ab.(?)
deshalb die frage: wie bekomme ich den (default)farbwert meiner gui raus ? -
-
-
das sind sicher formate von datenbanken... musst mal gucken ob du diese dateinen auslesen kannst... und nummernzusortierung wird evtl auch in einer datenbank gespeichert werden ... ansonsten kannst du ja mal versuchen mit einem debugger zu schauen oder google nach dem datei/daatenbankenformat...
-
$Button_7 = GUICtrlCreateButton( 'Beep frequenz 3500' , 20, 250, -3)
schau dir dir hilfe an zu ---> GUICtrlCreateButton <--- ( 'Beep frequenz 3500' , 20, 250, -3) was meinst du wohl was die parameter bedeuten ????parameter -> 250 ist die y koordinate wo der knopf seine position hat ! was soll denn die -3 da ? -
warum nicht gleich 6 ?
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]GUICreate("My GUI Button")
[/autoit] [autoit][/autoit] [autoit];~ Opt("GUICoordMode", 3)
[/autoit] [autoit][/autoit] [autoit]
$Button_1 = GUICtrlCreateButton( 'Beep freqeunz 500' , 20, 80, 200)
$Button_2 = GUICtrlCreateButton( 'Beep freqeunz 1000' , 20, 120, -1)
$Button_3 = GUICtrlCreateButton( 'Beep freqeunz 1500' , 20, 160,-2)
$Button_4 = GUICtrlCreateButton( 'Beep freqeunz 2000' , 20, 190, 200)
$Button_5 = GUICtrlCreateButton( 'Beep freqeunz 300' , 20, 220, -1)
$Button_6 = GUICtrlCreateButton( 'Beep freqeunz 2500' , 20, 250,-2)
GUISetState()While 1
[/autoit] [autoit][/autoit] [autoit]Switch GUIGetMsg()
[/autoit]
Case $GUI_EVENT_CLOSE
ExitLoop
Case $Button_1
Beep( 500, 1500 )
; ExitLoop
Case $Button_2
Beep( 1000, 1500 )
; ExitLoop
Case $Button_3
Beep( 1500, 1500 )
; ExitLoop
Case $Button_4
Beep( 2000, 1500 )
; ExitLoop
Case $Button_5
Beep( 300, 1500 )
; ExitLoop
Case $Button_6
Beep( 2500, 1500 )
; ExitLoop
EndSwitch
WEnd -
was dein letztes problem angeht, habe ich keine idee. aber grundsätzlich frage ich mich ob du den richtigen weg eingeschlagen hast um diese daten auszulesen. hast du schonmal auf dateiebene geschaut ob es da irgendwelche datenbanken gibt? oder hast du mal im speicher nach werten gesucht ?
-
moin leute ... ich woltle eich mal wieder mit meinen problemen belästigen
ich verwende in meinem script eine nette funktion (Danke hamburger + SeoBu) names ssend
leider verursacht diese immer diesen systemsound "ding" ... was recht nervig ist... woran kann das denn liegen ?
oder liegts am contolsend ?
bei einigen rechnern kommt das "ding" übrigens und bei anderen nicht ... am OS kanns nicht liegen ... hmmm bin ratlos
hier ein anwendungsbeispiel:
[autoit]Func _send4()
[/autoit]
Global $xxhWnd, $F4 = "hallo test"
;$xxhWnd = ControlGetHandle($consoletitle, "", $consoledit)
ssend($xxhWnd, $F4)
ssend($xxhWnd, "0D", 1)
ControlSend($consoletitle, "", $consoledit, "{Enter}")
EndFunc ;==>_send4udf ssend:
Spoiler anzeigen
[autoit]; #FUNCTION# ======================================================================================
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
; Name ..........: ssend()
; Description ...: Sends a string to a specified Control
; Syntax ........: ssend($hWnd, $sString[, $iHex = 0[, $bSendMsg = False]])
; Parameters ....: $hWnd - Control Handle to send to.
; $sString - String to send
; $iHex - [optional] Determines wether you want to send pure hex, or not. (default:0)
; |This can be handy, if you want to send special keystrokes like ENTER (0D)
; |0 - Convert String to Hex first
; |1 - Do not convert string to Hex
; $bSendMsg - [optional] Determines weither you want to send WM_SETFOCUS and WM_ACTIVATE messages beforehand. (default:False)
; Return values .: On Success - Returns 1
; On Failure - Returns 0 and sets @error to
; |-1 $hWnd is not a Hwnd-Type var.
; |>1 error(s) occured when trying to send string
; Author ........: hamburger, modified by SEuBo
; =================================================================================================Func ssend($xxhWnd, $xxsString, $xxiHex = 0, $xxbSendMsg = False) ; senden an die console
[/autoit]
If Not IsHWnd($xxhWnd) Then Return SetError(-1, 0, 0)
Local $xxaPar, $xxaText, $xxiErr
if $debuglog = 1 then FileWrite("hktdebug.log"," pos 1a:"&$xxaPar& " 1b:" &$xxaText &" 1c:" &$xxiErr)
; 1. Get Parent Window. 2. Send WM_ACTIVATE to Parent. 3. Send WM_SETFOCUS to Control.
If $xxbSendMsg Then
$xxaPar = DllCall("user32.dll", "hwnd", "GetParent", "hwnd", $xxhWnd)
If @error Then Dim $xxaPar[1] = [WinGetHandle("Program Manager")]
_SendMessage($xxaPar[0], 0x0006, $xxsString, 0, 0, "int", "long")
_SendMessage($xxhWnd, 0x7)
EndIf
if $debuglog = 1 then FileWrite("hktdebug.log"," pos 2a:"&$xxhWnd)
; Send WM_CHAR messages to Control.
If $xxiHex Then _SendMessage($xxhWnd, 0x102, $xxsString, 0, 0, "int", "long")
;MsgBox(0,"","pos 3")
If @error Then $xxiErr += 1
If Not $xxiHex Then
$xxaText = StringSplit($xxsString, "", 3)
For $xxi = 0 To UBound($xxaText) - 1
Sleep(1)
_SendMessage($xxhWnd, 0x102, "0x" & Hex(StringToBinary($xxaText[$xxi])), 0, 0, "int", "long")
If @error Then $xxiErr += 1
Next
EndIf
if $debuglog = 1 then FileWrite("hktdebug.log"," pos 3a:"&$xxaText& " 3b:" &$xxsString)
If $xxiErr Then Return SetError($xxiErr, 0, 0)
Return SetError(0, 0, 1)
;~ _SendMessage($xxhwnd, 0x8)
EndFunc ;==>ssend -
-
Hallo WhiteLion.
Führ dein Skript doch mal als unkompiliertes Skript in SciTE (F5) aus, dann sollte SciTE eigentlich die richtige Fehlerzeile zurückgeben.
[autoit]
tut er eben nicht ... das script läuft bei mir fast immer fehlerfrei.#include <Array.au3>
[/autoit][autoit][/autoit][autoit]; Erstellt Callback Funktion
[/autoit][autoit][/autoit][autoit]
Global $editofconsole, $tempconsoletext, $pidofconsole, $titleofconsole
$handleconsole = DLLCallbackRegister ("_EnumWindowsProc", "int", "hwnd;lparam"); EnumWindows aufrufen
[/autoit][autoit][/autoit][autoit]
DllCall("user32.dll", "int", "EnumWindows", "ptr", DllCallbackGetPtr($handleconsole), "lparam", 10); Löscht Callback-Funktion
[/autoit][autoit][/autoit][autoit]
DllCallbackFree($handleconsole); Callback Verfahren
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]
Func _EnumWindowsProc($hWnd000, $lParam)
Global $tempconsoletext, $pid, $hhh = 0
If WinGetTitle($hWnd000) <> "" And BitAnd(WinGetState($hWnd000), 2) Then
;$res = MsgBox(0, WinGetTitle($hWnd), "$hWnd=" & $hWnd & @CRLF & "lParam=" & $lParam & @CRLF & "$hWnd(type)=" & VarGetType($hWnd))
;$EnumWindowresult[$x] = WinGetTitle($hWnd), "$hWnd=" & $hWnd & @CRLF & "lParam=" & $lParam & @CRLF & "$hWnd(type)=" & VarGetType($hWnd))
Local $text2 = WinGetClassList(WinGetTitle($hWnd000), "Logfile opened on")
if $text2 <> "" then $tempconsoletext = $text2 ;
if $text2 <> "" then $titleofconsole = WinGetTitle($hWnd000)
if $text2 <> "" then $pidofconsole = WinGetProcess($titleofconsole)
;MsgBox(0, "", $title & " " & $pid)
;if $text <> "" then $pid = WinGetProcess($hWnd)
$hhh=$hhh+1
;If $res = 2 Then Return 0 ; Wenn Abbrechen geklickt, Rückgabe 0 zum Stoppen der Aufzählung
EndIf
Return 1 ; Rückgabe 1 um die Aufzählung fortzusetzten
EndFunc$edithandlearray = StringSplit($tempconsoletext, @LF)
[/autoit]
;_ArrayDisplay($edithandlearray)
if IsArray($edithandlearray) Then $editofconsole = $edithandlearray[$edithandlearray[0]-2]
MsgBox(0, "PID was:", $pidofconsole)
MsgBox(0, "PID was:", $titleofconsole)
MsgBox(0, "Handle was:", $editofconsole)
;_ArrayDisplay($IO)
;Wingetprocess
;~ $text = WinGetClassList("[CLASS:Notepad]", "")
;~ MsgBox(0, "Text read was:", $text) -
ich würde gerne wissen wie ich eine fehlermeldung auswerte die bei einem funktionsaufruf der kompilierten exe auftritt ... leider kann ich den fehler so kaum reproduzieren, da er bei mir sehr selten auftritt. - bei einem freund aber öfters.
die fehlermeldung lautet:
Autoit Error
Line 14294: (programmpfad)
Error: Array variable has incorrect number of subscripts or subscript dimension range exceededWie kann ich nun die richtige codezeile finden ? - mein programm ist zwar schon recht umfangreich hat aber keine 14295 zeilen!