Opret et stort antal filer på en IS5.0 server

Du kan give filen et random navn, en blanding af teskt og tal, du kan bruge en function til denne hedder godt nok lavPassword men det er det samme:

function lavPassword(antal)
  tilladtkarakter = "abcdefghijklmnopqrstuvwxyz1234567890"
  str = ""
  randomize
  for i = 1 to antal
    index = Int(rnd * len(tilladtkarakter))+1
    str = str & Mid(tilladtkarakter,index,1)
  next
  lavPassword = str
end function

Response.Write lavPassword(10)


Alternativt kan du give filen et GUID som skulle være unikt så kommer den eksempelvis til at hedde (man kan fjerne {} go - tegne hvis man ønker):
{B31705EC-AF1A-4399-956B-726F1CE73828}.jpg

Hvis det kun skal bestå af max 8 tegn + .sub - skal lavPassword(8)&'.sub' ?

ok, ja det som du skriver med lavPassword(8)

Nu ved jeg ikke, om du selv har mulighede for at styre din filnavngivning. I så fald vil eagleeyes forslag give nye navne hele tiden.
Men du kan også teste om en fil eksisterer således:
fileExist = fso.FileExists(filnavn)
fileExist har værdien True, hvis filen eksisterer i forvejen.
Hvis det er tilfældet kan du så ændre på navnet på passende vos.

Det bruges i et netwærk hvor mange forskellige skriver samtidigt - vil det også
give et unik filnavn når flere skriver samtidigt til samme folder ?

Ja det vil det. Det unike navn bliver lavet i koden.

Ok tak - åbn svar

ok :)