3초기억력

function View_Source(Target_URL) '//파일오브젝트 생성 Set FSO_Open = Server.CreateObject("Scripting.FileSystemObject") '//파일 경로지정 Filepath = Server.Mappath(Target_URL) '//파일 오픈 Set File_Open = FSO_Open.OpenTextFile(Filepath, 1) '//파일 읽고 변수에 값 넣음 Text_FSO = File_Open.ReadAll '//닫기 Set File_Open = nothing Set FSO_Open = nothing '//ASP 파일에서 사용한 특정 캐릭터를 변환(순서 조심) Text_FSO = Replace(Text_FSO, "&", "&") Text_..

set fso = Server.Createobject("Scripting.filesystemobject")result = fso.fileexists("D:\Site_Test\test.txt") if result = true then Set ofile=fso.OpenTextFile("D:\Site_Test\test.txt",8,true) ofile.Writeline "datetime=" & now() ofile.Writeline "------------" ofile.close  Set ofile=Nothingend ifSet fso=Nothing%>