确定引用“microsoft DAO 3.51 Object library”
dim db as database
dim rs as recordset
private sub form1_load()
Set db = OpenDatabase(App.Path "\TTT.mdb")'()内是你的数据库所在位置
Set rs = db.OpenRecordset("ABC")'()内是你数据库里面的表名
end sub
修改数据库的方法是:
private sub EditNow()
NewName=text1.text
NewP=text2.text
with rs
.edit
!名字=Lcase(newname)'“名字”是你表中的项目,(newname)内是你根据你的代码改变的值
!密码=Lcase(newp)'同上
.update
end with
end sub
建立是用rs.addnew
呵呵,方法就是这样,希望会对菜鸟有帮助!
上一篇: VB中远程数据库的访问(1)-数据连接
下一篇: VB中远程数据库的访问(2)-数据处理
文章整理:西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!




