System roots ermitteln

[Ninja_]

So kann man die System roots schnell, ohne API und sonstiges besonderes zeug ermitteln

Code: Alles auswählen

For i = 65 To 90
 If  FileSize(Chr(i)+":\") = -2 : Debug Chr(i)+":\" : EndIf
Next

mfg Ninja

[Jake]

Warum 65 bis 90?

[ts-soft]

Warum 65 bis 90?

Weil das der ASCII-Code von A-Z ist

PS: Da diese Version auch nur unter Windows funktioniert und FileSize die
Datei jedesmal öffnet, ist die API-Variante in jedem Fall schneller, was aber
kaum ins Gewicht fallen dürfte.