Avatar billede kimlarsen1978 Nybegynder
13. maj 2003 - 14:17 Der er 11 kommentarer og
1 løsning

Kun billeder i Persits.Upload

Hej
Hvordan sikre man sig at folk kun uploader billeder? Jeg brugerPersits.Upload, og har denne if-sætning:
--------------
    If File.ImageType <> "GIF" AND File.ImageType <> "JPG" AND File.ImageType <> "JPEG" Then
      session("fejl") = "Billede skal være i formatet GIF eller JPG"
      response.redirect "add_add.asp"
    End If
--------------
Men uploader jeg noget som ikke er en imagefil fx. en PDF eller DOC, så bliver den også uploadet fordi File.ImageType retunerer JPG til alt der ikke er billedfiler.

Hvordan får jeg den til at tjecke på filtypen?
Avatar billede medions Nybegynder
13. maj 2003 - 14:20 #1
If File.ImageType = "GIF" Or File.ImageType = "JPG" Or File.ImageType = "JPEG" Then
      session("fejl") = "Billede skal være i formatet GIF eller JPG"
      response.redirect "add_add.asp"
    End If

//>Rune
Avatar billede dk_akj Nybegynder
13. maj 2003 - 14:22 #2
If ucase(File.ImageType) <> "GIF" AND ucase(File.ImageType) <> "JPG" AND ucase(File.ImageType) <> "JPEG" Then
      session("fejl") = "Billede skal være i formatet GIF eller JPG"
      response.redirect "add_add.asp"
    End If
Avatar billede dk_akj Nybegynder
13. maj 2003 - 14:24 #3
en anden måde kunne være

select case ucase(File.ImageType)

case "GIF","JPG","JPEG"
' ok
case else
session("fejl") = "Billede skal være i formatet GIF eller JPG"
response.redirect "add_add.asp"
end select

//akj
Avatar billede kimlarsen1978 Nybegynder
13. maj 2003 - 14:24 #4
dk_akj: Hvad gør ucase
Avatar billede kimlarsen1978 Nybegynder
13. maj 2003 - 14:26 #5
Problemet er at når jeg uploader noget som ikke er et billeder fx. doc eller pdf så tror den det er et jpg-billede, fordi File.ImageType retunerer JPG selvom man uploader en .doc
Avatar billede dk_akj Nybegynder
13. maj 2003 - 14:26 #6
Sætter filtypen til store bogstaver.

"gif" = "GIF" er falsk
ucase("gif") = "GIF" er sandt

//akj
Avatar billede kimlarsen1978 Nybegynder
13. maj 2003 - 14:27 #7
Medions: Jeg tror ikke du har forstået problemstillingen, eller også er det mig der er dårlig til at formulerer mig :-)
Avatar billede dk_akj Nybegynder
13. maj 2003 - 14:28 #8
Oki, så check på de sidste 3 chars i filnavnet

select case ucase(right(File.Filename,3))

case "GIF","JPG","JPEG"
' ok
case else
session("fejl") = "Billede skal være i formatet GIF eller JPG"
response.redirect "add_add.asp"
end select

//akj
Avatar billede kimlarsen1978 Nybegynder
13. maj 2003 - 14:35 #9
Yes! Det virker!
Hvad nu hvis jeg en streng fx:
-----------
c:\billeder\nye\xxx\billednavn.jpg
-----------
Hvordan får jeg så pillet billednavn.jpg ud i en variabel?

Jeg kan godt stille det i et nyt spørgsmål hvis du synes?
Avatar billede dk_akj Nybegynder
13. maj 2003 - 14:39 #10
Det kan du gøre sådan:

' del i array med \ som seperator
arr = split("c:\billeder\nye\xxx\billednavn.jpg","\")'

' filnavn er i sidste element
fil = arr(ubound(arr))

//akj
Avatar billede kimlarsen1978 Nybegynder
13. maj 2003 - 14:40 #11
Takker
Avatar billede dk_akj Nybegynder
13. maj 2003 - 14:40 #12
selvtak

//akj
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

IT-JOB

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Solution Manager til Cyberdivisionen

Riskpoint A/S (Riskpoint Solutions Limited)

Senior Developer