vb中能进行数据库备份吗？

2001-09-15 03:49:56 156 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

用VB备份和恢复SQLServer数据库的方法对于关键应用的数据库学习应根据具体环境和条件制订一个完善可行确保系统安全的备份计划,没有备份的系统是不可靠、危险的，后果将是严重的，破坏性病毒、误操作、自然灾害等等都可能会对数据库系统造成难以估量的破坏。尤其对一个信息化程度较高的企业来说，最有价值的财产或许就是企业数据库中的数据。一个系统中最重要的是大量的实时数据,没有备份功能显然是不安全和不完善的。经过实践摸索出Visual Basic 6 阅读详情

vb中能进行数据库备份吗？数据库备份的方法怎么样?

...全文

rockchip rk3566 android11 网口log报错： DMA engine initialization failed 问题描述：上电初始化前将网口插入，然后上电初始化网口能够正常使用，且能够找到PHY，ifconfig 查看能够有eth0 产生，网口正常使用且能够热插拔，但上电初始化时，不插入网口，就会报DMA engine initialization failed 错误，DMA 初始化的时候出错了。分析：一般产生这个问题可以认为是GMAC 的工作时钟出问题了。先测量时钟引脚是否有时钟，时钟频率以及幅度等指标是否正常，主要确认以下几个方面： 1.IOMUX 出错，检查时钟脚寄存器值是否正确。 2.时钟方向以及配置阅读详情

hantaor

数据库(包含打印，安装，报表) 1,217 成员 55,949 内容

+ 关注 + 加入社区

切换为时间正序

westgirl 2001-11-26

打赏
举报

我可不可以问你一个问题（请教关于有vb程序在sqlsever中创建视图）：
我写了这样的语句：sql12 = "CREATE VIEW dbjl1" & _
" AS" & _
" SELECT dbjl.jmh AS jmh1, jmk.jj AS jj1, jmk.bt AS bt1, jmk.gslx" & _
" FROM dbjl INNER JOIN" & _
" jmk ON dbjl.jmh = jmk.jmh"
执行后，总出现这样的错误：
实时错误'-2147217865(80040e37)':
[microsoft][odbc sql server driver][sql server]
invalod object name 'gbzb'

zjg751206 2001-11-26

打赏
举报

SQL Server可以使用SQL-DMO来做：
恢复数据库：
Private Sub Command2_Click()
Dim sFile As String
sFile = "N_1"

Dim oServer As New SQLDMO.SQLServer
Dim oDatabase As New SQLDMO.Database
Dim oRestore As New SQLDMO.Restore

oServer.Connect servername, username, password
With oRestore

.Files = sFile

.Database = "Northwind"
.ReplaceDatabase = True
.SQLRestore oServer
End With

Set oRestore = Nothing
Set oDatabase = Nothing
oServer.DisConnect
Set oServer = Nothing
MsgBox ("OK")

End Sub

备份：
Dim oBackup As New SQLDMO.Backup
oBackup.Action = SQLDMOBackup_Database
oBackup.Database = "Northwind"
oBackup.Devices = "[NorthDev1],[NorthDev2]"
oBackup.BackupSetName = "Northwind_Full"
oBackup.BackupSetDescription = "Full backup of Northwind sample."

oBackup.SQLBackup oSQLServer

如果你按照上述方法做好一个通用的过程把原代码给我看看!!
我也是抄来的我不懂vb,
zjg751206@sina.com.cn或zjgnj@263.net

yhshu 2001-11-26

打赏
举报

当然可以进行备份,只要调用T-SQL构成的stored procedure即可

westgirl 2001-11-26

打赏
举报

我刚刚作完数据库备份，运行通过，供你参考：
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
dd = Date
sql = "BACKUP DATABASE xhj TO disk='D:\mssql7\backup\xhj" & Trim(dd) & "'"
cn.Execute (sql)

visualvbjava 2001-09-15

打赏
举报

DBEngine.CompactDatabase "old.mdb", "new.mdb", dbLangGeneral

Jneu 2001-09-15

打赏
举报

能啊。

vb中能进行数据库备份吗？

相关推荐