hatena
hatena
2021/05/26 (水) 14:07:53
コードには rs.Fields("file_image")
とあるのですが、file_image というフィールドは t_filedetaにあるのですよね。
あと、内側の Do Loop の最後でも rs.EOF でチェックしないとエラーになると思います。
Do
tg.Fields("f_" & c) = rs.Fields("file_image")
rs.MoveNext
c = c + 1
Loop Until c > 15 Or rs.EOF
蛇足
コードを見た感じ、印刷用ワークテーブルで15列に出力しているのだと思いますが、
レポートの印刷設定で列数を設定できますのでそれでいいように思いますか、
なにか特別なレイアウトになっているのでしょうか。
通報 ...