vb中的实时错误70

vb中的实时错误70
我做了个备份还原的窗体单个可以运行,但是登陆后就不可以了,
显示"实时错误70拒绝有权限",我的数据库是关闭的。
请高手指教呀,,
急呀。。
谢谢了!
我的数据库是用ADO连接的.怎以用命令关闭数据库后,用FILECOPY语句备份完后,再连接上.这是我的模块中的代码:
Public adoCon As New ADODB.Connection
Public adoRs As New ADODB.Recordset
Public adoRs1 As New ADODB.Recordset
Public Name1 As String
Public StrNums As Integer
Public Temps
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Public rtn
Public TWidth As Long
Public THeigth As Long
权限不够。
← 上一篇: 下一篇: →