Oprettet fre. d. 20. januar 2006 kl. 10:48:22

donkazz
donkazz (11.670 point. Point ude: 1.395)

Tjek om fil er angivet inden upload vha. upload.form

Jeg er ved at lave et lille køb-salg forum, hvor man skal kunne skrive et indlæg om den bil man vil sælge/købe/bytte med. Man kan så vælge at "Gennemse" efter et billede, som så bliver uploadet og associeret med indlægget.

Mit problem er, at hvis man IKKE vælger en fil, så crasher scriptet, da det forsøger at uploade noget der ikke eksisterer.
Hvordan faen kan jeg tjekke for om en fil er angivet INDEN upload processen? Mit script ser nogenlunde sådan her ud:


If Request.QueryString("mode") = "save" Then

brugerMappe = Server.MapPath("/data/forumimages/")
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False
Upload.Save brugerMappe
Set File = Upload.Files("ATTACHMENT")
Filnavn = File.Filename


    Set Conn = Server.CreateObject("ADODB.Connection")   
    Set RS = Server.CreateObject("ADODB.RecordSet")
    Conn.Open Connect()
    RS.Open "SELECT * From ThePost", Conn, 1, 3
    RS.AddNew
    RS("Dato") = Now()
    RS("Navn") = Upload.Form("navn")
    RS("Email") = Upload.Form("email")
    RS("TlfNr") = Upload.Form("tlfnr")
    RS("Bemaerkning") = Replace(Upload.Form("bemaerkning"), VbCrLf, "<br>")
    RS("Indlaeg") = Replace(Upload.Form("indlaeg"), VbCrLf, "<br>")
    If Upload.Form("buy") <> "" Then
        RS("Buy") = True
    Else
        RS("Buy") = False
    End if
    RS("picture") = "/billeder/" & Filnavn

    If Upload.Form("sell") <> "" Then
        RS("Sell") = True
    Else
        RS("Sell") = False
    End if

    If Upload.Form("Xchg") <> "" Then
        RS("Xchg") = True
    Else
        RS("Xchg") = False
    End if
   
    RS("UserIP") = request.servervariables("REMOTE_ADDR")
    RS.Update
    RS.Close
    Conn.Close
    Set RS = Nothing
    Set Conn = Nothing

Skrevet fre. d. 20. januar 2006 kl. 10:54:36| #1

nielle
nielle (159.526 point)
Dit FILE-inputfelt:

<input type="file" name="billede">

- i formen har jo et navn.

Så er det bare at tjekke om dette har fået en værdi:

If Request.Form("billede") <> "" Then
' Upload kode her
Else
' Intet at uploade...
End If

Skrevet fre. d. 20. januar 2006 kl. 10:59:45| #2

donkazz
donkazz (11.670 point)
Ja den hedder "ATTACHMENT" i mit input felt, men hvis jeg bruger Request, så gør den åbenbart alle andre Upload.Form ikke gyldige. Jeg har før været lidt i samme problem, da det ikke er muligt at smide filnavnet ind i databasen, før man har uploadet filen. Jeg ved ikke hvorfor... Men det gør det jo så lidt problematisk, for hvis man ikke kan requeste filnavnet, så kan man vel heller ikke tjekke om den overhovedet indeholder noget?

Skrevet fre. d. 20. januar 2006 kl. 11:05:16| #3

ldanielsen
ldanielsen (62.679 point)
Prøv at checkke om Len (Upload.Files) > 0

Skrevet fre. d. 20. januar 2006 kl. 11:07:39| #4

nielle
nielle (159.526 point)
Måske:

If "" & Upload.Files("pdfFile").FileName <> "" Then

Skrevet fre. d. 20. januar 2006 kl. 11:07:56| #5

nielle
nielle (159.526 point)
If "" & Upload.Files("ATTACHMENT").FileName <> "" Then

Skrevet fre. d. 20. januar 2006 kl. 11:09:36| #6

fennec
fennec (118.176 point)
Count = Upload.Save brugerMappe
if count > 0 then
..
..
end if

Skrevet fre. d. 20. januar 2006 kl. 11:11:11| #7

fennec
fennec (118.176 point)
... Save komandoen returnere selv hvor mange filer der er uploadet, så det er bare at tjekke den værdi :o)
http://www.aspupload.com/ (...)

Skrevet fre. d. 20. januar 2006 kl. 11:12:43| #8


Skrevet fre. d. 20. januar 2006 kl. 11:45:06| #9

donkazz
donkazz (11.670 point)
Perfekt fennec... Works like a charm! :-D Smid et svar, så' der point...

Skrevet fre. d. 20. januar 2006 kl. 12:11:13| #10

fennec
fennec (118.176 point)
.o) <-- One Eyed Jack

Skrevet fre. d. 20. januar 2006 kl. 13:54:07| #11

donkazz
donkazz (11.670 point)
Tak for hjælpen :-)

God weekend!

Skriv et indlæg




Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] [img]link til billede[/img]
Web- og emailadresser omdannes automatisk til links

Log ind

   

   

Seneste spørgsmål

ASP: formular udtræk med mulighed for at rette

Oprettet den 21. maj 2012 kl. 15.09
quarkb giver 200 point for svar | Giv et svar »

Sorter biblioteker efter dato i ASP

Oprettet den 17. maj 2012 kl. 16.52
4ks giver 60 point for svar | Giv et svar »

Simpel login-funktion (web) - behov for flere logins/brugere

Oprettet den 15. maj 2012 kl. 09.54
madx giver 75 point for svar | Giv et svar »



   




Tips & Tricks fra PC World

Teaser billede

Læserne: Her er vores værste it-indkøb

Det er ikke al it-udstyr, som er det rene guld. Her er nogle af læsernes skrækhistorier.


Anmeldelser fra PC World

Teaser billede

Test: Mobil med Ferrari-design - og en Trabant-motor

Motorola har begået endnu en smartphone med lækkert design og potentiale til at være blandt de bedste. Men den når ikke i mål. Se her hvorfor.


Seneste blogindlæg

Teaser billede

Tvangslukke spørgsmål: Hvad er den bedste løsning?

Hej Vi har mange åbne spørgsmål på Eksperten. Vi ville gerne tvangslukke dem - så et spørgsmål efter f.eks. 6 måneder lukkes. Men der er et par uklarheder som ville være gode at få lidt input til:...


Nyheder fra PC World

Teaser billede

Sådan siger du farvel til Facebook

Læs her, hvordan du dropper Facebook og i stedet anvender nogle brugervenlige alternativer, så du stadig kan være social på nettet.


Nyheder fra Computerworld

Teaser billede

Galleri: De fedeste håndholdte gennem 40 år

Her har du de mest banebrydende håndholdte computere gennem alle tider.


Kurser
Samarbejdspartnere

Udgiver · © 2012 IDG Danmark A/S · Hørkær 18 · 2730 Herlev · Tlf.: 77 300 300 · Fax: 77 300 301 · Brug af personoplysninger