プログラミングの方法が分かりません

Question

お疲れ様です。

私の技術不足で解決できない問題があるので、ご教授願います。

A
B
C
D
E
F
G
A
B
C
D
E
F
G
A
B
C
D
E
F
G

というようにログが順のに一つのファイルに吐かれます。
そのログが正常かどうか判断するの条件が以下です。

以下の条件の時にOKとしたいです。
①ログが「ABCDEFG」である（実際は縦に吐かれます）
②ログが「ABCDEG」である（実際は縦に吐かれます）

つまりこの①と②のログが混在している場合もあります。
VBScriptを使用し、ファイルを一行ずつ読み込んで判断しているのですが、1行ずつ読み込むと6か7かの切り分けが非常に難しく、難儀してます。

何か良い方法はないでしょうか。
よろしくお願いします。

Comments

[dodox86]

> 1行ずつ読み込むと6か7かの切り分けが非常に難しく

行で読もうとも、数は考えず、"ABCDEFG"の順か"ABCDEG"の順、'E'の次は'F'または'G'になる。'G'の次は'A'になる。を条件にサイクリックに判断していけばよいのでは。コードの提示があればより具体的な回答をもらえるかもしれません。

[m.ts10806]

>プログラミングの方法が分かりません

タイトルには要件を記載してください。
https://teratail.com/help/question-tips#questionTips3-1

あと、スコアマイナスの状態って他のユーザーを遠ざけやすくなります。
そこの改善が先では。

[ikadzuchi]

仕様が曖昧です。いつ出力を出すのかが分かりません。
「ファイルをすべて見て、①と②のみの組み合わせでできている場合にOKを出力」なのか、「ファイルを順に見ていき①または②が来るたびにOKを出力」なのかどちらでしょう。
後者の場合、NGはいつ出しますか?

[dodox86]

NGを検出したあとの処理はどうするのか、も考えどころでしょうか。NGを検出したらその時点で終了するのか、その後も継続するなら、頭の'A'が出現するまでスキップするのか否か、とか。全体として1行あたり1文字のみのログというのは少々解せませんが、なんらかの「状態」を表す値と考えれば無きにしも非ず、なのかと思いました。

Answer 1

普通にプログラミングすれば良いだけだと思うのですが、どの辺が難しいんですかね？
ベタで書くと、今読んだ行をthis、前の行をlastとして、

If last = "A" and this <> "B" or _
   last = "B" and this <> "C" or _
   last = "C" and this <> "D" or _
   last = "D" and this <> "D" or _
   last = "E" and this <> "F" and this <> "G" or _
   last = "F" and this <> "G" or _
   last = "G" and this <> "A" Then
   エラーの時の処理
End IF

表を引くように作っても良いですけど、ベタに書いた方が一目で条件が分かります。

Answer 2

ファイルを読み込んで行で区切って配列に入れましょう。
配列数をみればいくつかわかるし、最初から順番に中身のチェックもできます