過去ログ

                                Page     348
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼画像付きのレポート印刷。  ショウジ 03/8/1(金) 14:56
   ┗Re:画像付きのレポート印刷。  イケガミ 03/8/1(金) 17:06
      ┗Re:画像付きのレポート印刷。  ショウジ 03/8/1(金) 17:26

 ───────────────────────────────────────
 ■題名 : 画像付きのレポート印刷。
 ■名前 : ショウジ
 ■日付 : 03/8/1(金) 14:56
 -------------------------------------------------------------------------
   OS: Windows98
Access: Access2002

商品IDを範囲指定し1ページあたり9個の画像があるレポートを印刷したいのですが
例えば商品ID1は9個全て画像があり、商品ID2は画像が虫食いになっている場合
商品ID1、商品ID2を連続で抽出した時に商品ID2のレポートで虫食いになっている
箇所に商品ID1の画像が表示されてしまいます。
つまり前レコードの画像が残ってしまうわけです。
この現象の回避方法をご教授頂きたくお願い申し上げます。
ちなみに画像は画像フォルダから都度取り出す方法を採っています。
現在のコードは以下の様になっています。

Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)

On Error GoTo エラー処理

'-------------------------1-------------------------------
If IsNull(画像パス1) Or 画像パス1 = "(なし)" Then
Me.印刷画像1.Picture = "(なし)"
Else
Me.印刷画像1.Picture = Me.画像パス1
End If
'-------------------------1------------------------------
'-------------------------2------------------------------
If IsNull(画像パス2) Or 画像パス2 = "(なし)" Then
Me.印刷画像2.Picture = "(なし)"
Else
Me.印刷画像2.Picture = Me.画像パス2
End If
'-------------------------2------------------------------

以降9まで同じ処理

宜しくお願い致します。

 ───────────────────────────────────────  ■題名 : Re:画像付きのレポート印刷。  ■名前 : イケガミ  ■日付 : 03/8/1(金) 17:06  -------------------------------------------------------------------------
   >Me.印刷画像1.Picture = "(なし)"

この "(なし)" を、画像がなかったとき用の画像ファイルを
作成しておいて、その画像のパスを入れてみてください。

 ───────────────────────────────────────  ■題名 : Re:画像付きのレポート印刷。  ■名前 : ショウジ  ■日付 : 03/8/1(金) 17:26  -------------------------------------------------------------------------
   やはりそうですよね。「NO IMAGE」のような画像を用意してという事になりますかね。
ご回答ありがとうございました。参考にさせて頂きます。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 348