upload billede

Jeg er igang med at lave en adresseliste på min hjemmeside. I den adresseliste skal brugerne kunne uploade et billede til deres profil.

Jeg har fået uploaddelen til at virker og nu prøver jeg at navngive fil så navnet er lig med brugerid'et, men jeg kan ikke få det til at virke.
Lige nu bliver navnet blankt.

Min kode ser sådan her ud:

<%
sql="select * from adresse where id = '" & session("brugerid") & "'"
set record=rs.execute(sql)

  Dim mySmartUpload
  Dim file

  Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
 
  mySmartUpload.AllowedFilesList = "jpg,jpeg,gif,"
  mySmartUpload.DeniedFilesList = "exe,bat,asp,txt,htm,html,bmp"

  mySmartUpload.MaxFileSize = 100000

  mySmartUpload.Upload

  For each file In mySmartUpload.Files
        file.SaveAs("/billeder/adresseliste/" & id& " & file.FileExt & ")
  Next

      Response.Redirect("profil.asp")
%>