1188
社区成员
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
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'
我写了这样的语句：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
恢复数据库：
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)
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.NET 数据库开发专业教程 第一辑 学VB.net ，一直困惑于数据开发那些章节，近日，在超星官网读《VB.NET数据库开发专业教程》一书感觉，对初学者很实用，很具体，本人认为是一本不错的入门教程。 当今世界对数据的需求越来越迫切，数据库技术的...
牛客刷题笔记-数据库选择题（201-300） 201 在数据库系统中，系统故障造成(C )。 硬盘数据丢失 软盘数据丢失 内存数据丢失 磁带数据丢失 系统故障时，数据库缓冲区（内存）中的内容全被丢失，一些尚未完成的结果可能已送入物理数据库。 202 候选码中属性...
在数据库中能不能像用excel那样直接填表保存进数据库，而不是用SQL语句 在数据库中能不能像用excel那样直接填表保存进数据库，而不是用SQL语句 2011-4-19 14:37 提问者：善良的噜噜修|悬赏分：20|浏览次数：372次 如图，我很郁闷，直接填表总是无法保存……每次想填点数据都只能用...
vb/vb.net开发精粹(22) 关于 VB 里其它过程的值传递给 Function 函数体的问题？？？ VB更改Excel自定义纸张大小怎么操作呢？ 为什么我写的程序在VB环境下运行不报错，一编译运行就报错 数据导入EXCEL问题 发个预言贴, 过一年再回来看看...
VC访问数据库学习总结 VC连接数据库方式 目前Windows系统上常见的数据库接口包括： ODBC（开放数据库互连）：访问数据库得先配置数据源 MFC（Microsoft基础类）ODBC类 DAO（数据访问对象） RDO（远程数据对象） OLE DB（对象链接嵌入...
【数据库】【NCRE】NCRE三级数据库技术选择题历年真题汇编（更新中） 数据库增长速度【解析】数据库应用系统的性能需求分析包括数据操作响应的时间或数据访问响应时间，系统吞吐量、允许并发访问的最大用户数、每TPS代价值。 2. 设在一个学校信息系统的ER图中，有教师、项目、学生三类...
SQL Server数据库技术文档 SQL Server数据库性能优化 =========================================================== 设计一个应用系统似乎并不难，但是要想使系统达到最优化的性能并不是一件容易的事。 在开发工具、数据库设计、应用程序的...
VC开发数据库基础之ADO篇 VC开发数据库基础之ADO篇 VC开发数据库基础之ADO篇 一、ADO简介 ADO(ActiveX Data Object)是Microsoft数据库应用程序开发的新接口，是建立在OLE DB之上的高层数据库访问技术，请不必为此担心，...
ADO数据库编程 中大型的数据库管理信息系统(MIS)的开发，一般很少用VC来完成（因为开发效率低，不过运行效率很高），而是使用VB， C#，Java等开发效率较高的语言。但小型MIS系统完全可以用VC来实现。下面讲解VC中访问数据库的基本...
上海市计算机三级《信息技术与数据库技术》 A卷 单选 1.同样内容的信息可使用不同的形式来描述，并且...2．信息并不都是资源，要使其成为资源并实现其效用和价值，可以对信息源进行管理，通过开发________实现信息服务。 A）Internet B）销售渠道 ...
VB.NET多线程编程技术 下表是.NET框架组件中能用于同步线程的一些类： 等待句柄 等待句柄是把某个线程的状态信号发送给另一个线程的对象。当线程需要独占访问某种资源时，它们可以使用等待句柄通知其它线程。其它...
数据库基础 数据库就是数据的仓库，而DBMS是数据库的“管理员”。一些企业即生产食品又生产农用物资，这些产品都要保存到仓库中，同时企业内部也有一些办公用品需要保存到仓库中。 如果这些物品都保存到同一个仓库中的话会造成...
VC开发数据库之ADO、DAO篇 VC开发数据库基础之ADO篇 (转载) VC开发数据库基础之ADO篇 一、ADO简介 ADO(ActiveX Data Object)是Microsoft数据库应用程序开发的新接口，是建立在OLE DB之上的高层数据库访问技术，请不必为此担心，即使...
SQL Server数据库性能优化 在开发工具、数据库设计、应用程序的结构、查询设计、接口 选择等方面有多种选择，这取决于特定的应用需求以及开发队伍的技能。本文以SQL Server为例，从后台数据库的角度讨论应用程序性能优化技巧，并且给出了...
VB 及相关开发问题汇总 问题描述：在VB 中进行数据的加减处理，结果最后存入DB 中的数值会相差0.01 解决日期：18 Aug 2005 解决描述：原因1，如有一Single 或 Double 变量和其它类型的变量进行数学计算，结果将会变为不精确的浮点数，且会...
ADODataTypes与数据库值对应 The table below shows the ADO Data Type mapping between Access, SQL Server, and Oracle: DataType EnumValueAccessSQLServerOracle adBigInt 20 BigInt (SQL Server 2000 +) ...adBin...
VC开发数据库基础之ADO篇 (转载) VC开发数据库基础之ADO篇 一、ADO简介ADO(ActiveX Data Object)是Microsoft数据库应用程序开发的新接口，是建立在OLE DB之上的高层数据库访问技术，请不必为此担心，即使你对OLE DB，COM不了解也能轻松对付ADO,因为...
