why was a shortcut created instead of a file?

[code]Sub Quarantine(f as FolderItem)
Dim q As FolderItem = SpecialFolder.Desktop

if not q.Child(“Quarantine”).Exists then
q.Child(“Quarantine”).CreateAsFolder()
end if

If q Is Nil Then
Return
End If

q = q.Child(“Quarantine”)

dim tmp as string = format(Microseconds, “#################”) + “.dcm”
q = q.Child(tmp)
f.CopyFileTo q

End Sub
[/code]

This code seems to work to copy a folder item, however the icon in the quarantine folder seems to indicated (via an arrow) that it is in fact a short cut to the original file. (Which probably wont exist for much longer.)

Did I miss something?

Take a look at TRUEITEM

Read it… don’t get it.

if your folderitem is an alias. TRUEITEM resolves the alias to actual path

Sorry Dave, to which folder item in this method are you referring?

The parameter ‘f’ to the procedure is not an alias…

oh wait a minute… yes it is … thanks Dave.

So in order to determine if a folder item is actually an alias or to protect yourself from this type of thing happening is there any thing wrong with saying:

f = f.TrueItem

That way if it is an alias you get the actual data and if it isn’t then nothing has changed.