Avatar billede alleslev Nybegynder
03. marts 2004 - 12:04 Der er 5 kommentarer og
1 løsning

Sætte max størrelse og gyldige fil typer i AspSmartUpload

Hej

jeg har denne kode som jeg oploader billeder med til min server:

'  Variables
'  *********
  Dim mySmartUpload
  Dim intCount
       
'  Object creation
'  ***************
  Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

'  Upload
'  ******
  mySmartUpload.Upload
   
'  Save the files with their original names in a virtual path of the web server
'  ****************************************************************************
  intCount = mySmartUpload.Save("/img/images/" & dato)
  ' sample with a physical path
  ' intCount = mySmartUpload.Save("c:\temp\")

'  Display the number of files uploaded
'  ************************************
  Response.Write(intCount & " file(s) billeder er oploadet til serveren.")

er der nolge der kna kam hjælpe mig med at lave noget kode som viser en fejl vis nolge eller en af filerne er større en 50 kb og vis fil typen ikke er af typen JPG, GIF, BMP
Avatar billede mm12010 Nybegynder
03. marts 2004 - 12:07 #1
//Only allow jpg,gif,bmp files
mySmartUpload.AllowedFilesList = "jpg,gif,bmp";
//DeniedFilesList can also be used :
//Allow all files except exe, bat and asp
  //mySmartUpload.DeniedFilesList = "exe,bat,asp"

//Only allow files smaller than 50KB
mySmartUpload.MaxFileSize = 51200;
Avatar billede mm12010 Nybegynder
03. marts 2004 - 12:07 #2
sorry - såda:

//Only allow jpg,gif,bmp files
mySmartUpload.AllowedFilesList = "jpg,gif,bmp"
//DeniedFilesList can also be used :
//Allow all files except exe, bat and asp
  //mySmartUpload.DeniedFilesList = "exe,bat,asp"

//Only allow files smaller than 50KB
mySmartUpload.MaxFileSize = 51200
Avatar billede mm12010 Nybegynder
03. marts 2004 - 12:08 #3
og igen:

'Only allow jpg,gif,bmp files
mySmartUpload.AllowedFilesList = "jpg,gif,bmp"
'DeniedFilesList can also be used :
'Allow all files except exe, bat and asp
  'mySmartUpload.DeniedFilesList = "exe,bat,asp"

'Only allow files smaller than 50KB
mySmartUpload.MaxFileSize = 51200
Avatar billede alleslev Nybegynder
03. marts 2004 - 12:14 #4
Yes det vikrer hvordan smider jeg så en if, then else sætning ind åsdan at den viser en lidt flottere fejl meddelse???
Avatar billede alleslev Nybegynder
03. marts 2004 - 12:27 #5
men du kan i9vert fald lige lægge et svar og få nolge point
Avatar billede mm12010 Nybegynder
03. marts 2004 - 12:27 #6
On Error Resume Next

'  Variables
Dim mySmartUpload
Dim intCount
       
'  Object creation
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

'  Only allow jpg,gif,bmp files
mySmartUpload.AllowedFilesList = "jpg,gif,bmp"
'  DeniedFilesList can also be used :
'  Allow all files except exe, bat and asp
'    mySmartUpload.DeniedFilesList = "exe,bat,asp"

'Only allow files smaller than 50KB
mySmartUpload.MaxFileSize = 51200

'  Upload
mySmartUpload.Upload

'  Save the files with their original names in a virtual path of the web server
intCount = mySmartUpload.Save("/img/images/" & dato)

'  Trap errors
If Err Then
  Response.Write("<b>Wrong selection: </b>" & Err.description)
End If

'  Display the number of files uploaded
Response.Write(intCount & " file(s) billeder er oploadet til serveren.")
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