การแสดงผลข้อมูลกรณีที่ยังไม่มีรูปถ่าย
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 355   3
URL.หัวข้อ / URL
การแสดงผลข้อมูลกรณีที่ยังไม่มีรูปถ่าย

เรียนถามอ.สุภาพ
หนูได้สร้างรายงานโดยที่ดึงรูปภาพของนักเรียนไว้ในรายงานนี้ด้วย
โดยใช้วิธีการกำหนดชื่อของรูปให้ตรงกับ ID ของนักเรียน
ตามที่อ.ได้แนะนำค่ะ
ในรายงาน หนูกำหนดให้แสดงผล
นักเรียน 1 คน ต่อ 1 หน้ากระดาษ โดยที่มีข้อมูลและรูปด้วยน่ะค่ะ
จำนวนหน้ากระดาษ ประมาณ 40 หน้าต่อ 1 ครั้ง
มีปัญหาตรงที่ นักเรียนที่ยังไม่มีรูป (หมายถึงหนูยังไม่ได้สแกนรูปลงไป)
ตรงกรอบรูปภาพจะแสดงเป็นรูปของนักเรียนอีกคนซึ่งมีรูปแล้ว
และนักเรียนที่ยังไม่มีรูปก็จะถูกแทนที่รูปจากรูปที่มีอยู่แล้ว
อยากให้เวลาออกรายงาน ก็ให้แสดงรูปกรณีที่มีรูป
ส่วนนักเรียนที่ยังไม่มีรูป ก็ให้ว่างไว้

ไม่ทราบว่าจะต้องทำอย่างไรค่ะ กรุณาแนะนำด้วยค่ะ
ขอบคุณค่ะ

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
On Error GoTo err:
Dim strPicPath As String

strPicPath = Me.PicPath & "\" & Me.ID & ".JPG"
Me.Pict.Picture = strPicPath
err:
Exit Sub
End Sub

3 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R03789
ลองใช้ Dir() เข้าช่วยครับ

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
On Error GoTo err:
Dim strPicPath As String

strPicPath = Me.PicPath & "\" & Me.ID & ".JPG"
If Dir(strPicPath) <> "" Then
Me.Pict.Picture = strPicPath
Else
Me.Pict.Picture = ""
End If
err:
Exit Sub
End Sub
2 @R03803
หนูลองทำดูตามโค๊ด แล้วค่ะ
ยังไม่สามารถแก้ปัญหาได้ คือ ยังมีรูปซ้ำอยู่เหมือนเดิมค่ะ
รบกวน อ.กรุณาแนะนำอีกครั้งค่ะ
ขอบคุณค่ะ
3 @R03830
อ.ค่ะ ยังทำไม่ได้เลยค่ะ
รบกวนช่วยหน่อยน่ะค่ะ
ขอบคุณค่ะ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.1335s