Benutzer per VB-Script aus Excel Tabelle erstellen

[Maikarl 10]

Hi Leute,

 

ich habe da ein kleines Problem mit meinem angehängten VB-Script, welches Benutzer aus einer Excel Tabelle erstellt, für sie ein Passwort generieren soll(genau da liegt auch das Problem) und ihnen den Benutzername und Passwort per E-Mail zuschickt. Vielleicht findet ja jemand auf die schnelle den Fehler. Ich weiß nicht genau wie man Funktionen in einer Do Until .... Loop Schleife laufen läßt.

 

Gruß Thomas

testscript.txt

[thorgood 10]

Hi Thomas,

 

du legst deine Abfrage vor die Schleife und alle deine Funktionen dahinter.

...
intLaenge = InputBox("Anzahl der Zeichen eingeben", "", "8")
if not Isnumeric(intLaenge) then intLaenge = setAnzahl(8)

Do Until objES.EOF
...
  Passwort = Kennwort(intLaenge)
...
Loop

Function setAnzahl(Zahl)
...

Gruß thorgood

[Maikarl 10]

Hi,

 

vielen Dank für die schnelle Hilfe thorgood. Funzt alles super.

 

Gruß

Thomas