设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12
返回列表 发新帖
楼主: jicheng
打印 上一主题 下一主题

[与其它组件] 怎样用代码将记录加到其他数据库中?

[复制链接]
11#
发表于 2006-8-23 06:52:00 | 只看该作者
请问这样追加有什么好处?是否避免连接不上后台啊?[em06][em06][em06]
12#
发表于 2006-8-23 07:10:00 | 只看该作者
以下是引用好学在2006-8-22 22:52:00的发言:
请问这样追加有什么好处?是否避免连接不上后台啊?[em06][em06][em06]

      其中之一可以不需要更改什么代码,很容易升迁到其他数据库,也可以移植到VB去
13#
发表于 2006-8-23 07:34:00 | 只看该作者
我知道VB是用这方法的,也想过用VB来做,因VB可以编译成EXE且不用ACCESS(它自带),但VB没有ACCESS方便,都要写代码.[em01][em01]
14#
 楼主| 发表于 2006-8-23 22:48:00 | 只看该作者
增加是:
Rs.AddNew
    Rs.Fields("编号") = Me.Text3
     Rs.Fields("名称") = Me.Text0
    Rs.Update
    Set Rs = Nothing
那修改怎么写?
15#
发表于 2006-8-23 23:13:00 | 只看该作者
以下是引用jicheng在2006-8-23 14:48:00的发言:
增加是:
Rs.AddNew
    Rs.Fields("编号") = Me.Text3
     Rs.Fields("名称") = Me.Text0
    Rs.Update
    Set Rs = Nothing
那修改怎么写?

      打开记录集前应要把要修改记录的筛选出来,再Update
16#
 楼主| 发表于 2006-8-23 23:49:00 | 只看该作者
Rs.Open "select * from 表1 where 编号='" & Me.Text91 & " '", Conn, adOpenDynamic, adLockOptimistic
    'Rs.AddNew   '这行就不要了是吗?
    Rs.Fields("编号") = Me.Text89
    Rs.Fields("名称") = Me.Text91
   Rs.Update   
  Set Rs = Nothing
''这样对吗?

还有增加用 Rs.addnew ,
删除用什么呢?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-9-20 15:46 , Processed in 0.110520 second(s), 29 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表