如题
解决方案 »
- VB报表打印时显示invalid data resource
- vb做的DLL测试没问题但ASP不能调用为啥??
- VB菜鸟入门,刚刚制作的计算器,但是运行是+-*/按钮出错,大虾们帮我解决解决啊,源码在内!在线等候!
- mschart的 x、y轴 怎么互换?
- 图片控件使用问题!求你帮忙了!真的有点急。。
- 怎么样在不同窗体中传递变量?
- 很简单的问题
- 救命啊!动态创建一个MDB表,如何设置它的字段属性可以为空?
- 请问哪儿可以下载activeX的单独安装程序?
- 关于SQLDMO的用法
- 关于透明控件的问题。救急!!!!!!!!!!!!!
- 请问我如何将某个文件夹下面的所有文件和文件夹用treeview 表现出来
同意楼上的代码思路:
1.后台运行 net start mssql
2.修改注册表,将程序添加到启动项中
所以scm还是最佳选择
Private rbjSqlDmo As SQLDMO.Application '运行程序的实力
Private rbjsqldmoSvr As SQLDMO.SQLServer '声明服务器对象
Dim a As Integer’定义一个开关在打开一次后不允许打开第二次
Private Sub CmdStart_Click()
If a = 0 Then
Set rbjSqlDmo = New SQLDMO.Application
Set rbjsqldmoSvr = New SQLDMO.SQLServer
rbjsqldmoSvr.Start True, "accp3_10", "sa", ""
a = 1
End If
End SubPrivate Sub CmdStop_Click()
rbjsqldmoSvr.Stop
a = 0
End SubPrivate Sub Form_Load()
a = 0
End Sub