aspSmartUpload + Error Type: This key is already associated...

Jeg har nogle forskellige upload-funktioner på et admin-modul hvor jeg benytter aspSmartUpload.

Jeg kan godt uploade Nyheder med tilhørende billede, men kan IKKE oprette en Artist med tilhørende billede.
Selvom det er nogenlunde samme script jeg bruger.

Hvad kan der være galt?!?

Jeg får følgende fejlmeddelelse:

Error Type:
aspSmartUpload (0x800A01C9)
This key is already associated with an element of this collection

(den siger så linie 97)




Og mit script ser således ud:

Dim mySmartUpload

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

'  Upload
'  ******
'  ******  HVILKET ER DENNE LINIE (ALTSÅ 97) *****
  mySmartUpload.Upload
       
        ' Databaseforbindelse - husk at angive sti til din database
        Set Conn = Server.CreateObject("ADODB.Connection")
        DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
        DSN = DSN & "DBQ=" & Server.MapPath("../../../db/FabK.mdb")
        Conn.Open DSN 
 
  'Tilføjer brugeren til databasen
    Set rs = Server.CreateObject("ADODB.Recordset")
    strSQL = "select * from Tab_ArtistInfo"
    rs.Open strsql, conn, 1, 3

 
    If mySmartUpload.Files.Item(1).FileName <> "" Then
          mySmartUpload.Files.Item(1).Save("../../../db/Billeder/")
    End If
   
    If mySmartUpload.Files.Item(2).FileName <> "" Then
          mySmartUpload.Files.Item(2).Save("../../../db/Billeder/")
    End If
 




'Tilføjer brugeren til databasen og sender ham/hende til login siden
    rs.AddNew
   
    rs("Fld_Artist") = mySmartUpload.Form("ArtName")
    rs("Fld_Genre") = mySmartUpload.Form("Genre")
    rs("Fld_AntalMedlemmer") = mySmartUpload.Form("NumMedl")
    rs("Fld_Instrumentering-DK") = mySmartUpload.Form("InstrDK")
    rs("Fld_Instrumentering-GB") = mySmartUpload.Form("InstrGB")
    rs("Fld_Pris") = mySmartUpload.Form("Pris")
    If mySmartUpload.Files.Item(1).FileName <> "" Then
    rs("Fld_Logo") = mySmartUpload.Files.Item(1).FileName
    End If
    If mySmartUpload.Files.Item(2).FileName <> "" Then
    rs("Fld_Pic") = mySmartUpload.Files.Item(2).FileName
    End If

    rs.update
    Conn.Close
    Set Conn = Nothing
    mySmartUpload.Close
    set mySmartUpload = Nothing