Archief - [PROG]Visual Basic vbs "Code Error 800A0401 - Expected end of statement"

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
f

fikkie

Legacy Member
Heey mensen,

Hoop hier men fout samen met jullie te vinden.
Ik moest dus een vb script schrijven om users toe te voegen in een active directory dat gebruik maakt van een CSV.

Nu heb ik een script gevonden van ene Scott Lowe op Techrepublic.
Maar daar stonden dus een paar fouten in. Een deel heb ik er zelf van opgelost maar zit nu met eenf out waar ik bijgod niet weet wat er verkeerd zou kunnen zijn.

De fout dit dus in volgend stuk
Code: 
'used only for debugging
iff err.number = -2147019886 then
msgbox"User logon "& sLogon &" already exist"
End If

Dus als jullie deze newbie een beetje verder helpen zal ik de moed niet zo snel verliezen.

TIA
Fikkie
T

TiZon

Legacy Member
Zo zou ik het doen
Code: 
If Err.number = "-2147019886" then
     Wscript.Echo "User logon "& sLogon &" already exist"
     WScript.Quit(1)
End If
Nee?
f

fikkie

Legacy Member
Yep, werkt zoals het moet nu.

Alvast bedankt voor de wijze raad ;)

Fikkie
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan