larrixrestore.asp

来自「一个ＡＳＰ网站博克程序」· ASP 代码 · 共 15 行

<% Option Explicit %>

<%
	If Session("Passport") = "" Or Session("Passport") <= 0 Or Session("UsrLevel") <> True Then
		Response.Redirect("../Default.asp")
	End If
%>

<%
	Dim objFSO
	Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
	objFSO.CopyFile Server.MapPath("common/LarrixBLOG.asp"), Server.MapPath("../common/LarrixBLOG.asp")
	Set objFSO = Nothing
	Response.Redirect("Default.asp")
%>