Mở khóa data Query
Mình xuất query ra từ table nhưng không hiểu sao query không cho nhập dữ liệu.
mọi người chỉ giúp em làm sao để có thể nhập được query
Demo - Tra cứu thông tin DN bằng MST, CCCD (Phần 2)
Chào các bạn,
Lúc trước tôi có post một ứng dụng tra cứu thông tin doanh nghiệp lấy dữ liệu từ trang masothue.com như link bài này:
https://thuthuataccess.com/forum/thread-11611.html
Ứng dụng cũ chỉ dùng thư viện Internet Explore (IE) để tương tác với Web nhưng các này cũng có nhiều hạn chế vì liên quan đến trình duyệt web của điều hành (hiện giờ là Edge).
Do đó ở phiên bản này tôi thay đổi dùng thư viện luôn có sẳn trong VBA là WinHTTP request để lấy dữ liệu từ web về nhanh hơn và không bị phụ thuộc vào trình duyệt Web. Ứng dụng có thể tìm kiếm theo MST (doanh nghiệp, cá nhân) , số CCCD (CMND), theo tên công ty.
Lưu ý là ứng dụng này dùng để tích hợp vô các ứng dụng kế toán của bạn để kiểm tra thông tin DN, cập nhật danh sách khách hàng, thông tin xuất hoá đơn v.v.. cho ứng dụng. Do đó các bạn chỉ cần thêm code để lưu dữ liệu về Table thông qua các TextBox cố định tên (thuộc tính Name) trên Form.
Nếu để xem thông tin không thôi thì lên trang https://masothue.com xem là được rồi .
Link demo: https://drive.google.com/file/d/1blOPAEx...share_link
* Chú ý quan trọng:
- Đừng bấm tìm kiếm một MST nào đó liên tục, trang masothue.com sẽ khoá IP của bạn và không thể truy cập trang này nữa, kể cả thông qua trình duyệt. Vì trang tưởng bị tấn công mạng khi gửi Request vào trang liên tục.
- Cách khắc phục: Khởi động lại Modem để thay đổi IP hoặc dùng các ứng dụng tạo IP ảo để tiếp tục sử dụng.
** Cập nhật 1: hiển thị số trang kết quả trả về khi tìm kiếm theo "Tên Công Ty"
** Cập nhật 2: Các bạn nên dùng cái demo của anh ledangvan đã post ở bài #6 cho tiện dụng hơn.
*** Cập nhât 3 (2/9/2021): Sửa lỗi không tra cứu được theo MST.
- Máy bạn nào bị báo lỗi liên quan đến TLS thì cài cái tool này vô để sửa. Tool này của Microsoft, nó chỉnh sửa Registry để hỗ trợ TLS 1.1, TLS 1.2 do WebServer sau này không còn hỗ trợ TLS 1.0 nữa.
Link tool: MicrosoftEasyFix51044
*** Cập nhât 4 (1/7/2025): Sửa lỗi web thay đổi link tra cứu.
Link: https://www.mediafire.com/file/0jrt8uzkm...accdb/file
So sánh giá trị trong main form
HI mọi người.
Trong mainfrom mình có 2 Txtbox. 1 cái đã có giá trị sắn ví dụ là 2. Còn 1 cái lấy giá trị đếm được từ subform. Khi số đếm nhày lên 2 thì sẽ báo 1 msgbox là đã đủ số lượng không scan thêm nữa.
Nhưng mình ko biết lấy event nào để nó chạy mã code đó. Đã thử các loại sự kiện rồi mà ko dc. Có cách nào làm dc ko mn
Tạo Map this Address
Hiện tại mình đang viết code để tìm kiếm địa chỉ như sau
Private Sub cmdMap_Click()
Dim strAddress As String
Dim strLink As String
On Error GoTo myErr
strAddress = Me.Address & ", " & Me.Industrial & ", " & Me.Dictrict & ", " & Me.City & ", " & Me.Country
strLink = "http://www.google.com/maps?hl=en?&q= "
Application.FollowHyperlink strLink & strAddress
On Error GoTo 0
Exit Sub
myErr:
Resume Next
End Sub
Nhưng khi tìm kiếm địa chỉ ở việt nam thì bị lỗi phông chữ, bạn nào có cách nào để tìm được tiếng việt không chỉ mình với ạ
Hướng dẫn cách nhập dữ liệu trong Table có gợi ý
Mình có Table (có nhiều Field, trong đó có Field lĩnh vực văn bản) chứa thông tin các văn bản luật để làm nguồn của Form tìm kiếm văn bản.
Ý tưởng như sau: Khi cập nhật dữ liệu vào Table thì ở Field lĩnh vực văn bản, mình muốn khi nhập ở đây sẽ có gợi ý hiện ra cách nhau bởi dấu "," (kiểu như trên facebook, khi tag ai vào, chỉ cần gõ chữ là hiển thị nick name người đó ra). Mục đích ý tưởng này là khi tìm một văn bản, văn bản này thuộc nhiều lĩnh vực khác nhau nên dù chọn lĩnh vực nào cũng ra kết quả (vd: văn bản A thuộc ba lĩnh vực 1, 2, 3=> khi chọn lĩnh vực 1 hoặc 2 hoặc 3 đều ra văn bản A...).
Xin được hướng dẫn thủ thuật này ạ!
Xin cảm ơn!
| Chủ đề Mới nhất |
|
tripscan — Как планироват...
-Chuyên mục: MS Word-Đăng bởi lần cuối: Leonfurry-31 Phút trước-
» Bài trả lời: 0-
» Lượt xem: 1
|
|
SkterjeadS
-Chuyên mục: MS Word-Đăng bởi lần cuối: CarrollHut-40 Phút trước-
» Bài trả lời: 0-
» Lượt xem: 1
|
|
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,345
|
|
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: 146
|
|
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: 160
|
|
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,102
|
|
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: 182
|
|
Đồ 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: 660
|
|
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: 186
|
|
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: 632
|
| 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 đủ
|
| | | | |