aspSmartUpload - 2 filer - hvilken rækkefølge

Jeg har et uploadscript, hvor der skal uploades 2 billeder, som der skal gøres noget forskelligt ved.

Mit problem er at jeg i scriptet ikke ved hvilken fil der er hvad.
Jeg regnede først med at den tog den mindste fil først, da den vil være den første der bliver uploadet, men det ser ud til at det er ret tilfældigt.

Mit billedbehandling ser således ud:

function uploadImg
    'UPLOAD BILLEDE************************************************************************************************************************************
    dim intFile
    intFile = 1
    For Each File in objFiles
        if intFile = 1 then
            'SQL*******************************************************************************************************************************************
            dim intSort
            strSQL = "SELECT MAX(i_Sort) AS i_Max FROM tbl_PortalImg WHERE u_PortalUID = '{" & mySmartUpload.form("frmUID") & "}'"
            set RS = exec(strSQL)
            if isNull(RS("i_Max")) then
                intSort = 1
            else
                intSort = RS("i_Max") + 1
            end if
            strSQL = "INSERT INTO tbl_PortalIMG (u_PortalUID, i_Sort) VALUES ('" & mySmartUpload.form("frmUID") & "', " & intSort & ")"
            exec(strSQL)
            strSQL = "SELECT @@IDENTITY as newID"
            set RS = exec(strSQL)
            id = parseUID(RS("newID"))
            strSQL = "SELECT u_UID FROM tbl_PortalIMG WHERE i_Id = " & id
            set RS = exec(strSQL)
            id = parseUID(RS("u_UID"))
           
            'THUMB MAIN
            Image.LoadImage(File.path)
            If (image.MaxX > 175) then
                resizeX(175)
            end if
            Image.FileName = server.mappath("../upload/portal") & "/" & id & "_thumb.jpg"
            Image.SaveImage
           
            'THUMB BLUE*************************************************************************************************************************************
            Image.LoadImage(File.path)
            Image.CreateGrayScale
            'Image.BrightenImage 5
            Image.DarkenImage 8
            Image.Contrast 10
            Image.DoMerge server.mappath("blue.jpg"), 50
            If (image.MaxX > 175) then
                resizeX(175)
            end if
            Image.FileName = server.mappath("../upload/portal") & "/" & id & "_blue.jpg"
            Image.SaveImage
           
            intFile = intFile + 1
        else
            'BILLEDBEHANDLING*******************************************************************************************************************************
            Image.LoadImage(File.path)
            If (image.MaxX > 600) then
                resizeX(600)
            end if
            intWidth = Image.MaxX
            intHeight = Image.MaxY
            strSQL = "UPDATE tbl_PortalIMG SET i_Width = " & intWidth & ", i_Height = " & intHeight & " WHERE u_UID = '{" & id & "}'"
            exec(strSQL)
            Image.FileName = server.mappath("../upload/portal") & "/" & id & ".jpg"
            Image.SaveImage
           
        end if
        File.delete
    Next
end function