質問編集履歴
1
あ
title
CHANGED
File without changes
|
body
CHANGED
@@ -1,66 +1,2 @@
|
|
1
|
-
現在VB.NETで、SQLで呼び出したレコードを1行ずつテキストファイルに出力する機能を作成しております。
|
2
|
-
|
3
|
-
テーブルとカラムの内容は、以下の通りです。
|
4
|
-
|
5
|
-
TESTテーブル
|
6
|
-
|
7
|
-
ID(キー)
|
8
|
-
LiNo(キー)
|
9
|
-
Link
|
10
|
-
Status
|
11
|
-
Art
|
12
|
-
Class
|
13
|
-
Section
|
14
|
-
|
15
|
-
|
16
|
-
流れとしては、
|
17
|
-
|
1
|
+
こちらの質問は削除済みのものとなっております。
|
18
|
-
テキストファイルに出力する。
|
19
|
-
出力後、Linkの値を+にして更新する。
|
20
|
-
|
2
|
+
よろしくお願いいたします。
|
21
|
-
|
22
|
-
例として、以下のテーブルを使用します。
|
23
|
-
|
24
|
-
|
25
|
-

|
26
|
-
|
27
|
-
|
28
|
-
|
29
|
-
キーが1つの場合ですと、ForEachを用いたコードでアップデートできるました。
|
30
|
-
1行ずつ出力する際に、ListにIDを追加して、ループさせています。
|
31
|
-
(一部コメントアウトしているのですがご理解ください。)
|
32
|
-
|
33
|
-
For Each ID As String In IDList
|
34
|
-
.ID.Value = CntID
|
35
|
-
'SQLのレコードが見つかれば
|
36
|
-
.Link.Value = "+"
|
37
|
-
'アップデート
|
38
|
-
Next
|
39
|
-
|
40
|
-
|
41
|
-
|
42
|
-
ただしこちらは複合主キーのテーブルのため、同様の方法をとると思い通りに動作しません。
|
43
|
-
1つのIDの中で、リストにしたLiNoがループしてしまい以下の画像のようになってしまいます。
|
44
|
-
|
45
|
-
For Each ID As String In IDList
|
46
|
-
.ID.Value = CntID
|
47
|
-
For Each LiNo As String In LiList
|
48
|
-
.LiNo.Value = LiNo
|
49
|
-
'SQLのレコードが見つかれば
|
50
|
-
.Link.Value = "+"
|
51
|
-
'アップデート
|
52
|
-
Next
|
53
|
-
Next
|
54
|
-
|
55
|
-
|
56
|
-

|
57
|
-
|
58
|
-
(ClassがYのもののみを呼び出しているにもかかわらず、Nの行にも+が入ってしまっています。)
|
59
|
-
|
60
|
-
|
61
|
-
最終的には、下記画像のようになるようにしたいです。
|
62
|
-
|
63
|
-

|
64
|
-
|
65
|
-
|
66
|
-
断片的な情報で申し訳ございません。ご回答のほど、よろしくお願いいたします。
|