Hallo.
Stehe vor folgendem Problem:Schreibe an einer HTA-Datei, mit der es möglich sein soll, IP-Adressen einzustellen. Zur Eingabe der Adresse habe ich 4 Textfelder im HTML-Teil erstellt:
IP0,IP1,IP2,IP3
Die IP-Adresse ist dann:
IP0.value & "." & IP1.value & "." & IP2.value & "." & IP3.value
Anfänglich habe ich nur ein Textfeld benutzt, jedoch fiel mir keine Möglichkeit ein, die Eingabe des Users zu überprüfen, sprich festzustellen, dass die jeweiligen Teile der Adresse Intergers zwischen 0 und 255 sind, usw, deshalb habe ich die 4 getrennten Felder erstellt.
Nun benutze ich folgenden Code um die Eingabe des Users zu überprüfen:
dim IP0int
If IP0.value <> "" Then
IP0int = IP0.value
Else
MsgBox "Enter Numeric Value From The Interval [0;255]"
Exit Sub
End If
IP0int = CByte(IP0int)
If Err.Number <> 0 Then
MsgBox "Enter Numeric Value From The Interval [0;255]"
Exit Sub
End If
Soweit passt alles. Nun soll man aber über das Programm auch DNS-Server, Gateway und Subnet Mask einstellen können, dh ich habe 5 mal 4 Felder für die 5 Adressen. Dh ich müsste diesen Code ^^ 20 mal kopieren. :ugly:
Nun zu meiner eigentlichen Frage:
Gibt es eine Möglichkeit, für die 20 Textfelder eine Schleife zu schreiben, quasi aus den Textfeldern eine Array zu machn - Text(i) - und durch diese durchzuiteriern? Oder habt ihr ganz andere Lösungsvorschläge für mein Problem?
Danke im Voraus!
P.