---

Hejsa.

Er _helt_ grøn i ASP, men har hentet nedenstående script fra nettet - og det
virker fint.

Men, hvordan definerer jeg således, at det f.eks. kun er *.jpg billeder jeg
accepterer?

På forhånd tak for hjælpen.

/Bjarne (Dyl)
--------------------
<%

Dim objUpload ' Definer en variabel til objektet

' Opret objektet så vi kan begynde at arbejde med det
Set objUpload = Server.CreateObject("Persits.Upload")

' Her sætter vi en begrænsning på filstørrelsen,
' for at undgå at der bliver uploadet alt for store filer
' En maksimal størrelse på 50Kb må være nok
objUpload.SetMaxSize 30000, True

' For at undgå at siden bare stopper og for at vi
' kan fange fejlen hvis filen er for stor, slår vi
' fejl-check til
On Error Resume Next

' Her opsætter vi hvortil der skal uploades
Dim strUploadPath ' Definer en variabel til stien

strUploadPath = "../_upload/upload/"

' Definer en variabel til antallet af uploadede filer
' Ganske god at have hvis man giver lov til at
' brugeren kan uploade mere end én fil ad gangen
Dim intFileCount

intFileCount = objUpload.Save(Server.MapPath(strUploadPath))
' Server.MapPath() benyttes her for at give
' upload objektet den faktiske sti i stedet for den virtuelle.

' Så må vi hellere lige undersøge om filen måske
' var for stor. Hvis filen var for står, får vi fejl nummer 8
If Err.Number = 8 Then
' Den var for stor
Response.Write "Filen er for stor. Prøv igen."
Else
' Den var ikke for stor
' Opstod der en anden fejl ?
If Err <> 0 Then
' Ja - fortæl brugeren det
Response.Write "Der opstod en fejl : " & Err.Description
Else
' Nej - det gik godt
Response.Write intFileCount & " fil(er) uploadet.<br>" & vbCrLf
End If
End If

' Så er vi færdige, så vi rydder pænt op efter os
Set objUpload = Nothing

%>

---

"Dyl" skrev

> Men, hvordan definerer jeg således, at det f.eks. kun er *.jpg billeder
jeg
> accepterer?

det må være:
objUpload.AllowedFilesList = "jpg"


--
Pepss
Den ordblinde der prøver at blive webdesigner
Fræk frækkere www.cafe-flirt.dk
De frække noveller www.novelle.cafe-flirt.dk