*** 请问在VB中如何启动和停止SqlServer服务？ 一定给分 ***

使用SQLServer提供的DMO模型
Createobject("SQLDMO.SQLServer")调用方法ShutDown

解决方案 »

  1.   

    是吗？那么再请问一下：asp中怎样做到？
      

  2.   

    <%@ LANGUAGE=VBScript%><%
    'Buffer output so that different pages can be displayed.
    Response.Buffer = True
    %><HTML>
    <head>
    <title>测试！</title>
    </head>
    <body bgcolor="#FFFFFF" topmargin="0" leftmargin="0" LINK="#0080FF" VLINK="#0080FF"><%
    Dim ccData
    ' Use it to instantiate another object.
    Set ccData = Server.CreateObject("SQLDMO.SQLServer")
    ccData.Connect "你的MSSQLSERVERNAME", "你的用户", "你的口令"
    if ccData.ConnectionID<>0 then
    Response.Write("已经建立连接")
    ccData.Shutdown
    end if
    ccData.Close
    Set ccData=Nothing
    %>
    </body>
    </html>
      

  3.   

    停止服务：
      Shell "net stop mssqlserver", vbHide
    启动服务：
      Shell "net start mssqlserver", vbHide
      

  4.   

    我以前只知道net命令，net命令其实可以完成很多功能的哦，好像在我的理解中，net是微软在应用程序间的消息处理，不知对不对？那么有谁能说说net还可以做些什么？：0
      

  5.   

    上边的程序是SQLServer7.0,运行环境W2K，没用过Sqlserver2k，想来应该是一样的，如果不能正确执行，请确认“控制面板－>管理工具—>服务"中的SQLSERVER服务的“服务名称”是不是
    “mssqlserver”,如果不是，将”Shell "net stop .......",vbHide“语句中的处换成对应的名称就OK了
      

  6.   

    stop是可以的，我刚刚想试一下start但是不行哦
    Private Sub Command1_Click()
    Dim dd As New SQLDMO.SQLServer
    Set dd = CreateObject("SQLDMO.SQLServer")
    'dd.Connect "server", "sa", ""
    dd.Start True, "server", "sa", ""
    End Sub
      

  7.   

    net start 应该可以，检查你是否有足够的权限。