如何用sqldmo控制sql server服务器的开和关？？？

Question

如何用sqldmo控制sql server服务器的开和关？？？

Answer 1

var oSQLServerDMOApp : Variant;
    oSQLServer: Variant;
begin 
oSQLServerDMOApp := CreateOleObject('SQLDMO.Application');
    oSQLServer := CreateOleObject('SQLDMO.SQLServer');    //If oSQLServer.Status = SQLDMOSvc_Running Then
    oSQLServer.Stop ;
    sleep(10000);
    //If oSQLServer.Status = SQLDMOSvc_Paused Then  oSQLServer.Continue
   // Else
    oSQLServer.Start;
    oSQLServer.RefreshStatus ;
end;
它说dmo句柄无效，该怎么写啊

Answer 2

oSQLServerDMOApp,oSQLServer 这两个之间是什么关系?
我怎么没看到它们的关联?