[转帖]如何判断是否安装了sqlserver,如何判断sqlserver是否启动,,如何启动sqlserver

ehxz

免费乐捐，感谢支持

//====================================================================
// 事件: w_login::login_sqlserver
//--------------------------------------------------------------------
// 描述: 检查SERVER是否启动,没有启动就启动它,,启动不了的话返回false
//--------------------------------------------------------------------
// 参数:
//  string server 
//--------------------------------------------------------------------
// 返回值:  boolean true 已经启动,false 没有启动
//--------------------------------------------------------------------
// 作者: 友情水  日期: 2006.07.24
//--------------------------------------------------------------------
// 修改历史:
// 
//====================================================================

Integer result
oleobject loo_sqlserver
loo_sqlserver = Create oleobject
result = loo_sqlserver.ConnectToNewObject("SQLDMO.SQLServer")
If result <> 0 Then
 //   messagebox('提示','创建OLE对象时产生错误')
 Return False
Else
 loo_sqlserver.Name = server
 If loo_sqlserver.status = 1 Then
  loo_sqlserver.DisconnectObject()
  Destroy loo_sqlserver
  Return True
 ElseIf loo_sqlserver.status = 3  Then //服务停止
  loo_sqlserver.Start(False,server,'sa','')
 ElseIf loo_sqlserver.status = 2  Then //服务暂停
   loo_sqlserver.Continue()
 End If
 //启动之后再次判断是否成功-延时等待SQLSERVER启动
 Sleep(6000)
 If loo_sqlserver.status = 2 Or loo_sqlserver.status = 3 Then
  //    messagebox('错误','启动服务失败')
  Return False
 End If
End If
loo_sqlserver.DisconnectObject()
Destroy loo_sqlserver
Return True

查看有哪些数据库可以先连接上master
然后查看表
sysdatabases 这个表里存的数据库的信息\

判断有没有安装sqlserver,可以直接查看一下注册表
  HKEY_LOCAL_MACHINE  
  SOFTWARE\Microsoft\MSSQLSERVER\setup  
  SQLPath  
看看键值存不存在