aspsmartupload - tekst og billed

Er der nogen der kan hjælpe med dette script.
Fra en form bliver to felter med tekst samt en fil sendt til serveren. Teksten samt en sti til billedet skal ligges i en database.

Som et ekstra spørgsmål, kan aspsmartupload gemme filen under et nyt navn hvis det i forvejen eksistere eller anden løsning. I så fald må du gerne skrive løsningen på dette med.

Nedenstående kode har jeg begyndt med, men jeg ved ikke hvilke kommandoer man kan bruge sammen med aspsmartupload. Har kigget lidt på deres hjemmeside.

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

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


'  Select each file
'  ****************
  For each file In mySmartUpload.Files
  '  Only if the file exist
  '  **********************
      If not file.IsMissing Then
      '  Save the files with his original names in a virtual path of the web server
      '  ****************************************************************************
       
        'file.SaveAs("/../konkurrence" & file.FileName)
        ' sample with a physical path
        file.SaveAs("e:\kunder\ramsoe-usk.dk\konkurrence\" & file.FileName)

      '  Display the properties of the current file
      '  ******************************************
        Response.Write("Name = " & file.Name & "<BR>")
        Response.Write("Size = " & file.Size & "<BR>")
        Response.Write("FileName = " & file.FileName & "<BR>")
        Response.Write("FileExt = " & file.FileExt & "<BR>")
        Response.Write("FilePathName = " & file.FilePathName & "<BR>")
        Response.Write("ContentType = " & file.ContentType & "<BR>")
        Response.Write("ContentDisp = " & file.ContentDisp & "<BR>")
        Response.Write("TypeMIME = " & file.TypeMIME & "<BR>")
        Response.Write("SubTypeMIME = " & file.SubTypeMIME & "<BR>")

'  Select each item
'  ****************
  For each item In mySmartUpload.Form
  '  Select each value of the current item
  '  *************************************
      For each value In mySmartUpload.Form(item)
'Tilføjer brugeren til databasen
    Set rs = Server.CreateObject("ADODB.Recordset")
    strSQL = "select * from konkurrence"
    rs.Open strsql, conn, 1, 3
   
'Tilføjer brugeren til databasen og sender ham/hende til login siden
    rs.AddNew
    rs("Overskrift") = " & value & "
    rs("Teaser") = " & value & "
    rs("Url") = file.FileName
    rs("Dato") = Now()
    rs.update

        intCount = intCount + 1
        Response.Write(item & " = " & value & "<BR>")
      Next
  Next
End If
'  Display the number of files which could be uploaded
'  ***************************************************
  Response.Write("<BR>" & mySmartUpload.Files.Count & " files could be uploaded.<BR>")

'  Display the number of files uploaded
'  ************************************
  Response.Write(intCount & " file(s) uploaded.<BR>")
%>