Hallo zusammen,
ich habe ein kleines Problem.
Hier ein Ausschnitt aus meinem Code:
Code
Global $aMsgBox[32][2]
$aMsgBox[0][1] = "1.Kein Umwandlungsordner angegeben!"
$aMsgBox[1][1] = "2.Kein Verzeichnis für die Stuecklisten angegeben!"
$aMsgBox[2][1] = "3.Kein Verzeichnis für die NC-Daten (nc-blech) angegeben!"
$aMsgBox[3][1] = "4.Kein Verzeichnis für die NC-Daten (nc-profil) angegeben!"
$aMsgBox[4][1] = "5.Kein Pfad im Zielverzeichnis für das Fertigungspaket angegeben!"
$aMsgBox[5][1] = "6.Kein Pfad im Auftragsordner für die bmf´s angegeben!"
$aMsgBox[6][1] = "7.Kein Server-Verzeichnis für die Stuecklisten angegeben!"
$aMsgBox[7][1] = "8.Kein Server-Verzeichnis für die pdf-Dateien angegeben!"
$aMsgBox[8][1] = "9.Kein Server-Verzeichnis für die dwg-Dateien angegeben!"
$aMsgBox[9][1] = "10.Kein Server-Verzeichnis für die bmf-Dateien angegeben!"
$aMsgBox[10][1] = "11.Kein Server-Verzeichnis für die Teilsystemperspektive als pdf angegeben!"
$aMsgBox[11][1] = "12.Kein Server-Verzeichnis für die Teilsystemperspektive als dwg angegeben!"
$aMsgBox[12][1] = "13.Kein Server-Verzeichnis für die Teilsystemperspektive als bmf_ angegeben!"
$aMsgBox[13][1] = "14.Kein Server-Verzeichnis für die NC-Daten angegeben!"
$aMsgBox[14][1] = "15.Kein Server-Verzeichnis für die Abwicklungen-Kantteile angegeben!"
$aMsgBox[15][1] = "1.Pfad für den Umwandlungsordner (lokal) ungültig!"
$aMsgBox[16][1] = "2.Pfad für die Stücklisten (lokal) ungültig!"
$aMsgBox[17][1] = "3.Pfad für die NC-Daten (nc-blech, lokal) ungültig!"
$aMsgBox[18][1] = "4.Pfad für die NC-Daten (nc-profil, lokal) ungültig!"
$aMsgBox[19][1] = "5.Pfad für das Fertigungspaket (lieferungen, lokal) ungültig!"
$aMsgBox[20][1] = "6.Pfad für die bmf´s (plaene, lokal) ungültig!"
$aMsgBox[21][1] = "7.Pfad für die Stücklisten (Server) ungültig!"
$aMsgBox[22][1] = "8.Pfad für die Werkstattpläne (pdf´s, Server) ungültig!"
$aMsgBox[23][1] = "9.Pfad für die Werkstattpläne (dwg´s, Server) ungültig!"
$aMsgBox[24][1] = "10.Pfad für die Werkstattpläne (bmf´s, Server) ungültig!"
$aMsgBox[25][1] = "11.Pfad für die Teilsystemperspektive (pdf´s, Server) ungültig!"
$aMsgBox[26][1] = "12.Pfad für die Teilsystemperspektive (dwg´s, Server) ungültig!"
$aMsgBox[27][1] = "13.Pfad für die Teilsystemperspektive (bmf´s, Server) ungültig!"
$aMsgBox[28][1] = "14.Pfad für die NC-Daten (Server) ungültig!"
$aMsgBox[29][1] = "15.Pfad für die Abwicklungen Kantteile (dxf, Server) ungültig!"
$aMsgBox[30][1] = "16.Umwandlungsordner kann nicht gleich dem Ordner 'plaene' sein!"
$aMsgBox[31][1] = "Sie haben einen Sicherungsauftrag gewählt! Die Aktion wird abgebrochen! Bitte wählen Sie einen Sortierauftrag."
;weiterer Code.....
Func Sortierauftrag_anlegen()
GUICtrlSetState($Button_Auftrag_bearbeiten, $GUI_DISABLE)
GUICtrlSetState($Button_Auftrag_Anlegen, $GUI_DISABLE)
$READ_Checkbox_Fremdauftrag = GUICtrlRead($Checkbox_Fremdauftrag)
If $READ_Checkbox_Fremdauftrag = $GUI_UNCHECKED Then
;~ Input auslesen und auf Vollständigkeit und Gültigkeit prüfen.
For $i = 0 To 14
$aRead_Inputbox[$i] = GUICtrlRead($aInputbox[$i])
If Not $aRead_Inputbox[$i] Then
$aMsgBox[$i][0] = MsgBox(16, "Error", "" & $aMsgBox[$i][1])
GUICtrlSetState($Button_Auftrag_bearbeiten, $GUI_DISABLE)
GUICtrlSetState($Button_Auftrag_Anlegen, $GUI_DISABLE)
If $aMsgBox[$i][0] = 1 Then
GUICtrlSetState($Button_Auftrag_bearbeiten, $GUI_ENABLE)
GUICtrlSetState($Button_Auftrag_Anlegen, $GUI_ENABLE)
EndIf
Return
EndIf
For $j = 15 To 29
If Not FileExists($aRead_Inputbox[$i]) Then
$aMsgBox[$j][0] = MsgBox(16, "Error", "" & $aMsgBox[$j][1])
GUICtrlSetState($Button_Auftrag_bearbeiten, $GUI_DISABLE)
GUICtrlSetState($Button_Auftrag_Anlegen, $GUI_DISABLE)
If $aMsgBox[$j][0] = 1 Then
GUICtrlSetState($Button_Auftrag_bearbeiten, $GUI_ENABLE)
GUICtrlSetState($Button_Auftrag_Anlegen, $GUI_ENABLE)
EndIf
Return
EndIf
Next
Next
For $k = 0 To 5
$aRead_Inputbox[$k] = GUICtrlRead($aInputbox[$k])
If $aRead_Inputbox[0] = $aRead_Inputbox[5] Then
$aMsgBox[30][0] = MsgBox(16, "Error", "" & $aMsgBox[30][1])
GUICtrlSetState($Button_Auftrag_bearbeiten, $GUI_DISABLE)
GUICtrlSetState($Button_Auftrag_Anlegen, $GUI_DISABLE)
If $aMsgBox[30][0] = 1 Then
GUICtrlSetState($Button_Auftrag_bearbeiten, $GUI_ENABLE)
GUICtrlSetState($Button_Auftrag_Anlegen, $GUI_ENABLE)
Return
EndIf
EndIf
Next
Alles anzeigen
Mein Problem ist jetzt, dass wenn ich bei einem Pfad ein paar Zeichen lösche / Pfad ungültig mache, dass er mir dann immer den String von $MsgBox[15][1] anzeigt. Es ist auch egal in welcher Inputbox ich den Pfad ungültig mache.
Allerdings: Wenn eine von den 15 Inputboxen leer ist, dann sagt er mir auch welche leer ist. So wie es sein soll.
Könnt Ihr mir da helfen?
Danke im Voraus.
LG Mikki