teşekkürler. kodda bazı problemler mevcut, ben kendimde çözdüm ancak başlarda bir dosyayeri değişkeniyle klasör belirtilmesi gerekiyor. bi de altlarda dosyanuyeri olan yer dosyayeri olarak düzeltilecek. onun dışında işime çok yaradı upload.form("formadi") şeklindeki olayla birlikte.

cpr1...4'lü ve NUMARA değişkenli sistem yerine ise yılaygüngünadisaatdakikasaniye şeklinde bir dosya ismi kullanıyorum, istenirse başına dosyanın kendi adı da eklenebilir. konuyu izleyen arkadaşlar için ekliyorum onu da aşağı. tekrar teşekkürler arkadaşlar.

yil = year(now) : ay = month(now) : gun = day(now) : gunadi = weekday(weekday(date)) : saat = Hour(Now) : dakika = Minute(Now) : saniye = Second(Now) 
if ay < 10 then : ay1 = 0 & ay : else : ay1 = ay : end if
if gun < 10 then : gun1 = 0 & gun : else : gun1 = gun : end if
if saat < 10 then : saat1 = 0 & saat : else : saat1 = saat : end if
if dakika < 10 then : dakika1 = 0 & dakika : else : dakika1 = dakika : end if
if saniye < 10 then : saniye1 = 0 & saniye : else : saniye1 = saniye : end if
zaman = yil&ay1&gun1&gunadi&saat1&dakika1&saniye1

dosyaadi = zaman&".jpg"

'zaten aspjpeg kullanarak jpege çevirdiğim için böyle kullandım.
'dosyanın kendi uzantısını kullanmak isteyen arkadaşlar
'dosyaadi = zaman&file.ext kullanabilirler.