kode, der ikke virker

set fso=Server.CreateObject("Scripting.FileSystemObject")
id = Session("ID")
set file=fso.OpenTextFile(Server.MapPath("/pictemp/ id .txt"),8,true)

For I = (First_Image-1) to (Last_Image-1)

If request.form( Image_Array(I) ) = "checked" then
response.write Image_Array(I)
end if
Next


file.WriteLine("Tekst kommer i bunden af filen")
file.Close
set file=Nothing
set fso=Nothing

det er path'en der ikke virker. det der med id!