• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Lưu dữ liệu trên form

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • Lưu dữ liệu trên form
• Lưu dữ liệu trên form

• Lưu dữ liệu trên form

  vulhu06 > 22-07-13, 11:14 AM

  chào các anh chị, em có 01 form nhập dữ liệu, nhưng các field này là textbox không có control source , vậy code của nút "lưu" viết như thế nào vậy? em xin cảm ơn

• RE: Lưu dữ liệu trên form

  Xuân Thanh > 22-07-13, 11:26 AM

  1/ Nhập liệu vào table tblHangHoa gồm các trường MaHang, TenHang, DVT
  2/ Trên form nhập liệu có 3 textbox txtMaHang, txtTenHang, txtDVT
  3/ Code cho nút cmdLuu như sau
  

  Mã PHP:

  Private Sub cmdLuu_Click()
    Dim rs As Recordset
    Set rs = CurrentDb.OpenRecordset("tblHangHoa", dbOpenTable)
    If IsNull(Me.txtMaHang) = True Or IsNull(Me.txtTenHang) = True Or IsNull(Me.txtDVT) = True Then
        MsgBox"Phai ghi du du lieu" , , "Chu y"
        Me.txtMaHang.Sefocus
        Exit Sub
    Else
        rs.AddNew
        rs.Fields(0) = Me.txtMaHang
        rs.Fields(1) = Me.txtTenHang
        rs.Fields(2) = Me.txtDVT
        rs.Update
    End If
    rs.Close
End Sub 


• RE: Lưu dữ liệu trên form

  tt1212 > 22-07-13, 11:30 AM

  Bạn vẫn tạo ra một bảng vì dụ bảng tbhocsinh trong do có truong MHS muốn gan cho txt boxt
  Trong biến có Apter update bạn viết như sau
  Dim tb as recoeset
  set currentdb.opnenrycoret("tbhocsinh",dbopendynaset)
  If tb.recorcaunt >0 then
  exit sub
  else
  do until tb.eof
  tb.add
  tb!MHS =TXTboxt
  tb.update
  exit do
  
  end if
  tb.movenexxt
  loop
  tb.close
  ban thu xem

• RE: Lưu dữ liệu trên form

  vulhu06 > 22-07-13, 11:50 AM

  dạ em xin cảm ơn mấy anh, có một vấn đề này nữa xin mọi người chỉ giáo. em có table tinhtrangcoso(macty,tencty,solankt,ngaykt,chayno), trong đó macty em lấy dữ liệu từ bảng khác, các field khác em có chọn control source, nhưng field tencty là textbox có công thức "=macty.column(1)" vậy thì code sẽ như thế nào đối với textbox tencty???

• RE: Lưu dữ liệu trên form

  vulhu06 > 22-07-13, 12:01 PM

  Ah em đã chạy thử code của anh Xuan Thanh rồi, khi chạy máy báo lỗi "user-defined ... is not defined" và tô màu tại 02 dòng
  "Private Sub cmdLuu_Click()
  Dim rs As Recordset". em đang cần gấp , mong chỉ giáo

• RE: Lưu dữ liệu trên form

  Xuân Thanh > 22-07-13, 01:30 PM

  1/ cmdLuu là tên nút lệnh Lưu, bạn thay bằng tên của bạn nhé
  2/ Trong cửa sổ VBA, vào menu Tools/Reference chọn thư viện DAO 3.6
  Thân mến

• RE: Lưu dữ liệu trên form

  vulhu06 > 14-08-13, 12:19 AM

  Chào mọi người, mấy bữa tìm hiểu viết code lưu dữ liệu trên form đã được rồi, hôm nay vì sự cố mấy luôn file, đành ngồi làm lại. bây giờ code lưu dữ liệu báo lỗi runtime-error "13", type missmatch và tô màu ở dòng set rs=currentdb.openrecordset... mặc dù chọn DAO 3.6 rồi, mọi người chỉ em với

• RE: Lưu dữ liệu trên form

  vulhu06 > 14-08-13, 12:55 AM

  Cứu em với em chọn thư viện DAO 3.6 trong VBA nó báo là "names conflict .."em hiểu ý là đã có rồi nên đụng độ, vậy phải làm sao???

• RE: Lưu dữ liệu trên form

  vulhu06 > 14-08-13, 01:16 AM

  Ai đó làm ơn giúp em với, không có thư viện này thì code lưu dữ liệu của em không hoạt động được, em gởi câu báo lỗi nè
  
  "Name conficts with exiting module,project or object library"
• Bài trước Bài tiếp