Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VBScript - schleife in einer schleife

Frage Entwicklung VB for Applications

Mitglied: micneu

micneu (Level 2) - Jetzt verbinden

29.01.2011, aktualisiert 02:10 Uhr, 5639 Aufrufe, 2 Kommentare

Hallo Leute,

Möchte in VBScript eine schleife in einer schleife ausführen....

Hier mein Ziel:

das ergebnis soll so sein:

1 start a
2 mitte b
3 ende c

hier mein code:

01.
option explicit 
02.
dim aussen, innen, test, zaehler, strInnen, test_innen 
03.
aussen = array("start", "mitte", "ende") 
04.
innen = array("a", "b", "c") 
05.
for each test in aussen 
06.
	zaehler = zaehler + 1 
07.
	for each test_innen in innen 
08.
		strInnen = test_innen 
09.
	next 
10.
	wscript.echo zaehler & " " & test & " " & strInnen 
11.
Next
nur bekomme ich hier immer das ergebnis:
1 start c
2 mitte c
3 ende c

wo ist mein fehler?
Mitglied: 76109
29.01.2011 um 10:03 Uhr
Die inner Schleife wird ja komplett durchlaufen und die endet nun mal auf dem letzten Token (strInnen= c). D.h. insgesamt werden bei dieser Schleifen-Art 9 Ergebnisse erzielt außen(3) * innen(3), wenn das WScript.Echo in der Innen-Schleife stehen würde.

Wenn Du dieses Ergebnis
01.
1 start a 
02.
2 mitte b 
03.
3 ende c
haben möchtest, dann entweder so Arrays 0-2 auslesen:
01.
aussen = Array("start", "mitte", "ende") 
02.
innen = Array("a", "b", "c") 
03.
 
04.
For i=0 To UBound(aussen) 
05.
    WScript.Echo i + 1 & " " & aussen(i) & " " & innen(i) 
06.
Next
oder Arrays 1-3 auslesen (0 = Dummy = Leer):
01.
aussen = Array("", "start", "mitte", "ende") 
02.
innen = Array("", "a", "b", "c") 
03.
 
04.
For i=1 To UBound(aussen) 
05.
    WScript.Echo i  & " " & aussen(i) & " " & innen(i) 
06.
Next
oder 1 Array mit Step 2 in 2er Schritten auslesen:
01.
EinArray = Array("start", "a", "mitte", "b", "ende", "c") 
02.
 
03.
For i=0 To UBound(EinArray) Step 2 
04.
    WScript.Echo i + 1 & " " & EinArray(i) & " " & EinArray(i+1) 
05.
Next
Gruß Dieter

PS. oder auch so:
01.
EinArray = Array(Array("start", "a"), Array("mitte", "b"), Array("ende", "c")) 
02.
 
03.
For i = 0 To UBound(EinArray) 
04.
    WScript.Echo i + 1 & " " & EinArray(i)(0) & " " & EinArray(i)(1) 
05.
Next
Bitte warten ..
Mitglied: micneu
29.01.2011 um 10:29 Uhr
danek, du hast mir gerade den tag gerettet

ich habe mich für die letzte variante entschieden.

gruß michael
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Verlinkung erstellen Batch Datei mit for Schleife (2)

Frage von rusdav zum Thema Batch & Shell ...

Visual Studio
gelöst VBScript und WMI (Win32-NetworkAdapterConfiguration) (3)

Frage von MaxMoritz6 zum Thema Visual Studio ...

Batch & Shell
gelöst Verschachtelte FOR-Schleife mit einem Argument (3)

Frage von mp-home zum Thema Batch & Shell ...

Basic
VBScript erweitern für Subfolder (8)

Frage von 132078 zum Thema Basic ...

Heiß diskutierte Inhalte
Windows 7
gelöst BOOTMGR is missing (auch nach bootrec -RebuildBcd) (20)

Frage von Mipronimo zum Thema Windows 7 ...

Router & Routing
Tipps für Router (ca. 100 clients, VPN) (19)

Frage von oel-auge zum Thema Router & Routing ...

Windows Userverwaltung
Windows Freigabe: Zugriff auf alle Ordner trotz Sicherheitseinstellungen (17)

Frage von Pandreas zum Thema Windows Userverwaltung ...

TK-Netze & Geräte
gelöst Convert von TAPI auf CAPI gesucht (13)

Frage von StefanKittel zum Thema TK-Netze & Geräte ...