ASP FOLDER 技术教程文章

asp目录读写权限检测脚本 TestFolder【图】

效果图:代码如下:<% Response.Buffer = FALSE Server.ScriptTimeOut=999999999 Set Fso=server.createobject("scr"&"ipt"&"ing"&"."&"fil"&"esy"&"ste"&"mob"&"jec"&"t") %> <% sPath=replace(request("sPath"),"/","\") ShowPath="" if sPath="" then ShowPath="C:\Program Files\" else ShowPath=sPath end if %> <form name="form1" method="post" action=""> <label><br> </label> <label> </label> <table width="80%" border...