<!--#include file="../p_inc/config.asp"-->
<%
Shortcut = "REGEDIT4" & vbCrLf
Shortcut = Shortcut & "[-HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\添加到"&G_WEBNAME&"收藏夹]"&"" & vbCrLf
Shortcut = Shortcut & "[-HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\添加到"&G_WEBNAME&"收藏夹]" & vbCrLf
Shortcut = Shortcut & "[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\添加到"&G_WEBNAME&"收藏夹]" & vbCrLf
IF G_VIRTUAL_ROOT_DIR="" Then
	Shortcut = Shortcut & "@="""&G_WEBURL&"ztool/favorite/rc.htm""" & vbCrLf
Else
	Shortcut = Shortcut & "@="""&G_WEBURL&G_VIRTUAL_ROOT_DIR&"/"&"ztool/favorite/rc.htm""" & vbCrLf
End IF
Shortcut = Shortcut & "" & vbCrLf
Response.AddHeader "Content-Disposition", "attachment;filename="&G_WEBNAME&".reg;"
Response.ContentType = "application/octet-stream"
Response.Write Shortcut
%>


