小弟初学VB,根据网上的代码,想实现启动MSDE的函数,但引用了SQLDMO后运行还是有错误,错误429。
Public Function sStartMSDE(sSvrName As String, sUID As String, sPWD As String) As String
Dim oSvr As SQLDMO.SQLServer
Set oSvr = CreateObject("SQLDMO.SQLServer ")
On Error GoTo StartError
.............
在CreateObject("SQLDMO.SQLServer ")这句出错。还有sCopyError:
If Err.Number = -2147216399 Then
Resume Next ' (这句话是什么意思?)
............
请各位大侠指点,谢谢
Public Function sStartMSDE(sSvrName As String, sUID As String, sPWD As String) As String
Dim oSvr As SQLDMO.SQLServer
Set oSvr = CreateObject("SQLDMO.SQLServer ")
On Error GoTo StartError
.............
在CreateObject("SQLDMO.SQLServer ")这句出错。还有sCopyError:
If Err.Number = -2147216399 Then
Resume Next ' (这句话是什么意思?)
............
请各位大侠指点,谢谢
那么第一个错是怎么回事?
Set oSvr = CreateObject("SQLDMO.SQLServer ")
我在模块里写:Public Declare Function SQLServer Lib "SQLDMO" ()
这样的声明后就没事了,但是运行有错。而且我也觉得这样声明不对啊。因为SQLServer 应该不是FUNCTION ,且()里的参数留空了。 应该怎么办?
执行sStartMSDE后说RPC不可用,怎么回事?
但是启动成功了,在右下角的任务管理器里却没有那图标,后台的进程就有SQLSERVER进程。这样是成功启动了么?
还有怎样去获得其他有数据库的机的HOSTNAME?