一个小程序需要一个小数据库 一个小程序需要一个小数据库用来管理一些病人的编号等情况,请问如何办呢比较好?我用的是VB,而且一窍不通,呵呵!不好意思。要便于软件分发的方式。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 vb+access数据库使用ado对象连接数据库,简单高效 要装access数据库 吗?说明:我只要单机版的程序打包方便吗? 要装access数据库 吗?说明:我只要单机版的程序打包方便吗? 不一定要装access但是2000一下好像都需要装数据库的引擎 使用ACCESS數據庫的話,只要將程序編寫出來了,利用VB自帶的打包程序將程序與數據庫都打包進去就行了!安裝後可以不將ACCESS的! 要装access数据库 吗?说明:我只要单机版的程序打包方便吗? 推荐使用VB6加ACCESS来做,建议使用ACCESS97版本,可以找张OFFICE97的光盘安装。使用DAO来驱动数据库VB“工程”菜单--》“引用”--》“MS DAO3.51” (这是必须做的)再说一些比较简单的数据库操作的命令给你:dim MDB as databasedim REC as recordsetMDB= opendatabase("Mydatabase.mdb") '假设你的数据库名为Mydatabase.mdbset REC=MDB.OpenRecordSet("select * from Tab1") '假设要打开的表为Tab1添加记录使用:REC.AddNew查询记录使用:REC.FindFirst(SQL) '查第一条符合SQL语句的记录 REC.FindLast(SQL) '查倒数第一条符合SQL语句的记录 REC.FindNext(SQL) '查下一条符合SQL语句的记录 REC.FindPrevious(SQL) '查上一条符合SQL语句的记录移动指针使用:REC.MoveFirst(SQL) '指针移动到第一条记录 REC.MoveLast(SQL) '指针移动到最后一条记录 REC.MoveNext(SQL) '指针移动到下一条记录 REC.MovePrevious(SQL) '指针移动到上一条记录删除记录使用:REC.Delete修改记录使用:REC.EDIT当添加记录和修改记录完成后请使用REC.UpData使改变生效。得到数据表的记录数量REC.RecordCount '请在使用REC.MoveLast之后再使用这句关闭数据表:REC.CloseSet REC= Nothing关闭数据库:MDB.CloseSet MDB=Nothing 赫赫~~vb的自带的打包程序很简单,一路next就Ok了,vb+access是单机的好选择,也不用安装access~ 建议直接在ACCESS中写程序就行了,方便又高效 TO ysc1981(yun):建议直接在ACCESS中写程序就行了,方便又高效你说的方法,我认为不是很好,首先这样写出来的程序一定要在ACCESS环境下才能运行,总不能发布一个自己写的软件,还要顺便给别人一个盗版OFFICE光盘吧?万一给人抓住多不好啊,太危险,不提倡。还有啊,直接在ACCESS中用VBA作出来的那个东西,无论是界面,功能,速度,都和用VB作出来的相差甚远,所以没有必要啊。 如何让网格数据控件手工提交而非自动提交? VB中如何使用自定义消息? 如何读取存储过程的参数个数和类型? 请教如何实现不定项已知条件的查找 用wise installer 902來打包vb6+Crystal Reports8.5的程序,執行程序時出錯? 网页上email的提取 请问如何实现每次查询一定数量的数据 请问如何读取UNICODE文本文件? 急死了! 请问OCX控件怎摸编?和EXE编法有身摸不同? 有谁用过oracle odbc driver 连接oracle数据库(8.1.6) 调用存储过程,返回值那里去了?(急) 小问题!谢了!
说明:我只要单机版的程序
打包方便吗?
说明:我只要单机版的程序
打包方便吗?
使用ACCESS數據庫的話,只要將程序編寫出來了,利用VB自帶的打包程序將程序與數據庫都打包進去就行了!
安裝後可以不將ACCESS的!
说明:我只要单机版的程序
打包方便吗?
使用DAO来驱动数据库
VB“工程”菜单--》“引用”--》“MS DAO3.51” (这是必须做的)
再说一些比较简单的数据库操作的命令给你:
dim MDB as database
dim REC as recordset
MDB= opendatabase("Mydatabase.mdb") '假设你的数据库名为Mydatabase.mdb
set REC=MDB.OpenRecordSet("select * from Tab1") '假设要打开的表为Tab1添加记录使用:REC.AddNew
查询记录使用:REC.FindFirst(SQL) '查第一条符合SQL语句的记录
REC.FindLast(SQL) '查倒数第一条符合SQL语句的记录
REC.FindNext(SQL) '查下一条符合SQL语句的记录
REC.FindPrevious(SQL) '查上一条符合SQL语句的记录
移动指针使用:REC.MoveFirst(SQL) '指针移动到第一条记录
REC.MoveLast(SQL) '指针移动到最后一条记录
REC.MoveNext(SQL) '指针移动到下一条记录
REC.MovePrevious(SQL) '指针移动到上一条记录
删除记录使用:REC.Delete
修改记录使用:REC.EDIT
当添加记录和修改记录完成后请使用REC.UpData使改变生效。
得到数据表的记录数量REC.RecordCount '请在使用REC.MoveLast之后再使用这句
关闭数据表:
REC.Close
Set REC= Nothing
关闭数据库:
MDB.Close
Set MDB=Nothing
,也不用安装access~
你说的方法,我认为不是很好,首先这样写出来的程序一定要在ACCESS环境下才能运行,总不能发布一个自己写的软件,还要顺便给别人一个盗版OFFICE光盘吧?万一给人抓住多不好啊,太危险,不提倡。
还有啊,直接在ACCESS中用VBA作出来的那个东西,无论是界面,功能,速度,都和用VB作出来的相差甚远,所以没有必要啊。