PDA

View Full Version : Làm thế nào để cập nhật dữ liệu mới


ngocthi
03-09-2007, 17:18
Các bạn ơi giúp mình với
mình có 1 form Vattu với 4 tetbox mavattu, tenvattu, dongia, donvitinh
Trên forms này có 1 command button CmdNew để mở form tên "Vattumoi" nhằm ccập nhật những vật tư mới.
Sau khi mình cập nhật và đóng form này lại thì Form "Vattu" không có tên vật tư mới này. Chỉ khi đónng và mở lại form "Vattu" thì thấy được.
Có ai giúp mình làm sao để không ần phải đóng Form "Vattu" mà vẫn ập nhật được tên vật tư mới sau khi đóng đóng Form "Vattumoi" không?
Các bạn ráng giúp giùm mình nhé. Cám ơn nhiều nhiều
hattieu
03-09-2007, 17:28
Đó là sau khi bạn thêm mới nhưng chưa refesh dữ liệu ở form "Vâttu".
Chỉ cần sau khi bạn thêm trong form "Vat tu moi", bạn refesh lại cái connection cái mà hiển thị thông tin của các vật tư đó, nếu các vật tư được hiển thị trên lưới thì khi hành động thêm thành công bạn phải refesh luôn cà connect và lưới load dữ liệu.
Hy vọng giúp được bạn
ngocthi
03-09-2007, 17:35
Bạn có thể giúp mình rõ hơn 1 chút được ko?
Làm sao mình có thể Refesh đươc
Mình chỉ là dân mới thôi nên biết ít lắm.
Bạn giúp mình nhé, mình cảm ơn nhiều nhiều
ngocthi
05-09-2007, 10:18
Ôi sao ko ai giúp minh với
Mình đang cần gấp lắm
Các bạn giúp giùm mình đi
thanhlv84
05-09-2007, 19:00
đưa đoạn code cập nhật của bạn lên đây
hình như bạn mở 1 biến recordset chứa DL rồi đưa lên các điều khiển(chẳng hạn như datagrid,và sau khi cập nhật thì DL trên các điều khiển đó chưa được làm mới ngay mà phải đóng mở form mới thấy đúng ko,vậy thì chỉ cần dùng thuộc tính .refresh của cái biến recordset đó là DL sẽ được cập làm tươi ngay
ngocthi
06-09-2007, 09:54
Đây là khi mình nhấn nút CmdNew ở form Vattu
Private Sub CmdNewAdd_Click()
DoCmd.OpenForm "vattumoi", acNormal, , , acFormAdd

End Sub
Còn đây là khi nhấn CmdSave ở form Vattumoi
Private Sub CmdSave_Click()
On Error GoTo Err_CmdSave_Click


DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.RunCommand acCmdRefresh
DoCmd.GoToRecord , , acNewRec
Exit_CmdSave_Click:
Exit Sub

Err_CmdSave_Click:
'MsgBox Err.Description
Resume Exit_CmdSave_Click


Các bạn giúp giùm nhé
phatnq2003
11-09-2007, 10:29
Sau khi lưu xong vật tư mới, bạn cho requery lại cái recordsource của form Vattu.

Forms("Vattu").Requery

Vậy thôi.

À mà cái này là Access mà. bạn phải post sang nhóm Access chứ hả?
ngocthi
11-09-2007, 18:15
Vì mình mới tham gia nên không rành lắm
Cám ơn sự giúp đỡ của bạn rất nhiều. Mình đã dùng thử và cập nhật được dữ liệu