vb实现记录拷贝?

Question

我有一个数据库，其中的三个表是平行关系（字段太多，分散到各个表中），并通过一个字段关联起来(一对一)。如：
表1：
  字段11（主键）  字段12  字段13  字段14，字段15
表2：
  字段21（从键）  字段22  字段23  字段24，字段25
表3：
  字段31（从键）  字段32  字段33  字段34，字段35
关系为：
 表1———〉表2
  |
  |
  v
 表3
其中,字段11=字段21=字段31;字段12 =left&(字段11,3) ,字段13 =right&(字段11,4) 
我的表中有一条记录,它的 字段11=字段21=字段31="123456789" ,其余字段也有相应的值,
现在,我想添加一条记录,字段11=字段21=字段31="987654321",除 字段12,字段13 符合相应关系外,其余的均与已存记录相同,若不用对每个字段进行单独赋值,可有好的方法实现?

Answer 1

我支持你，不过看不懂！
数据库我很弱！
'********************************************
'对不起，放一点广告，对您带来的不便敬请原谅！
广告：我的第一个Visual Basic 6.0作品，欢迎大家试用,注册用户得到全部源代码。         EasyDialog能够做什么？
(为了增强Windows通用打开/保存对话框，能够快速的打开经常访问的文件夹或者文件）
一、快速地在通用打开/保存对话框中打开你经常访问的文件夹/文件。
二、快速地在Windows Explorer中打开经常访问的文件夹/文件。
三、快速地在IE浏览器打开你经常访问的网站。
四、快速地给你的朋友发Email
五、能够使您方便地按照逻辑分类来组织和管理您的文件夹/文件，您经常访问的网址，您的Email地址。'********************************************
'*下载EasyDialog:
http://www.softboyzhou.com/download/EasyDialog.asp
'***************
'*购买EasyDialog:
http://www.softreg.com.cn/shareware_view.asp?id=/7148D197-1C1D-4E84-B92A-EE2CC07D27C0/
'***************
'*给我写信：有什么问题请来信。
[email protected]