asp 書いた - neotagの雑文

WindowsServer でVBScriptしか使えなくて初めて .asp なファイル書いた。

<%@ language = "VBScript" %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS" />
<title>SVN UP</title>
</head>
<body>
<%
Set objShell = Server.CreateObject("WScript.Shell")
Set objExecSvnUp = objShell.Exec("svn up C:\www")
Do Until objExecSvnUp.StdOut.AtEndOfStream
	strLine = objExecSvnUp.StdOut.ReadLine
	Response.write(strLine)
	Response.write("<br />")
Loop
%>
</body>
</html>

ファイル数多いと時間かかるのは仕様。