|
|
Viết bởi: grooroo 09-04-13, 08:36 PM Chuyên mục: Thư Viện Ứng Dụng - Bài trả lời (4) |
|
|
Viết bởi: nguyensen1992 09-04-13, 06:39 PM Chuyên mục: Table - Bài trả lời (3) |
|
|
Viết bởi: Xuân Thanh 09-04-13, 03:39 PM Chuyên mục: Thư Viện Giáo Trình - Bài trả lời (2) |
|
|
Viết bởi: thuphuong0808 09-04-13, 12:23 PM Chuyên mục: Forms - Bài trả lời (5) |
Private Sub ghi7_Click()
Dim SQLLop As String
Dim rsLop As Recordset
Dim SQLHS As String
Dim rsHS As Recordset
Dim i As Integer
SQLLop = "SELECT LanKD FROM KiemDinhDH where (((KiemDinhDH.LanKD)=[Forms]![F-kiemdinh]![T3])) "
Set rsLop = CurrentDb.OpenRecordset(SQLLop)
If rsLop.RecordCount > 0 Then
rsLop.MoveFirst
Do Until rsLop.EOF
SQLHS = "SELECT * from KiemDinhDH WHERE (((LanKD)='" & rsLop!LanKD & "'))"
Set rsHS = CurrentDb.OpenRecordset(SQLHS, dbOpenDynaset)
rsHS.MoveFirst
i = tem
Do Until rsHS.EOF
rsHS.Edit
rsHS!Sotem = i
rsHS.Update
rsHS.MoveNext
i = i + 1
s1.Requery
Loop
rsLop.MoveNext
s1.Requery
Loop
rsHS.Close
End If
rsLop.Close
Me.Requery
End Sub
|
|
Viết bởi: hodangbinh47 08-04-13, 10:20 PM Chuyên mục: Forms - Bài trả lời (3) |
| 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,341 |
| 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: 138 |
| 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: 156 |
| 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,059 |
| 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: 176 |
| Đồ 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: 647 |
| 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: 181 |
| 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: 618 |
| 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,608 |
| 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: 281 |
| 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 đủ |