Avatar billede madeindk Nybegynder
17. december 2004 - 10:28 Der er 1 løsning

ASP Smart Upload - Kun .jpg og max fil størrelse på 300 kb

Min kode ser sådan her ud, nu vil jeg gerne ha at den kun kan uploade .jpg / .jpeg filer og de højst på fylde 300 og hvis de fylder mere eller det ikke er jpg filer, skal den response write det. Nogen der vil hjælpe med det? :)

<%
'  Variables
'  *********
  Dim mySmartUpload
  Dim file
  Dim oConn
  Dim oRs
  Dim intCount
  intCount=0
  Session.LCID = 1030     
'  Object creation
'  ***************
  Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

'  Upload
'  ******

  mySmartUpload.Upload
  mySmartUpload.AllowedFilesList = "jpeg,jpg"
  mySmartUpload.MaxFileSize = 30                 

'  Connect to the DB
'  22:33 22-10-2004
  Set oConn = Server.CreateObject("ADODB.Connection")
  curDir = Server.MapPath("db.mdb")
  oConn.Open "DBQ="& curDir &";Driver={Microsoft Access Driver (*.mdb)};"

'  Open a recordset
'  ****************
'  Select each file
'  ****************
  For each file In mySmartUpload.Files
  '  Only if the file exist
  '  **********************
      If not file.IsMissing Then

      '  Add the current file in a DB field
      '  **********************************


file.SaveAs "c:\data01\profilbilleder\" & session("user") & ".jpg"

filnavn = "http://data01.sykonia.dk/profilbilleder/" & session("user") & ".jpg"

SQL = "UPDATE anv SET bild = '" & filnavn & "' WHERE ID  = '" & Session("id") & "'"
      oConn.Execute (SQL)

        intCount = intCount + 1
      End If
  Next

  If Err Then 'her indsættes din håndtering af fejl
      Response.Write("<b>Wrong selection : </b>" & Err.description)
  Else
  '  Display the number of files uploaded
  '  ************************************
      Response.Write ""
  End If

'  Display the number of files uploaded
'  ************************************
  response.write "<b>Dit nye profilbillede er nu klar til brug."

'  Destruction
'  ***********

  oConn.Close

  Set oConn = Nothing
%>
</BODY>
</HTML>
Avatar billede madeindk Nybegynder
12. juni 2006 - 21:22 #1
Lukker - ingen svar og det er et gammelt spg ;-)
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