Te adjunto el codigo que yo uso para hacer un log.. habria que modificarlo para tu caso...
Código:
<%
Const FICHEROLOG = "c:\inetpub\CarlosC\CarlosC.log" ' Ruta del LOG del SERVIDOR
Sub GenerarLog(sTexto)
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
Set FSO = CreateObject("Scripting.FileSystemObject")
Set file = FSO.OpenTextFile(FICHEROLOG, ForAppending, True)
File.WriteLine Now() & " - " & Request.ServerVariables("REMOTE_USER") & " - " & sTexto
End Sub
%>
Espero que te sirva