iTunes: Open with QuickTime

Scripting Forums Code Exchange
#1 
tell application "iTunes"
	try
		set selectedItem to location of first item of selection
	on error errMsg number errNum
		activate
		display alert "Error " & errNum message errMsg buttons {"Cancel"} default button 1
		error number -128
	end try
end tell

tell application "QuickTime Player"
	activate
	open selectedItem
end tell