MSDE FunClub
Microsoft Data Engine FunClub
MSDE技術者向けメーリングリスト過去ログ[250]番
 
[TOP]>[MSDE技術者向けメーリングリスト過去ログ(250番)]>[ウィンドを閉じる]
 
SQLServer2005時代でも
開発の基本は T-SQL
上巻で T-SQL の基礎作り
 
SQLServer2005時代でも
運用の基本はバックアップ
下巻でバックアップ手法を学びましょう
PASSJ人気コンテンツで学んだ後は下巻でさらなる学習を!
 
ウィンドを閉じる
MSDE/SQLServer FAQ
MSDE / MSDE2000 
技術情報サポート
初心者向け
メーリングリスト
過去ログの表示
技術者向け
メーリングリスト
過去ログの表示
メーリングリスト
活動状況の
表示
MSDE TOP メニュー
MSDEトップメニューに移動します
 

 
ADOで複数テーブル参照の AddNew Update Delete

Date: Tue, 5 Sep 2000 22:31:41 +0900
From: "Kuromaru" <who@example.co.jp>


This is a multi-part message in MIME format.

------=_NextPart_000_0091_01C01789.103DD520
Content-Type: text/plain;
	charset="iso-2022-jp"
Content-Transfer-Encoding: 7bit

ADOで複数テーブル参照のAddNew Update Delete

VB6 でSQL7と文化オエイエント社のTrue DBgrid Pro使用して開発しておりま
す。

以下の方法でDBgridを利用して複数件数の項目を表示させ
売上明細にINSERT、DELETE、UPDATEを行ないたいのですが。

1.例えば売上明細情報テーブルと担当者テーブルが存在します。

2.DBgrid はテーブルとリンクさせるようにしています。
  (DataEnvironmentを利用してDataSource、DetaMember
     DataMode=Boundでプロパティでリンクします)

3.売上明細テーブルには従業員コードはあるのですが、従業員名がないのでその従
業員
  コードを利用して従業員名を以下の select 文でDBgrid上に表示しようと
    思い行ないました。(従業員名は参照のみの項目です)
    select  uri.seikyuday , uri.jg_cd , jgmas.name,uri.kin FROM  uri LEFT
OUTER JOIN
     jgmas ON uri.jg_cd = jgmas.code
    where (uri.seikyuday = 20000901)

4.DBgrid のDELETE を行なうと DELETEさせたくない従業員マスターの00001の太郎
の
  行までも削除されてしまう。

5.従業員コード00001を変更した場合従業員名は変わらずそのまま

6.あたらしい行に従業員コード00001を入力すると
    VBから  実行時エラー'6160'
               ”データアクセスエラーです。PRIMARY_KEY違反 ・・
                  重複したキーは挿入できません。”
    とエラーになります。
7.従業員名を表示させなければ何も問題はありません。

皆さんはどのような方法でベースになるテーブルのみの更新を行なわれているので
しょうか。
それとも無理なのでしょうか。
<概略>
+−−−−−+−−−−−−−+−−−−−−+−−−−−+
|日付         | 従業員コード   | 従業員名  |  金 額  |
+−−−−−+−−−−−−−+−−−−−−+−−−−−+
|20000901  |   00001       |  太郎           |  1,000   |




------=_NextPart_000_0091_01C01789.103DD520
Content-Type: text/html;
	charset="iso-2022-jp"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Diso-2022-jp" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT size=3D2>=1B$B#A#D#O$GJ#?t%F!<%V%k;2>H$N=1B(BAddNew Update =
