Tùy chọn
Thủ Thuật Access
-
Trang chủ
|
Viết bởi: tuyetphale23 21-11-13, 02:39 PM Chuyên mục: Query - Bài trả lời (5) |
Mình muốn tính ngày hợp đồng hết hạn
Nếu có phụ lục thì ngày hết hạn bằng ngày ký phụ lục + số năm hiệu lực, còn không có phụ lục thì lấy ngày ký hợp đồng + số năm hiệu lực của hợp đồng trả về giá trị ngày định dạng dd/mm/yyyy
Ngày còn lại lấy ngày hết hạn hợp đồng - ngày hiện tại trên PC trả về giá trị number
Mình có đặt định dạng ở mấy cái trường rồi nhưng kết quả vẫn ra eror mình không biết xử lý thế nào cả
Mọi người giúp đỡ em thực hiện cái query nhé! em cám ơn nhiều
http://www.mediafire.com/download/gh79g9...quanly.rar
|
Viết bởi: nicebike00 21-11-13, 01:48 PM Chuyên mục: Query - Bài trả lời (3) |
http://www.mediafire.com/?twhbuj4dy1vnvd3
Chân thành cảm ơn!
|
|
Viết bởi: Minh Tiên 20-11-13, 04:34 PM Chuyên mục: Forms - Bài trả lời (32) |
1. Đoạn code:
Mã:
Private Sub cboMahangban_BeforeUpdate(Cancel As Integer)
On Error GoTo Loi_Err
Call OpenMyConnection
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
With rs
Set .ActiveConnection = MyConn
.Source = "SELECT Soluongton FROM tblHanghoa where Mahang='" & Me.cboMahangban & "'"
.LockType = adLockOptimistic
.CursorType = adOpenKeyset
.Open
End With
Dim rs1 As ADODB.Recordset
Set rs1 = New ADODB.Recordset
With rs1
Set .ActiveConnection = MyConn
.Source = "SELECT Donvitinh, Soluongban FROM tblXuathangban_Chitiet_Tam where Mahang='" & Me.cboMahangban & "'"
.LockType = adLockOptimistic
.CursorType = adOpenKeyset
.Open
End With
If rs.RecordCount < 0 Then
MsgBox "Mã hàng này chưa có !"
Cancel = True
Exit Sub
Else
If rs!Soluongton <= 0 Then
MsgBox "Loại hàng này đã hết !"
Cancel = True
SendKeys "{Esc}"
Exit Sub
Else
If rs!Soluongton <= Nz(rs1!Soluongban, 0) Then
MsgBox "Loại hàng này chỉ còn lại: " & rs!Soluongton & " " & rs1!Donvitinh
Cancel = True
SendKeys "{Esc}"
Exit Sub
End If
End If
End If
rs.Close: rs1.Close
Set rs = Nothing
Set rs1 = Nothing
Call CloseMyConnection
Loi_Exit:
Exit Sub
Loi_Err:
MsgBox "Err:" & Err.Number & " : " & Err.Description & " In: cboMahangban_BeforeUpdate of frmXuathangban !"
Resume Loi_Exit
End Sub[img]Báo lỗi[/img]
(Err.N:-2147352567: Er.D: Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.)
Rất mong các Pro xem xét chỉ giáo cách gỡ. Cảm ơn nhiều !
|
|
Viết bởi: cannguyen 20-11-13, 01:01 PM Chuyên mục: Quán cóc - Bài trả lời (4) |
http://www.youtube.com/watch?v=wZG3YPabcBc
|
|
Viết bởi: anhemnhangu 19-11-13, 11:14 PM Chuyên mục: Forms - Bài trả lời (3) |
hiện ra danh sách cần tìm, nhưng mình muốn in danh sách này ra dạng report view bằng một nút lệnh nhưng làm không được. Mình có dùng code theo một người bạn hướng dẫn nhưng vẫn chưa chạy được. Mong các bạn hướng dẫn.
http://www.mediafire.com/download/o4f84u...lynv.accdb
| Chủ đề Mới nhất |
| Quản Lý Phòng Khám Tư Nhâ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: Le Duc-24-09-26, 12:03 AM- » Bài trả lời: 34- » Lượt xem: 8,357 |
| Tạo Form không có khung v... -Chuyên mục: Thư viện thủ thuật-Đăng bởi lần cuối: ongke0711-05-09-26, 10:12 PM- » Bài trả lời: 0- » Lượt xem: 153 |
| Tải hàng loạt hóa đơn PDF... -Chuyên mục: Thành viên giúp nhau-Đăng bởi lần cuối: dotrung-16-08-26, 10:29 PM- » Bài trả lời: 6- » Lượt xem: 161 |
| Quản lý kho bằng Accesss -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: AKBui-09-08-26, 12:52 AM- » Bài trả lời: 77- » Lượt xem: 8,138 |
| Tra cứu Mã số thuế - phần... -Chuyên mục: Share Code-Đăng bởi lần cuối: ongke0711-03-07-26, 02:10 PM- » Bài trả lời: 0- » Lượt xem: 184 |
| Đồ cổ đây - một chút hoài... -Chuyên mục: Góc ảnh-Đăng bởi lần cuối: Noname-12-06-26, 09:21 AM- » Bài trả lời: 1- » Lượt xem: 666 |
| Tra cứu thông tin DN qua ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: ongke0711-02-06-26, 11:36 PM- » Bài trả lời: 0- » Lượt xem: 188 |
| Homestay chill đà lat -Chuyên mục: Góc Blogger-Đăng bởi lần cuối: tt1212-01-06-26, 02:51 PM- » Bài trả lời: 0- » Lượt xem: 642 |
| Quản lý quầy thuốc nhỏ lẻ -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: ongke0711-09-05-26, 11:24 AM- » Bài trả lời: 4- » Lượt xem: 3,618 |
| TẠO THÔNG BÁO NHẮC NHỞ CÔ... -Chuyên mục: Tương tác Chương trình ngoài-Đăng bởi lần cuối: ongke0711-07-04-26, 10:46 AM- » Bài trả lời: 2- » Lượt xem: 289 |
| Diễn đàn Thống kê |
|
» Thành viên: 0 » Thành viên mới nhất: Không có ai » Các chủ đề diễn đàn: 0 » Các bài viết diễn: 0 Thống kê đầy đủ |