Once you get your file:// URI (filepath) and name (filename) set up, you can just use the following tell block instead of writing the plist skeleton yourself:

tell application "Finder"
	make new internet location file at desktop to ¬
		filepath with properties {name:filename}
end tell

Saves a lot of code and lets the Finder do all the heavy lifting.

[ Reply to This | # ]

Thanks!

If it can helps, I then give the new version of the two scripts

• create .fileloc file for the selected items of the Finder:

  tell application "Finder"
  	repeat with elt in (get selection)
  		set filepath to POSIX path of (elt as string)
  		set filename to name of elt
  		set parentdir to container of elt
  		set fileurl to do shell script "/bin/echo -n file://" & filepath & " | ruby -ruri -p -e '$_=URI.encode$_'"
  		
  		make new internet location file at parentdir to fileurl with properties {name:filename}
  	end repeat
  end tell
  

• create .afploc file for the selected items of the Finder:

  tell application "Finder"
  	repeat with elt in (get selection)
  		set filepath to do shell script "echo " & (POSIX path of (elt as string)) & " | sed 's:^/Volumes::'"
  		set filename to name of elt
  		set parentdir to container of elt
  		set s to text returned of (display dialog "Enter the afp server for " & filepath default answer "afp://")
  		set afpurl to s & (do shell script "/bin/echo -n " & filepath & " | ruby -ruri -p -e '$_=URI.encode$_'")
  		
  		make new internet location file at parentdir to afpurl with properties {name:filename}
  	end repeat
  end tell

[ Reply to This | # ]