tell application "Finder"
	set theSelection to (alias (path to desktop folder as text))
	set theCount to the count of windows
	if theCount > 0 then set theSelection to the target of the front Finder window
	make new Finder window to theSelection
	activate
end tell