Avatar billede mekaniker Nybegynder
14. august 2002 - 11:52 Der er 2 kommentarer og
1 løsning

ASPupload

Jeg er ved at lave en mailingliste i den forbindelse skal jeg uploade 2 filer.
Den ene er en attachment og den anden er en html-fil eller en text-fil.

Jeg bruger følgende til at tjekke om man har valgt det rigtige.

Det første tjek er attachment, og den virker fint.

Men den anden virker ikke.... Hvorfor..????
-----------------------------------------------

attach = Upload.Form("attach")


Set attach = Upload.Files("attach")


    If attach is nothing Then
        Pic = 0
    Else
        Pic = attach.ExtractFileName
   
   
    If attach.ImageType <> "GIF" and attach.ImageType <> "JPG" Then
        attach.delete
        response.redirect "form.asp?subject=" & upload.form("subject") &"&tekst=" & upload.form("tekst") &"&format=" & attach.ImageType &"&billed=type&fejl=1"
       
  End if
 
    If attach.ImageWidth > 600 or attach.ImageHeight > 600 Then
        attach.delete
        response.redirect "form.asp?subject=" & upload.form("subject") &"&tekst=" & upload.form("tekst") &"&bredde=" & attach.ImageWidth &"&hoejde=" & attach.ImageHeight &"&billed=bredde&fejl=1"
    End if       

    If attach.Size > 150000 Then
        attach.delete
        response.redirect "form.asp?subject=" & upload.form("subject") &"&tekst=" & upload.form("tekst") &"&&stoerrelse=" & attach.size &"&billed=stoerrelse&fejl=1"
    End if   
    End if
Avatar billede mekaniker Nybegynder
14. august 2002 - 11:52 #1
Hov jeg glemte lige den anden del.
Avatar billede mekaniker Nybegynder
14. august 2002 - 11:53 #2
'-------------------------------------------------------------------------------------------------------   
html = Upload.Form("html")

Set html = Upload.Files("html")

    If html is nothing Then
        Pic1 = 0
    Else
        Pic1 = html.ExtractFileName
   
   
    If html.ImageType <> "HTML" and html.ImageType <> "TXT" Then
        'html.delete
        response.redirect "form.asp?subject=" & upload.form("subject") &"&tekst=" & upload.form("tekst") &"&format=" & html.ImageType &"&billed=type1&fejl=1"
       
  End if
  End if
     
   
End if
End if
response.redirect "send.asp?subject=" & subject &"&tekst=" & tekst &"&pic=" & pic &"&pic1=" & pic1 & "&unsub=" & unsub & ""
%>
Avatar billede mekaniker Nybegynder
16. august 2002 - 13:39 #3
Lukker sprg.
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