Hallo Leute kann mir jemand verraten warum das "I" hier immer um zwei erhöht wird? anstatt 123456? ist nämlich doof so funktioniert zwar das skript aber ist trotzdem sch....

Skript:

Option Explicit

Dim Name(6), FSO, I, Namen

Name(2) = "Hans"

Name(4) = "Peter"

Name(6) = "Otto"

For I=0 to 4

I=I+1

Namen=Name(1+I)

Set FSO= CreateObject("Scripting.FileSystemObject")

WScript.Echo I

FSO.CreateFolder(Namen)

Next

Bei einer For-Schleife wird die Zählvariable automatisch inkrementiert (sozusagen durch das Erreichen von Next). Da du die Variable nochmal zusätzlich erhöhst, ergibt das in der Summe +2.

For I=0 to 4

I=I+1

Namen=Name(1+I) => Namen=Name(I)

Set FSO= CreateObject("Scripting.FileSystemObject")

WScript.Echo I

FSO.CreateFolder(Namen)

Next

Namen=Name(1+I) => Namen=Name(I)

Diese Änderung bewirkt nur, dass statt der Indices 2, 4 und 6 nun 1, 3 und 5 benutzt werden müssen. An der falschen Schrittweite ändert das nichts.

Das I=I+1 muss da weg

Danke Jungs:):) Funst jetzt mit 123

wenn es interrresiert oder vlt. weiterhilft hier das fertige Skript:

Option Explicit

Dim Name(6), FSO, I, Namen

Name(1) = "Hans"

Name(2) = "Peter"

Name(3) = "Otto"

For I=1 to 3

Namen=Name(I)

Set FSO= CreateObject("Scripting.FileSystemObject")

FSO.CreateFolder(Namen)

Next

Diese Änderung bewirkt nur, dass statt der Indices 2, 4 und 6 nun 1, 3 und 5 benutzt werden müssen. An der falschen Schrittweite ändert das nichts.

Das I=I+1 muss da weg

wir hatten beide zum Teil recht Grützi