- Offizieller Beitrag
Hi,
guck dir mal die Hilfe an. Mt GUICtrlRead bekommst du die Werte.
So long,
Mega
Hi,
guck dir mal die Hilfe an. Mt GUICtrlRead bekommst du die Werte.
So long,
Mega
also kann ich das
[autoit]Global $ipListen = $haip1
Global $ipHost = $haip1
einfach weglassen und dann gleich
[autoit]$haip1
[/autoit]einstezen?
Geht auch net
Und was noch meine Frage ist. In den Text eingabe feldern steht ja schon die Standart IP. Wenn dieses Kässtchen nun nicht geändert wird bekommt er dann bei Guictrlread eine 0 zurück oder den vorgegebenen Text?
So ich habe es jetzt mit dem hier versucht bekomme jetzt aber die fehlermeldung die du eingebaut hast
GUISetState(@SW_SHOW,$gui3)
$haip1 = GUICtrlRead($haip)
$user1 = GUICtrlRead($user)
$pass1 = GUICtrlRead($pass)
$realm1 = GUICtrlRead($realm)
Global $file1 = $pfad & "\logonserver.conf"
While 1
$msg = GuigetMsg()
FileOpen($file1, 0)
; Check if file opened for reading OK
If $file1 = -1 Then
MsgBox(0, "Error", "Unable to open file (logonserver.conf).")
Exit
EndIf
FileClose($file1)
Switch $msg
Case $GUI_EVENT_CLOSE
GUIDelete($gui1)
GUIDelete($gui2)
GUIDelete($gui3)
GUIDelete($gui4)
Exit
Case $Exit3
GUIDelete($gui1)
GUIDelete($gui2)
GUIDelete($gui3)
GUIDelete($gui4)
Exit
Case $Weiter3
_ersetzen()
GUIDelete($gui3)
ExitLoop
EndSwitch
WEnd
Func _ersetzen()
Dim $lines_A
If Not _FileReadToArray($file1, $lines_A) Then
MsgBox(4096, "Error", " Error reading log to Array error:" & @error)
Exit
EndIf
For $i = 1 To $lines_A[0]
If StringInStr($lines_A[$i], ' < Listen Host =') <> 0 Then $lines_A[$i] = '<Listen Host = ' & $haip1
If StringInStr($lines_A[$i], ' ISHost =') <> 0 Then $lines_A[$i] = ' ISHost = ' & $haip1
Next
_FileWriteFromArray($file1, $lines_A, 1)
EndFunc
(ich muste das mit (autoit) weglassen weil er immer die hälfte des codes abgeschnitten hat)
MFG & Frohe Weihnachten von Cornfl4kes
Woran kan das denn liegen?
@Cornfl4kes: Wozu ist denn die Schaltfläche Quellcode wenn du Quellcode einfügst?
Bei deinem eigentlichen Problem kann ich dir aber leider nicht helfen.