samples/store/save.asp

（完整代码） 1KB 

<%
	filename = Request("winlike_savename")
	' for the script kiddies
	filename = replace(filename,".","")
	filename = replace(filename,"/","")
	filename = replace(filename,"\","")
	filename = replace(filename,"'","")
	filename = replace(filename,"""","")
	' generate the physical filepath
	path_1 = Request.ServerVariables ("APPL_PHYSICAL_PATH") ' f.e. "E:\www\virtualDir\"
	path = Request.ServerVariables("PATH_INFO") ' f.e. "/virtual_dir/winlike/samples/store/load.asp"
	path_array = Split(path, "/")
	if UBound(path_array)>3 then
		path_array(1) = "" ' f.e. cut the "virtual_dir"
	end if	
	path_array(UBound(path_array,1)) = "" ' f.e. cut the "load.asp"
	path_2 = Join(path_array, "/")
	folder=path_1+path_2+"files/" ' f.e. "E:\www\virtualDir\//winlike/samples/store/"
	' save file
	Set fs=Server.CreateObject("Scripting.FileSystemObject")
	Set tf=fs.OpenTextFile(folder+filename+".txt",2,True)
	tf.Write(Request("winlike_data"))
%>

<SCRIPT>
	alert("Successfully saved! - Load this name to see this layout again.");
</SCRIPT>

24 小时内免费解锁 3 个项目，之后 1 算力/个。 规则说明

AI 解读 AI

登录后可用，每次 10 算力，解读结果公开显示在下面。

还没有人解读过这个文件。