用ASP发送信使服务

<%
dim wsh
set wsh = createobject("WScript.Shell")
response.write wsh.run("net send 127.0.0.1 hi")
set wsh = nothing
%>