用VB对SQL SERVER数据库进行备份和恢复。启动程序时的登录窗口连接了数据库,但我在unload登录窗口、SHOW数据还原窗口。但在恢复数据时总是提示“因为数据库正在使用,所以未能获得对数据库的排它访问权”。
把数据还原窗体单独加载到新建程序,数据还原运行成功。
请问如何解决该问题,怎样才能关闭所有数据库连接? ......
我在vb中操作excel第一次运行的时候都没有问题,当第二次运行的时候就出现
"对象cells的方法'_Global'失败",我已经把操作excel的对象都nothing了
我个人认为是已经存在excel的进程了,但是如果强制杀excel进程的话又怕错杀无辜
所以大家帮忙看看是什么问题,又怎样解决
http://download.csdn.net/so ......
在VB中如何获得USB端口上的每一个设备的名称,及USBID,应该用哪个API?
试一试这个,不知道有用否。
VB code:
'调用API函数 GetVolumeInformation?
'API声明:
Private Declare Function GetVolumeInformation Lib "kernel32" _
Alias "GetVolumeInformationA" _
(ByVal lpRootPathNa ......
VC DLL:
BOOL __stdcall LEDShowCharge(byte addr,byte ledaddr,int staytime,int charge);
VB :
Declare Function LEDShowCharge Lib "CardPc300.dll" (ByVal Addr As Byte, ByVal ledaddr As Byte, ByVal stattime As Long, ByVal charge As Long) As Boolean
Private Sub LEDShowCharg ......
我用VB操作(或者其他语言)操作word文档,生成需要的文档文件。这种方法是什么?我操作的步骤是这样的:
先“引用”Microsoft Word 11.0 Object Libary.
然后在程序中调用
Dim WordApp As Word.Application
Dim NewDoc As Word.Document
Set WordApp = New Word.Application ......
用vb的代码编写一个能剪切图片的剪切板!!
例如:用自己编的剪切板代替下面的剪切板
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_PASTE = &H302 ......