Ich arbeite gerade an einem ähnlichen Problem (will div. berechnungen in CHild Prozessen ausführen lassen, damit ich mehrere Prozessorkerne verwenden kann).
Habe mirüberlegt das mit Named Pipes zu machen, funktioniert das so oder sehe ich das falsch?
OK Danke, hab ich mich vertan
Hallo
Ich muss mir die Daten aus Strings wie diesem hier herauspicken:
"uuid" : "e606d53c-8d70-11e3-94b5-425861b86ab6"Ich kann aber leider bei Strinsplit die "" Zeichen (sorry ich weis nicht wie der heissen) als Trennzeichen verweden, Grund ist glaube ich ersichtlich.
Eine Idee wie ich das hin bekommen kann?
Mit freundlichen Grüßen
war10ck
OK erstmal danke, werd ich gleich Umbauen. Hab das Problem aber schon bei Inireadsection. Komm nicht dahinter was da nicht stimmt
Ich abu gerade an einem Prog das eine Datenbank in einer INI Datei erstellt, und dann man soll eben Einträge dazufügen und auch Löschen können. Im Vorhinein weis ich aber nciht wie viele Werte es werden
Bin jetzt gerade bei der Funktion mit der man ein neues key(value paar hinzufügen soll zu eine Sektion. Das Problem ist dass ich jedes mal ein @error bekomme:
[autoit]
$database=@scriptdir &"\database.ini"
#include <Array.au3>
global $inisection_read[2000][3]
global $inisection_write[2000][2]
global $a[10]
func _eintrag_erstellen()
msgbox(1,"",@scriptdir)
$a=inireadsectionnames($database)
if $a >=0 then
$inisection_read=inireadsection($database,stringupper(guictrlread($farbe_new))) ;$farbe_new=sektionsname
if @error then msgbox(1,"",)
$inisection_write=_arrayadd($inisection_read,$name_new & "/:"& $edition_new &"/:/"& $besitzer_new)
inidelete($database,stringupper(guictrlread($farbe_new)))
iniwritesection($database,stringupper(guictrlread($farbe_new)),$inisection_write)
endif
endfunc
(hab jetzt mal die GUI nicht rein geschrieben, die funktioniert ja.
Mfg!
Vielen Dank!
Hey Leute!
Hab mal kurz eine Frage: Wie kann ich die Höhe der Taskleiste (also das mit startbutton und so) herausfinden?
mfg
war10ck
Mein größtes Projekt is noch in arbeit. Ein Sever manager für Star wars Battlefront 2 (weil der originale mist ist). Wird wahrscheinlich dann auch von der ESL also offizieller Manger verwendet.
Er hat neben allen BugFixes vom originalen noch die Global Ban List (GBL) funktion. Wenn ein Spieler gebannt wird (nur mit gutem grund), wird das sofort an alle Server die diesen Manager verweden weiter geschickt, und der Spieler ist auf jedem dieser Server gesperrt.
Mfg
Edit: Hab ich vergesen: Ich arbeite Mit Matthias_199 daran.
Na ja, das script is relativ alt, und hab ich nie überarbeitet, habs nur gerade wieder ausgegraben, deswegen auch kein listview und tuningmaßnahmen nicht voll ausgeschöpft...
Du musst ja nicht kopieren, ich wollte dir das nur als anstoß geben wie mans machen könnte, wie du gesehen hast nsteckt da noch einiges an tuningpotetial drinnen, mit komplett neu schreiben und überdenken vllt sogar noch viel mehr
mfg
Hier mal mein ip scanner, vllt hilfsts dir ja:
#include <inet.au3>
#include <array.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
GUICreate("Network Scanner", 200, 130)
GUICtrlCreateLabel("IP-Bereich:", 10, 10, 100, 30)
$1 = GUICtrlCreateInput("192", 105, 10, 30, 30)
$2 = GUICtrlCreateInput("168", 140, 10, 30, 30)
$3 = GUICtrlCreateInput("0", 175, 10, 30, 30)
$scan = GUICtrlCreateButton("Scannen", 50, 50, 100, 40)
$progress = GUICtrlCreateProgress(10, 100, 180, 20)
$dll = DllOpen("ws2_32.dll")
GUISetState()
Dim $array[257][2]
$array[0][0] = "IP"
$array[0][1] = "Name"
$i = 0
TCPStartup()
FileDelete(@ScriptDir & "ping.ini")
While 1 * Sleep(10)
$msg = GUIGetMsg()
Switch $msg
Case $scan
_scan()
_show()
Case - 3
Exit
EndSwitch
WEnd
#cs
Func _ScanIPRange($sIP_Range, $iWaitms = 100)
If Not StringRegExp($sIP_Range, '\d{1,3}\.\d{1,3}\.\d{1,3}\.') Then Return SetError(1, 0, 0)
Local $sPID, $sOut, $aOut[1][2], $sTmp
For $i = 1 To 255
$sOut = ''
ToolTip('Scanne IP: ' & $sIP_Range & $i)
$sPID = Run(@ComSpec & ' /c ping -a -w ' & $iWaitms & ' -4 -n 1 ' & $sIP_Range & $i, @SystemDir, @SW_HIDE, $STDOUT_CHILD)
Do
Sleep(10)
$sOut &= StdoutRead($sPID)
Until @error <> 0
If Not StringInStr($sOut, '100% Verlust') Then
$aOut[UBound($aOut) - 1][0] = $sIP_Range & $i
$sTmp = StringRegExpReplace($sOut, '(?s).+Ping (\H+?) .+', '$1')
If $sTmp = 'wird' Then $sTmp = 'Hostname nicht gefunden'
$aOut[UBound($aOut) - 1][1] = $sTmp
ReDim $aOut[UBound($aOut) + 1][2]
EndIf
Next
ReDim $aOut[UBound($aOut) - 1][2]
ToolTip('')
Return $aOut
EndFunc ;==>_ScanIPRange
#ce
Func _scan()
For $i = 0 To 255
$ip = GUICtrlRead($1) & "." & GUICtrlRead($2) & "." & GUICtrlRead($3) & "." & $i
Run("ping.exe " & $ip)
ConsoleWrite($ip & @CRLF)
Next
GUICtrlSetData($progress, 50)
Do
Sleep(100)
Until Not ProcessExists("ping.exe")
$pings = IniReadSection("ping.ini", "pings")
For $i = 1 To UBound($pings) - 1
$subIP = StringReplace($pings[$i][0], GUICtrlRead($1) & "." & GUICtrlRead($2) & "." & GUICtrlRead($3) & ".", "")
ConsoleWrite($subIP & @CRLF)
$array[$subIP + 1][0] = $pings[$i][0]
If Number($pings[$i][1]) <> 0 Then
$array[$subIP + 1][1] = _TCPIpToName($pings[$i][0], 0, $dll)
If $array[$subIP + 1][1] = "" Then
$array[$subIP + 1][1] = "Unnamed Host"
EndIf
Else
$array[$subIP + 1][1] = "Error: (" & $pings[$i][1] & ")"
EndIf
GUICtrlSetData($progress, 50 + (100 / 255 * $i) / 2)
Next
FileDelete(@ScriptDir & "ping.ini")
EndFunc ;==>_scan
Func _show()
_ArrayDisplay($array, "IP´s / Names")
EndFunc ;==>_show
DllClose($dll)
und hier die datei zum pingen:
#NoTrayIcon
;Diese Datei muss als "Ping.exe" compiliert werden
If $cmdline[0] = 1 Then
$ping = Ping($cmdline[1])
If @error Then
Switch @error
Case 1
IniWrite("ping.ini","pings",$cmdline[1],"Host is offline")
Case 2
IniWrite("ping.ini","pings",$cmdline[1],"Host is unreachable")
Case 3
IniWrite("ping.ini","pings",$cmdline[1],"Bad destination")
Case 4
IniWrite("ping.ini","pings",$cmdline[1],"Other errors")
EndSwitch
Else
IniWrite("ping.ini","pings",$cmdline[1],$ping)
EndIf
EndIf
(muss als exe compiliert werden)
Mfg
Mach dir ein kleiner programm dass den ping enthält und starte es von deinem Haupt programm aus, für jede ip ein mal starten, nach dem Pingen das ergebnis in ne ini schreiben und mit dem Hauptprog auslesen und anzeigen. Damit kannst du gleich alle pings parallel durchführen, allerdings is der prozzie auf 100%. Wenn du willst schick ich dir ein Beispielscript
Wenn du uns mal dein Skript zeigen würdest, könnten wir dir bestimmt besser helfen.
Ähm kannst du das ein bisschen genauer beschreieben? Ich ab keine Ahnung was du gerade meinst
mfg
Du kannst ja mal den Rechner von Widows nachbauen versuchen. Wenn du das hast kannst du dir überlegen welche funktionen so ein Rechner vllt noch gebraucen könnte (Sin, cos Tan...)
USch dir einfach für den Anfang solche Sachen und versuche sie. Auch wenn du etwas nicht gleich schffast lernst du daraus, und kannst das Projekt ja später fertig machen.
Mfg
Wünsche dir auch alles Gute!
mfg
Ich bin zwar noch nicht so lange dabei, aber auch von mir ein großes DANKESCHÖN!
Ich glaube es gibt hier keinen auf den der Name besser passt als auf dich!
Mfg
Vielen Dank!!
Werd es gleich mal weiterempfehlen 
Mfg
Und in Ewigkeit
ENT
Die kannte ich noch nicht xD
Mfg
Ich glaube das ist selbsterklärend:
C++ im Code,
der du bist im Setup,
deine Schleife komme,
dein counter++,
wie im Source so auch im Binary.
Unser tägliches Array, füll uns heute.
Und vergib uns unsere Syntaxfehler,
wie auch wir vergeben unserem Compiler.
Und führe uns nicht zu Visual BASIC
sondern erlöse uns von den Bugs.
Denn dein ist die API, GUI und CLI in Ewigkeit,
Semikolon.
Mfg