ASP 로그남기기

 '로그 남기기기.....
 S_Date = GetCurtime24h() 'FormatDateTime(date,0)
 
 str = CTN & "|" & wflag & "|" & now
 
 'LogPath = Server.MapPath("D:\logTest")&"\"&S_Date&".txt"

 logName = replace(FormatDateTime(date,0),"-","")
 
 'S_Date = replace(S_Date,"-","")
 LogPath = "D:\sqldata\"&logName&"1111.log"
 
 Dim FileObject
 SET FileObject = Server.CreateObject("Scripting.FileSystemObject")
 Set Out= FileObject.OpenTextFile(LogPath, 8, TRUE)
 Out.WriteLine(str)
 Out.close
 SET Out = Nothing
 SET FileObject=Nothing