[MSSQL]查看服务器工作状态

 

---查看服务器工作状态
create function fgetsstatus(  
@servername varchar(50) --服务器名  
,@userid varchar(50)='sa' --用户名,如果为nt验证方式,则为空  
,@password varchar(50)='' --密码  

) returns varchar(20)  
as  
begin  
declare @re varchar(20),@ire int --返回状态  
declare @srvid int --定义服务器、数据库集id  
declare @err int,@src varchar(255), @desc varchar(255) --错误处理变量  

--创建sqldmo对象  
exec @err=sp_oacreate 'sqldmo.sqlserver',@srvid output  
if @err <>0 goto lberr  

--连接服务器  
if isnull(@userid,'')='' --如果是 Nt验证方式  
begin  
  exec @err=sp_oasetproperty @srvid,'loginsecure',1  
  if @err <>0 goto lberr  

  exec @err=sp_oamethod @srvid,'connect',null,@servername  
end  
else  
  exec @err=sp_oamethod @srvid,'connect',null,@servername,@userid,@password  

if