Tùy chọn
Thủ Thuật Access
-
Trang chủ
|
Viết bởi: dcongphuc 25-03-12, 12:18 PM Chuyên mục: Forms - Bài trả lời (12) |
Tôi có file Excell đổi ngày dương lịch sang ngày âm lịch, bây giờ tôi muốn đem code của file này sang chương trình Access để sử dụng cụ thể là:tạo một form trong Access, trên form đó có có 4 textbox.Một cái textbox dùng để gỏ vào ngày dương lịch và những textbox còn lại dùng để chuyển sang ngày âm lịch giống như trong file Excell này vậy, nhưng tôi không biết cách gán code vào các textbox.
Tôi có gởi 1 file Excell mẫu và 1file Access đã chép code vào và đã tạo form sẳn trong đó, bác nào biết thì giúp giùm tôi nhé, tôi cám ơn nhiều lắm. Link tải file: http://www.mediafire.com/?sp4qd60qg6okdrf
|
|
Viết bởi: chatchut 24-03-12, 08:51 PM Chuyên mục: Tương tác Chương trình ngoài - Bài trả lời (3) |
VD: em muốn in mẩu hợp đồng số 1 chỉ cần ấn nút "in mẫu hợp đồng số 1"
|
Viết bởi: Noname 24-03-12, 02:02 PM Chuyên mục: Góc MyBB - Bài trả lời (16) |
Bộ nút tương thích với cả FF, Chrome và cả IE.
Demo: http://thuthuataccess.com/forum/thread-4762.html
![[Hình: postbitbutton.png]](http://i39.photobucket.com/albums/e193/duytuan2002/upload/postbitbutton.png)
Upload 2 thư mục images và jscript vào thư mục gốc diễn đàn
Lưu ý mục images chép đè vào các file diễn đàn đang dùng.
Vào Edit Template: Ungrouped Templates\headerinclude, thêm dòng sau vào cuối cùng để load css button
Mã:
<link href="{$mybb->settings['bburl']}/jscripts/mybutton.css" rel="stylesheet" type="text/css">Để sửa các nút, ta sửa tuần tự như sau:
1/Vào Template\Post Bit Templates\postbit_edit
Mã:
<a href="editpost.php?pid={$post['pid']}" id="edit_post_{$post['pid']}" alt="{$lang->postbit_edit}" title="{$lang->postbit_edit}" class="mButton">Sửa</a>
<div id="edit_post_{$post['pid']}_popup" class="popup_menu" style="display: none;"><div class="popup_item_container"><a href="javascript:;" onclick="Thread.quickEdit({$post['pid']});" class="popup_item">{$lang->postbit_quick_edit}</a></div><div class="popup_item_container"><a href="editpost.php?pid={$post['pid']}" class="popup_item">{$lang->postbit_full_edit}</a></div></div>
<script type="text/javascript">
// <!--
if(use_xmlhttprequest == "1")
{
new PopupMenu("edit_post_{$post['pid']}");
}
// -->
</script>Mã:
<a href="member.php?action=emailuser&uid={$post['uid']}" alt="{$lang->postbit_email}" title="{$lang->postbit_email}" class="mButton">Email</a>Mã:
<a href="search.php?action=finduser&uid={$post['uid']}" alt="{$lang->postbit_find}" title="{$lang->postbit_find}" class="mButton">Tìm</a>Mã:
<a href="private.php?action=send&uid={$post['uid']}" alt="{$lang->postbit_pm}" title="{$lang->postbit_pm}" class="mButton">PM</a>Mã:
<a href="editpost.php?pid={$post['pid']}" onclick="Thread.deletePost({$post['pid']}); return false;" style="display: none;" id="quick_delete_{$post['pid']}" alt="{$lang->postbit_qdelete}" title="{$lang->postbit_qdelete}" class="mButton">Xóa</a>
<script type="text/javascript">
// <!--
$('quick_delete_{$post['pid']}').style.display = '';
// -->
</script>Mã:
<a href="newreply.php?tid={$tid}&pid={$post['pid']}" alt="{$lang->postbit_quote}" title="{$lang->postbit_quote}" class="mButton">Trả lời</a>7/Template\Post Bit Templates\postbit_rep_button
Mã:
<a href="javascript:MyBB.reputation({$post['uid']},{$post['pid']});" alt="{$lang->postbit_reputation}" title="{$lang->postbit_reputation}" class="mButton">Cho điểm</a>Mã:
<a href="javascript:Thread.reportPost({$post['pid']});" alt="{$lang->postbit_report}" title="{$lang->postbit_report}" class="mButton">Báo cáo</a>Mã:
<a href="warnings.php?action=warn&uid={$post['uid']}&pid={$post['pid']}" alt="{$lang->postbit_warn}" title="{$lang->postbit_warn}" class="mButton">Nhắc nhở</a>Mã:
<a href="{$post['website']}" target="_blank" alt="{$lang->postbit_website}" title="{$lang->postbit_website}" class="mButton">۩</a>11/ Template\Post Bit Templates\postbit_multiquote
Lưu ý cái này thay image bằng các nút +/- đính kèm.
Mã:
<a href="javascript:Thread.multiQuote({$post['pid']});" style="display: none;" id="multiquote_link_{$post['pid']}" class="mButton" alt="{$lang->postbit_multiquote}" title="{$lang->postbit_multiquote}"><img src="{$theme['imglangdir']}/postbit_multiquote.gif" alt="{$lang->postbit_multiquote}" title="{$lang->postbit_multiquote}" id="multiquote_{$post['pid']}" />Trích dẫn</a>
<script type="text/javascript">
//<!--
$('multiquote_link_{$post['pid']}').style.display = '';
// -->
</script>Vào Template=>Show Thread Templates=>showthread_newreply
Mã:
<a href="newreply.php?tid={$tid}" alt="{$lang->post_reply_img}" title="{$lang->post_reply_img}" class="mButton">{$lang->post_reply_img}</a>
|
|
Viết bởi: uyvu 23-03-12, 04:33 PM Chuyên mục: Forms - Bài trả lời (9) |
Trong table 1 có danh sách các sô phiếu cần xóa.
Trong table 2 là những record mình cần xóa, với điều kiện là số phiếu table 1 = số phiếu table 2
CODE của mình :
Dim I As Byte
Dim SQL As String
Dim TB1, TB2 As DAO.Recordset
SQL = "SELECT [T06 - NHAT KY BH KHACH HANG].SOPHIEU " & _
"FROM [T06 - NHAT KY BH KHACH HANG] LEFT JOIN [T07 - NHAT KY BH MODEL] ON [T06 - NHAT KY BH KHACH HANG].SOPHIEU = [T07 - NHAT KY BH MODEL].SOPHIEU " & _
"WHERE ((([T07 - NHAT KY BH MODEL].SOPHIEU) Is Null)) " & _
"GROUP BY [T06 - NHAT KY BH KHACH HANG].SOPHIEU;"
Set TB1 = CurrentDb.OpenRecordset(SQL)
Set TB2 = CurrentDb.OpenRecordset("T2")
TB1.MoveFirst
For I = 0 To TB1.RecordCount - 1
TB2.Index = "PrimaryKey"
TB2.Seek "=", TB1!SOPHIEU
TB2.Delete
TB1.MoveNext
Next I
TB1.Close
TB2.Close
Set TB1 = Nothing
Set TB2 = Nothing
End Sub
mình bị vứng mắc chõ này :
Khi cái table 2 là table của database hiện hành thì code trên OK, những table 2 của tôi lại là table được link từ 1 database khác.
Khi chạy code trên nó báo lỗi ở dòng TB2.Index = "PrimaryKey", tôi bỏ dòng này luôn thì vẫn báo lỗi, có báo nào chỉ giáo giúp tôi với
Cảm ơn nhiều
|
|
Viết bởi: Noname 22-03-12, 02:21 PM Chuyên mục: Góc MyBB - Không có hồi đáp |
Chú ý, dùng google dịch tiếng Thổ Nhĩ Kỳ nhé!
![[Hình: 94318210617152057417.png]](http://i39.photobucket.com/albums/e193/duytuan2002/upload/94318210617152057417.png)
![[Hình: 27722727930254136747.png]](http://i39.photobucket.com/albums/e193/duytuan2002/upload/27722727930254136747.png)
![[Hình: 71773445551841599960.png]](http://i39.photobucket.com/albums/e193/duytuan2002/upload/71773445551841599960.png)
Download: http://www.mediafire.com/?4aa1m46huajgg4s
| Chủ đề Mới nhất |
| anchor -Chuyên mục: Ms PowerPoint-Đăng bởi lần cuối: Jeromeshels-Hôm qua, 06:36 PM- » Bài trả lời: 0- » Lượt xem: 6 |
| Ứng dụng kiểm phiếu bầu c... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: ongke0711-28-12-25, 01:21 AM- » Bài trả lời: 0- » Lượt xem: 72 |
| 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: chuvanthom-08-12-25, 09:12 PM- » Bài trả lời: 2- » Lượt xem: 3,292 |
| Demo - Tra cứu thông tin ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: ongke0711-16-11-25, 07:03 PM- » Bài trả lời: 26- » Lượt xem: 4,196 |
| Quản lý kho bằng Accesss -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: hoandokhai-18-10-25, 04:48 PM- » Bài trả lời: 70- » Lượt xem: 6,064 |
| Thơ Nhạc Nhất Lang - Cảm ... -Chuyên mục: Góc Thơ -Đăng bởi lần cuối: Nguyễn Thành Sáng-09-10-25, 03:12 PM- » Bài trả lời: 1- » Lượt xem: 82 |
| 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: tt1212-09-09-25, 05:03 PM- » Bài trả lời: 32- » Lượt xem: 7,447 |
| Thử nghiệm upload hình -Chuyên mục: Phòng thử nghiệm-Đăng bởi lần cuối: Noname-29-08-25, 09:44 AM- » Bài trả lời: 2- » Lượt xem: 766 |
| Quản Lý Công Văn -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: Adung-23-07-25, 10:05 AM- » Bài trả lời: 8- » Lượt xem: 13,084 |
| (Update v.1.0.85 - 30/06/... -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: Adung-22-07-25, 10:46 AM- » Bài trả lời: 270- » Lượt xem: 114,785 |
| Diễn đàn Thống kê |
|
» Thành viên: 8,575 » Thành viên mới nhất: Jimmiebiafe » Các chủ đề diễn đàn: 9,900 » Các bài viết diễn: 48,830 Thống kê đầy đủ |