★WSHでCGI★JScriptVBScript

★WSHでCGI★JScriptV ..

23:nobodyさん
03/08/07 00:18
【JScriptサンプル01：簡易アクセスログ】※以下のコードをメモ帳にでもコピーして拡張子.jsでWebサーバーに置くこと。
var ObjDate=new Date()
with (ObjDate) {
var AcsLogFileName=getFullYear() + "_" + (getMonth()+1) + "_" + getDate() + ".log";}
var ObjWshShell = WScript.CreateObject("WScript.Shell");
var ColWshEnv=ObjWshShell.Environment("Process")
var ObjFSO=new ActiveXObject("Scripting.FileSystemObject");

var ObjTS=ObjFSO.OpenTextFile("./" + AcsLogFileName,8,true);
ObjTS.WriteLine(ColWshEnv("REMOTE_ADDR") + "<>" + ObjDate.toString());
ObjTS.Close();

with (WScript.StdOut) {
WriteLine("Location: URLﾘﾝｸ(127.0.0.1)") ;}

次ページ

続きを表示

1を表示