المساعده في تحديث التقرير

[zhamid]

السلام عليكم

المشكله كالاتي في المرفق 

1- افتح على الفورم

2-ادخل المعلومات في الفورم

الان المفروض عند الانتهاء من الادخال الضغط Preview Report تظهر في التقرير ولكن للاسف لا تظهر الا اذا انتقلت بالاسهم  الى ريكورد ثاني

لذا كيف يمكن عند الانتهاء من الادخال اضغت على Preview Report يعطيني الادخالات 

ارجو ان اكون اوصلت الفكره وجزاكم الله خيرا

 

db1.rar

[jjafferr]

وعليكم السلام

 

وبدون انزال المرفق ، واعتمادا على شرحك ،

البيانات في النموذج ليست محفوظة في الجدول بعد ، لذا يجب حفظها قبل ان تفتح التقرير ، واختار احد هذه الطرق لحفظ البيانات:

سيتم حفظ البيانات بغض النظر اذا تم تعديل عليها او لا
docmd.runcommand accmdsaverecord


او
يحفظ البيانات فقط اذا تم عمل تغيير عليها
if me.dirty=true then me.dirty=false


او
سيتم حفظ البيانات بغض النظر اذا تم تعديل عليها او لا
Refresh

 

جعفر

[zhamid]

اخي

شكرا على سرعه ردك

اين اضع الكود في on load

او يا ريت تطبيقها على المرفق اذا ما فيها ازعاج

[jjafferr]

خليها قبل سطر فتح التقرير

 

هكذا مثلا

Private Sub Command8_Click()
On Error GoTo Err_Command8_Click

'DoCmd.RunCommand acCmdSaveRecord
If Me.Dirty = True Then Me.Dirty = False
'Refresh

    Dim stDocName As String

    stDocName = "R_Delivery"
    DoCmd.OpenReport stDocName, acPreview

Exit_Command8_Click:
    Exit Sub

Err_Command8_Click:
    MsgBox Err.Description
    Resume Exit_Command8_Click
    
End Sub

 

جعفر

[zhamid]

الله يجزيك الخير كله

وشكرا لك