DouKaku?

var objFSO = new ActiveXObject("Scripting.FileSystemObject");

function /* void */ rmComments( ifname, ofname ) {
    contents = "";
    if( objFSO.FileExists( ifname ) ) {
	ifileObj = objFSO.GetFile( ifname );
	streamR = ifileObj.OpenAsTextStream( 1 );
	streamW = objFSO.CreateTextFile( ofname );
	try {
	    while( !streamR.AtEndOfStream ) {
		contents = streamR.ReadLine();
		if( contents.search(/#/) != 0 ) {
		    streamW.WriteLine( contents );
		}
	    }
	} finally {
	    streamR.Close();
	    streamW.Close();
	}
    } else {
	throw (ifname + ": No Such File");
    }
    return;
}

var arg = WScript.Arguments.Unnamed;
rmComments( arg.Item(0), arg.Item(1) );