菜鸟的大麻烦:复制记录 你是要做什么??select * from a,b,cwhere a.aid = b.aid and b.cid = c.bid and a.aid = ?这个样子么?? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 select * from a inner join b on a.aid=b.aid inner join c on b.bid=c.bid A->B和B->C是一对多的关系,所以A的一条记录 关联的记录是个树,我想复制一棵树 我的意思不是选取记录,是复制记录,复制后只是对应的AID,BID,CID不同而已 问卷表问卷ID(主键) 问卷标题 其他属性......问题表问题ID(主键) 问卷ID 问题标题 其他属性.....选项表选项表ID(主键) 问题ID 选项内容 其他属性.....----------------------------------------------------一个问卷对多个问题,每个问题有多个选项复制一个问卷后,增加一条问卷记录,只是ID不同,问题表也增加若干问题记录,对应新增的问卷ID,同理选项表。不知道我说的够不够清楚,谢谢各位大侠 "INSERT INTO 问卷表(问卷ID,问卷标题,其他属性) SELECT 'id100',问卷标题,其他属性 from 问卷表 where 问卷ID='id1'"然后依次复制问题表,选项表。关键是id100,你必须把这个值给定,当然通过文本负值也行。这个是我这个星期的成果,我的实际程序,你可以参考一下 DoCmd.SetWarnings False sqlstr = "INSERT INTO T_sc一覧テーブル(serial,稼動場所,型番,OS,備考) SELECT " & "'" & newserial & "'" & ",稼動場所,型番,OS,備考 FROM T_sc一覧テーブル WHERE serial= " & "'" & oldserial & "'" DoCmd.RunSQL (sqlstr) sqlstr = "INSERT INTO T_ドライバ一覧(serial,品名,メーカー,名称,バージョン) SELECT " & "'" & newserial & "'" & ",品名,メーカー,名称,バージョン FROM T_ドライバ一覧 WHERE serial= " & "'" & oldserial & "'" DoCmd.RunSQL (sqlstr) sqlstr = "INSERT INTO T_ハードウエア一覧(serial,品名,メーカー,型番,備考) SELECT " & "'" & newserial & "'" & ",品名,メーカー,型番,備考 FROM T_ハードウエア一覧 WHERE serial= " & "'" & oldserial & "'" DoCmd.RunSQL (sqlstr) DoCmd.SetWarnings True http://expert.csdn.net/Expert/topic/2589/2589607.xml?temp=.7769892 这个SQL怎么写? 公交查询 关于Access计算列,在Access表设计页面中在字段SN的默认值栏中填入'abc'+[id],总是出错 请问这个字段怎么生成? 求树的层! 数据库简单操作问题 SQl Server企业管理器打开问题 怎么解决 高分请教存储过程的问题 数据更新的问题 比较着急 sql参数上遇到一些问题 输入的参数有两种情况怎么办?求一个好方法。
问卷ID(主键) 问卷标题 其他属性......问题表
问题ID(主键) 问卷ID 问题标题 其他属性.....选项表
选项表ID(主键) 问题ID 选项内容 其他属性.....
----------------------------------------------------
一个问卷对多个问题,每个问题有多个选项
复制一个问卷后,增加一条问卷记录,只是ID不同,问题表也增加若干问题记录,对应新增的问卷ID,同理选项表。不知道我说的够不够清楚,谢谢各位大侠
然后依次复制问题表,选项表。
关键是id100,你必须把这个值给定,当然通过文本负值也行。
这个是我这个星期的成果,我的实际程序,你可以参考一下
DoCmd.SetWarnings False
sqlstr = "INSERT INTO T_sc一覧テーブル(serial,稼動場所,型番,OS,備考) SELECT " & "'" & newserial & "'" & ",稼動場所,型番,OS,備考 FROM T_sc一覧テーブル WHERE serial= " & "'" & oldserial & "'"
DoCmd.RunSQL (sqlstr)
sqlstr = "INSERT INTO T_ドライバ一覧(serial,品名,メーカー,名称,バージョン) SELECT " & "'" & newserial & "'" & ",品名,メーカー,名称,バージョン FROM T_ドライバ一覧 WHERE serial= " & "'" & oldserial & "'"
DoCmd.RunSQL (sqlstr)
sqlstr = "INSERT INTO T_ハードウエア一覧(serial,品名,メーカー,型番,備考) SELECT " & "'" & newserial & "'" & ",品名,メーカー,型番,備考 FROM T_ハードウエア一覧 WHERE serial= " & "'" & oldserial & "'"
DoCmd.RunSQL (sqlstr)
DoCmd.SetWarnings True