用ASP+DLL实现WEB方式修改服务器时间

timeset.dll （敲回车啊）
3、因为修改服务器的时间，INTERNET来宾帐户不具有该权限，设立权限请打开控制面版中的“管理工具”，然后打开“本地安全策略”－－“用户权力指派”，双击“更改系统时间”，在弹出的对话框中点“添加用户或组”，将INETNET来宾帐户加入进来。
4、一切完毕后，将IIS服务重新启动一次。


在上面的设置完毕后，使用systimeset.dll组件的ASP代码页面如下：

复制代码 代码如下:
<% @language="vbscript" %>
<%
function SetTime(strYear,strMonth,strDay)
response.Expires=0
set obj=server.createobject("systimeset.timeset")
obj.Year=strYear
obj.Month=strMonth
obj.Day=strDay
if Hour(now())-8>0 then
obj.Hour=Hour(now())-8
else
obj.Hour=8
end if
obj.Minute=Minute(now())
obj.Second=Second(now())
obj.setup

set obj=Nothing
end function

if request("act")="modi" then
call SetTime(request.Form("strYear"),request.Form("strMonth"),request.Form

("strDay"))
end if
%>
<form id="form1" name="form1" method="post" action="?act=modi">
<table width="290" border="0">
<tr>
<td width="77"><input name="strYear" type="text" id="strYear" value="<%=Year(now())%>" size="8" /></td>
<td width="49"><input name="strMonth" type="text" id="strMonth" value="<%=Month(now())%>" size="5" /></td>
<td width="48"><input name="strDay" type="text" id="strDay" value="<%=Day(now())%>" size="5" /></td>
<td width="98"><input type="submit" name="Submit" value="修改日期" /></td>
</tr>
</table>
</form>

以上是所有实现的代码，有问题可以加我QQ：17020415

将上面的ASP代码页面粘贴到一个空的ASP文件中，然后在IIS中将站点设置好就可以了。（设置IIS虚拟目录也可以的。）