Hjælp til Upload script

Hey

Lige nu benytter jeg mig af aspSmartUpload til at uploade billeder med. Jeg vil nu gerne bygge en funktion på, der gør det muligt at ændre navnene på billederne og størrelserne. Jeg har mulighed for fx. ASPimage hos UnoEuro's webhotel. Mit nuværende script ser sådan ud:

if Request.ServerVariables("REQUEST_METHOD") = "POST" then

'  Variables
'  *********
  Dim mySmartUpload
  Dim intCount   


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

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

    if mySmartUpload.Form("galleri") = "" then
    galleri = mySmartUpload.Form("galleri1")
    else
    galleri = mySmartUpload.Form("galleri")
    end if

    sti = "/billeder/"& galleri

    set fs = createobject("scripting.filesystemobject")
    MyFolder = server.mappath(sti)

If NOT fs.folderexists(MyFolder) then
    fs.createfolder(MyFolder)
End If

'  Save the files with their original names in a virtual path of the web server
'  ****************************************************************************
  intCount = mySmartUpload.Save(sti)



'  Display the number of files uploaded
'  ************************************
    Response.Write(intCount & " billeder uploaded til galleriet: <b>" & galleri & "</B>")

end if