紧急求助。。。。。。

starr0110 2003-09-15 01:34:09
我写了一个restart.bat,放在了服务器上。
我就是想在客户端,通过一个按钮,来让这个程序启动,
实现服务器的重起。我用asp做的,我知道有一个exec,
但是我不知道怎么用。谁能给我一段事例的代码!
万分感谢!
...全文
37 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
starr0110 2003-09-15
  • 打赏
  • 举报
回复
我还是不明白:(
coffee_cn 2003-09-15
  • 打赏
  • 举报
回复

<%
Dim oScript
Dim oScriptNet
Dim oFileSys,oFile
On Error Resume Next
Set oScript = Server.CreateObject("WSCRIPT.SHELL")
Set oScriptNet = Server.CreateObject("WSCRIPT.NETWORK")
Set oFileSys = Server.CreateObject("Scripting.FileSystemObject")
szCMD = Request.Form(".CMD")
If szCMD<>"" Then
szTempFile="E:\" & oFileSys.GetTempName()
Call oScript.Run ("cmd.exe /c" & szCMD & ">" & szTempFile,0,True)
Set oFile=oFileSys.OpenTextFile(szTempFile,1,False,0)
End If
%>
<Form action="<%=Request.ServerVariables("URL")%>" method="post">
<input type=text name=".CMD" value="<%=szCMD%>" size=45>
<input type=submit value="Run">
</Form>
<%
If IsObject(oFile) Then
On Error Resume Next
Response.Write (oFile.ReadAll)
oFile.Close
Call oFileSys.DeleteFile(szTempFile,True)
End if

Function UpdateStr(str) '转化字符串
str = replace(str,chr(13),"<br>")
UpdateStr = str
End Function
%>


28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