Getting set of aliases from the Finder

Scripting Forums AppleScript | Mac OS X
,
#1

This code will return the alias to a selected file:

tell application "Finder"
	activate
	set FileToSend to selection as alias
end tell

How can I extend it to accept more than one selection (shift-selected in Finder)?
There doesn’t seem to be a means of counting selections (that I’ve discovered).

#2

Reply to Self:

tell application "Finder"
	activate
	set ListOfFiles to selection as list
	-- Make Aliases of the ListofFiles
	repeat with aFile in ListOfFiles
		set contents of aFile to aFile as alias
	end repeat
end tell
-- Do something with the list of aliases
ListOfFiles