'**************************************************************************************************'
' Common VBScript functions (client side execution, MSIE only)
'
' @author Krzysztof Chmielewski <chris@artcom-kolo.com.pl>
' @version 1.0 (2004-01-02)
'**************************************************************************************************'

sub vb_add2Favorite()		' dodaj do ulubionych (poprzedzane odp. funkcją w .js)

   'window.external.addFavorite location.protocol + "//" + location.hostname + location.port + "/home/start.asp?link=" + escape(location.pathname + location.search + location.hash), document.title
   window.external.addFavorite location.protocol + "//" + location.hostname + location.port + top.location.pathname + top.location.search + top.location.hash, document.title
end sub