set {linkinfo, linkbutton} to the {text returned, button returned} of (display dialog "Enter your link text, alt text, or click-through url" default answer "" buttons {"Image link", "Click-Though Image link", "Url Link"} default button "Url Link")