Delete</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>=1B$B#V#B#6=1B(B =
=1B$B$G#S#Q#L=1B(B7=1B$B$HJ82=3D%*%(%$%(%s%H<R$N=1B(BTrue DBgrid =
Pro=1B$B;HMQ$7$F3+H/$7$F$*$j$^$9!#=1B(B</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT=20
size=3D2>=1B$B0J2<$NJ}K!$G=1B(BDBgrid=1B$B$rMxMQ$7$FJ#?t7o?t$N9`L\$rI=3D<=
($5$;=1B(B<BR>=1B$BGd>eL@:Y$K=1B(BINSERT=1B$B!"=1B(BDELETE=1B$B!"=1B(BUPD=
ATE=1B$B$r9T$J$$$?$$$N$G$9$,!#=1B(B</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT =
size=3D2>=1B$B#1!%Nc$($PGd>eL@:Y>pJs%F!<%V%k$HC4Ev<T%F!<%V%k$,B8:_$7$^$9!=
#=1B(B</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>=1B$B#2!%=1B(BDBgrid=20
=1B$B$O%F!<%V%k$H%j%s%/$5$;$k$h$&$K$7$F$$$^$9!#=1B(B<BR>=1B$B!!!!!J=1B(BD=
ataEnvironment=1B$B$rMxMQ$7$F=1B(BDataSource=1B$B!"=1B(BDetaMember<BR>&nb=
sp;&nbsp;&nbsp;&nbsp;=20
DataMode=3DBound=1B$B$G%W%m%Q%F%#$G%j%s%/$7$^$9!K=1B(B</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT =
size=3D2>=1B$B#3!%Gd>eL@:Y%F!<%V%k$K$O=3D>6H0w%3!<%I$O$"$k$N$G$9$,!"=3D>6=
H0wL>$,$J$$$N$G$=3D$N=3D>6H0w=1B(B<BR>=1B$B!!!!%3!<%I$rMxMQ$7$F=3D>6H0wL>=
$r0J2<$N=1B(B=20
select =
=1B$BJ8$G=1B(BDBgrid=1B$B>e$KI=3D<($7$h$&$H=1B(B<BR>&nbsp;&nbsp;&nbsp;=20
=1B$B;W$$9T$J$$$^$7$?!#!J=3D>6H0wL>$O;2>H$N$_$N9`L\$G$9!K=1B(B<BR>&nbsp;&=
nbsp;&nbsp; select&nbsp; uri.seikyuday ,=20
uri.jg_cd , jgmas.name,uri.kin FROM&nbsp; uri LEFT OUTER=20
JOIN<BR>&nbsp;&nbsp;&nbsp;&nbsp; jgmas ON uri.jg_cd =3D=20
jgmas.code<BR>&nbsp;&nbsp;&nbsp; where (uri.seikyuday =3D =
20000901)</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>=1B$B#4=1B(B.DBgrid =1B$B$N=1B(BDELETE =
=1B$B$r9T$J$&$H=1B(B =
DELETE=1B$B$5$;$?$/$J$$=3D>6H0w%^%9%?!<$N=1B(B00001=1B$B$NB@O:$N=1B(B<BR>=
&nbsp;=20
=1B$B9T$^$G$b:o=3D|$5$l$F$7$^$&!#=1B(B</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT =
size=3D2>=1B$B#5=1B(B.=1B$B=3D>6H0w%3!<%I=1B(B0000=1B$B#1$rJQ99$7$?>l9g=3D=
>6H0wL>$OJQ$o$i$:$=3D$N$^$^=1B(B</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT =
size=3D2>=1B$B#6=1B(B.=1B$B$"$?$i$7$$9T$K=3D>6H0w%3!<%I=1B(B00001=1B$B$rF=
~NO$9$k$H=1B(B&nbsp; <BR>&nbsp;&nbsp;&nbsp;=20
=1B$B#V#B$+$i=1B(B&nbsp;=20
=1B$B<B9T;~%(%i!<=1B(B'6160'<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
=1B$B!I%G!<%?%"%/%;%9%(%i!<$G$9!##P#R#I#M#A#R#Y!2#K#E#Y0cH?=1B(B=20
=1B$B!&!&=1B(B<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
=1B$B=3DEJ#$7$?%-!<$OA^F~$G$-$^$;$s!#!I=1B(B<BR>&nbsp;&nbsp;&nbsp;=20
=1B$B$H%(%i!<$K$J$j$^$9!#=1B(B<BR>=1B$B#7=1B(B.=1B$B=3D>6H0wL>$rI=3D<($5$=
;$J$1$l$P2?$bLdBj$O$"$j$^$;$s!#=1B(B</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT=20
size=3D2>=1B$B3'$5$s$O$I$N$h$&$JJ}K!$G%Y!<%9$K$J$k%F!<%V%k$N$_$N99?7$r9T$=
J$o$l$F$$$k$N$G$7$g$&$+!#=1B(B<BR>=1B$B$=3D$l$H$bL5M}$J$N$G$7$g$&$+!#=1B(=
B<BR>=1B$B!c35N,!d=1B(B<BR>=1B$B!\!]!]!]!]!]!\!]!]!]!]!]!]!]!\!]!]!]!]!]!=
]!\!]!]!]!]!]!\=1B(B<BR>=1B$B!CF|IU=1B(B&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;=20
=1B$B!C!!=3D>6H0w%3!<%I=1B(B&nbsp;&nbsp;=20
=1B$B!C!!=3D>6H0wL>!!!!!C!!!!6b!!3[!!!!!C=1B(B<BR>=1B$B!\!]!]!]!]!]!\!]!]=
!]!]!]!]!]!\!]!]!]!]!]!]!\!]!]!]!]!]!\=1B(B<BR>=1B$B!C=1B(B20000901&nbsp;=
=20
=1B$B!C=1B(B&nbsp;&nbsp; 00001=1B$B!!=1B(B&nbsp; =
=1B$B!!!!!!!!!C=1B(B&nbsp;=20
=1B$BB@O:=1B(B&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
; =1B$B!C=1B(B&nbsp;=20
1=1B$B!$#0#0#0=1B(B&nbsp;&nbsp; =1B$B!C=1B(B</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2><BR></FONT>&nbsp;</DIV></BODY></HTML>

------=_NextPart_000_0091_01C01789.103DD520--



[MSDE/SQLServerに関して、今、どんなことにお困りですか?]
よろしければお困りの内容を、電子メールで教えて下さい。
質問を電子メールで作成する


[ウィンドを閉じる]

[MSDE/SQLServer FAQ ]

[MSDE / MSDE2000 技術サポート情報一覧]

MSDE TOP ページに移動する

 
 
 
 
 
 
 
MSDE FunClubに関するご意見・ご要望等ございましたら、
msdefun@horikawa.ne.jp までご連絡下さい。
MSDEを始めとする各種データベースシステムの開発、コンサルタントに関するご要望等は、
msdedev@horikawa.ne.jp までご連絡下さい。