VB程序如何连接已分离的数据库?
如题 什么叫"已分离的数据库" 有哪位大侠在的告诉小弟一下,急用啊 谢谢 我现在的问题是:我编了一个VB程序,连接的是SQL Server2000,但是这个程序要上交,关键是老师不会再电脑上给你建立一个数据库来检查你的程序,听说可以打包数据库,但具体办法不知道啊 就是将SQL 2000里自己建的数据库给分离出来了一个MDF和一个LOF文件是LDF文件
你需要将mdf和ldf附加到Sql server才行.
我在说一遍我的意思哈:我在我的机器上做了一个VB 程序,连接的是SQL Server2000数据库,但是我想在一台没有安装的SQL Server2000上运行我的程序,那我的数据库应该怎么办那
不安装sql server想读取mdf的数据怕是非常难,几乎不可能.
可以考虑在客户端安装精简版,express版
或者考虑换数据库,用mdb,sqlite之类
关键是我要上交这个程序,如果老师的机器里没有SQL Server2000或者老师根本就懒得再它机器上的SQL Server 2000建立你需要的表怎么办 ? 还有没有人在啊,我还是不知道 该怎么办,愁死了,晚上九点之前就得上交了 怎么实现啊 哪位大侠能救济一下啊 你要读取mdf基本是不可能了.
要么换数据库.要么装SQL SERVER,要么连接远程数据库.
不要想读mdf了. 换ACCESS数据库。
一个小程序用什么sql数据库啊?
恩呢 我现在正换Access数据库呢,九点之前就要交了 希望能赶上 ,关键是我不会用ACCESS数据库啊 呵呵
除了连接串,sql语句都差不多,但注意日期字段ACCESS用#....#,sql server用'...',模糊查找ACCESS用*,sql server用%,其它还有不同,注意修改一下。
access应该还容易些吧,不过语句有点差异
呵呵 是的 琢磨中。。。 不过还好 呵呵
现在遇到点问题,怎么向VB增加Access表中的一个数据的同时删除另一个表中的一个信息,两个表关联的是“编号” Private Sub Command1_Click()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\新建文件夹\MIS大赛失物招领管理系统\Acess 数据库\失物招领系统.mdb;Persist Security Info=False"
cn.Open
Dim i As Integer
Dim j As Integer
Dim str As String
Dim str1 As String
Dim Tno As String
Dim TDraeson As String
Tno = Text1.Text
TDreason = Text2.Text
Set rs.ActiveConnection = cn
i = MsgBox("确定删除?", vbOKCancel, "提示")
If i = vbOK Then
str = "insert into 删除物品信息(物品编号,物品删除原因) values('" + Tno + "','" + TDreason + "');"
str1 = "delete * from 物品 where 物品编号='" + Tno + "';"
cn.Execute (str)
cn.Execute (str1)
j = MsgBox("删除成功!", vbOKOnly, "提示")
Else
InformationDelete.Show
End If
cn.Close
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
这段程序哪有错误,提示是cn.Execute (str)
cn.Execute (str1)
有错误 不明白 str1 = "delete from 物品 where 物品编号='" + Tno + "';"
这样试过了 不行 不知道咋回事 呵呵 delete 物品 一、打包。安装包,把MSDE打进去,附加数据库。
二、换ACCESS等单文件数据库。
补充:VB , 数据库(包含打印,安装,报表)