Dim tmpConnectionString As String = Data Source=JJK;Initial Catalog=master;Integrated Security=True cn ConnectionString = tmpConnectionString cn ConnectionString = tmpConnectionString cn Open() cn Open() Dim cm As SqlCommand = New SqlCommand( select spid from master sysprocesses where dbid=db_id( JXbase ) cn) mydr = cm ExecuteReader()
Dim cm As SqlCommand = New SqlCommand() cm Connection = cn
While (mydr Read()) 杀死进程
str = killmydr( spid ) ToString() cm CommandText = str cm CommandType = CommandType Text Application DoEvents() cm ExecuteNonQuery() 杀进程 End While mydr Close() cm = New SqlCommand( RESTORE DATABASE JXbase FROM DISK= C:\Backup cn) 恢复备份 cm ExecuteNonQuery() MsgBox( 恢复成功成功 ) cn Close() cn Close()
lishixinzhi/Article/program/net/201311/12901
【vb.net数据库应用 vb数据库操作实例】vb.net数据库应用的介绍就聊到这里吧 , 感谢你花时间阅读本站内容,更多关于vb数据库操作实例、vb.net数据库应用的信息别忘了在本站进行查找喔 。
推荐阅读
- python爬虫局部变量,python获取局部变量
- u盘系统坏了怎么装系统,u盘装系统教程图解
- python爬虫代码怎么懂,python爬虫基础代码
- vb.net新增事件的简单介绍
- vb.netxml配置文件的简单介绍
- 冒险类游戏ios,冒险类游戏有哪些
- 监控硬盘坏了怎么重装系统,监控硬盘格式化后数据还能恢复吗
- linux释放空间命令,释放linux cache
- 华为荣耀x1怎么升级鸿蒙系统,华为荣耀x1怎么升级鸿蒙系统30