VB中对SQL SERVER数据库的备份 我们做一进销存软件后台是Sql server数据库,要在VB中加入对数据库的备份功能如何实现啊,大虾帮忙啊分要多少给多少啊! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 'sql server 的备份方法If CN.State = adStateOpen Then CN.Close CN.ConnectionTimeout = 10 connstr = "Driver={SQL Server};Server=" & LocalServer & ";UID=" & LocalUser & ";PWD=" & LocalPw & ";DATABASE=" & LocalDb CN.Open connstrNowtime = Format(Now, "hh-mm-ss")dd = str(Date)riqi = dd + "-" + NowtimeSql = "BACKUP DATABASE tablename TO disk='D:\mssql7\BACKUP\tablename" & riqi & "' with noinit"CN.Execute (Sql) http://expert.csdn.net/Expert/FAQ/FAQ_Index.asp?id=127326 恢复的时候,连接master数据库用restore database name from disk='d:\.......... 幼稚的问题, 请大家帮一下 得到文件夹中的文件数量多少?急!! 请问用WORD模板用来做打印报表时,做好后的软件在没有装办公软件的机子上还能运行吗 sql中查询,用activereport打印 时间问题,急 关于输入法的API函数?如何添加一种新输入法?? [出售]VB成型网络软件源码!!! 能否在代码里实现PPOE拨号和建立VPN连接 打印问题急救??? 请版主帮忙结帐,结完请告知 VB中如何创建程序的快捷方式(指在C:\目录下创建),并且如何在程序中调用执行 为什么有的机器上出现OpenDatabase错误?
If CN.State = adStateOpen Then CN.Close
CN.ConnectionTimeout = 10
connstr = "Driver={SQL Server};Server=" & LocalServer & ";UID=" & LocalUser & ";PWD=" & LocalPw & ";DATABASE=" & LocalDb
CN.Open connstr
Nowtime = Format(Now, "hh-mm-ss")
dd = str(Date)
riqi = dd + "-" + NowtimeSql = "BACKUP DATABASE tablename TO disk='D:\mssql7\BACKUP\tablename" & riqi & "' with noinit"
CN.Execute (Sql)
restore database name from disk='d:\..........