aspsmart upload spørgsmål

Jeg har følgene kode:(se nederst)

Jeg kunne nu godt tænke mig at vide om jeg i lykken
For each file In mySmartUpload.Files
kan få info ud(kun billeder der uploades) som bredde og højde?

er det også mulig at lave sådan hvis en fil allerede ligger der med samme navn som den man er ved at uploade, så overskriver den ikke, men fortæller bare brugeren at den ikke blev uploaded, evt spørge om et nyt navn for den.


key = request.querystring("key")

If key = 1 then


  On Error Resume Next

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

'  Only allow txt or htm files
'  ***************************
  mySmartUpload.AllowedFilesList = "jpg,jpeg,gif"

'  DeniedFilesList can also be used :
  ' Allow all files except exe, bat and asp
  ' ***************************************
  ' mySmartUpload.DeniedFilesList = "exe,bat,asp"

'  Deny physical path
'  *******************
  mySmartUpload.DenyPhysicalPath = True

'  Only allow files smaller than 5.000.000 bytes
'  *****************************************
  mySmartUpload.MaxFileSize = 5000000

'  Deny upload if the total fila size is greater than 20.000.000 bytes
'  ***************************************************************
  mySmartUpload.TotalMaxFileSize = 20000000

'  Upload
'  ******
  mySmartUpload.Upload

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

'  Connect to the DB
'  *****************

'  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.FileName = filnavn

      End If
  Next

'  Trap errors
'  ***********
  If Err Then
      Response.Write("<b>Wrong selection : </b>" & Err.description)
  Else
  '  Display the number of files uploaded
  '  ************************************
      Response.Write(intCount & " file(s) uploaded.")
  End If
end if
%>
<table class="Newsframe"><tr><td></td></tr>
    <tr><td class="NewsHead">Upload</td></tr>
    <tr><td class="NewsBody">
       
    <form METHOD='Post' ENCTYPE='multipart/form-data' ACTION='upload.asp?key=1' id='form3' name='form3'>
        <INPUT TYPE="FILE" NAME="FILE1" SIZE="50"><BR>
        <INPUT TYPE="FILE" NAME="FILE2" SIZE="50"><BR>
        <INPUT TYPE="FILE" NAME="FILE3" SIZE="50"><BR>
          <INPUT TYPE="FILE" NAME="FILE4" SIZE="50"><BR>
        <input type='submit' name='Action' value='UPLOAD'>
  </form>
       
        </td></tr>
    <tr><td>
    </td></tr>
</table><br>