minhriohtn > 14-02-17, 01:10 AM
ongke0711 > 15-02-17, 12:14 PM
hieuvn > 15-02-17, 02:13 PM
Private Sub Form_Load()
Me.TimerInterval = 1000
End Sub
Private Sub Form_Timer()
If Time = "7:00:00 AM" Then
'kich hoat nut bam
Me.Command0.Enabled = True
End If
End Sub
tranthanhan1962 > 18-02-17, 11:20 PM
(15-02-17, 02:13 PM)hieuvn Đã viết: cái này cũng dễ mà bạn.
yêu cầu form phải mở thì code mới chạy nhé:
code như sau:
phần event form load :
Mã:Private Sub Form_Load()
Me.TimerInterval = 1000
End Sub
phần hẹn giờ:
Mã:Private Sub Form_Timer()
If Time = "7:00:00 AM" Then
'kich hoat nut bam
Me.Command0.Enabled = True
End If
End Sub
have fun
Me.Command0.Enabled = True
minhriohtn > 06-03-17, 01:08 AM
(15-02-17, 12:14 PM)ongke0711 Đã viết: - Bạn xem bài này. Nó gần giống với yêu cầu của bạn (của bạn đơn giản hơn).
Link: http://thuthuataccess.com/forum/thread-9483.html
- Bạn nói cụ thể hơn về báo cáo tự động: tới thời gian qui định sẽ gửi báo cáo = email tới từng người hay tự trích xuất báo cáo rồi lưu ở 1 folder chỉ định sẳn hay ... như thế nào?
tranthanhan1962 > 06-03-17, 05:47 AM
(06-03-17, 01:08 AM)minhriohtn Đã viết:Bạn đã có code nút bấm xuất ra file excel và tự động đưa các file excel sau khi đã xuất xong sang inbox của MSOutlook để gửi tới các địa chỉ mail đã mặc định sẵn, chỉ cần đưa tòan bộ code này vào event Form_Timer()(15-02-17, 12:14 PM)ongke0711 Đã viết: - Bạn xem bài này. Nó gần giống với yêu cầu của bạn (của bạn đơn giản hơn).
Link: http://thuthuataccess.com/forum/thread-9483.html
- Bạn nói cụ thể hơn về báo cáo tự động: tới thời gian qui định sẽ gửi báo cáo = email tới từng người hay tự trích xuất báo cáo rồi lưu ở 1 folder chỉ định sẳn hay ... như thế nào?
Trước tiên em cảm ơn anh đã chỉ dẫn. Em xin nói cụ thể là như thế này.
Em có 1 chương trình báo cáo (nhưng chưa tự động được vẫn phải click bằng tay.hjhj) bằng access , trong chương trình báo cáo này thì có data link từ một file data khác và nhiều query để truy vấn.
- khi đến 7H00 AM thì em click vào nút xuất file thì nó sẽ chạy code xuất ra file excel và tự động đưa các file excel sau khi đã xuất xong sang inbox của MSOutlook để gửi tới các địa chỉ mail đã mặc định sẵn ( em gom cả code xuất file và put mail sang inbox chung trên 1 botton )
em đang tìm hiểu cách để khi đến 7H00 AM chương trình sẽ tự động chạy cái botton đó.
Private Sub Form_Timer()
If Time = "7:00:00 AM" Then
Code nút bấm
End If
End Sub
tainguyenvtt > 06-10-17, 11:03 AM
(06-03-17, 05:47 AM)tranthanhan1962 Đã viết:(06-03-17, 01:08 AM)minhriohtn Đã viết:Bạn đã có code nút bấm xuất ra file excel và tự động đưa các file excel sau khi đã xuất xong sang inbox của MSOutlook để gửi tới các địa chỉ mail đã mặc định sẵn, chỉ cần đưa tòan bộ code này vào event Form_Timer()(15-02-17, 12:14 PM)ongke0711 Đã viết: - Bạn xem bài này. Nó gần giống với yêu cầu của bạn (của bạn đơn giản hơn).
Link: http://thuthuataccess.com/forum/thread-9483.html
- Bạn nói cụ thể hơn về báo cáo tự động: tới thời gian qui định sẽ gửi báo cáo = email tới từng người hay tự trích xuất báo cáo rồi lưu ở 1 folder chỉ định sẳn hay ... như thế nào?
Trước tiên em cảm ơn anh đã chỉ dẫn. Em xin nói cụ thể là như thế này.
Em có 1 chương trình báo cáo (nhưng chưa tự động được vẫn phải click bằng tay.hjhj) bằng access , trong chương trình báo cáo này thì có data link từ một file data khác và nhiều query để truy vấn.
- khi đến 7H00 AM thì em click vào nút xuất file thì nó sẽ chạy code xuất ra file excel và tự động đưa các file excel sau khi đã xuất xong sang inbox của MSOutlook để gửi tới các địa chỉ mail đã mặc định sẵn ( em gom cả code xuất file và put mail sang inbox chung trên 1 botton )
em đang tìm hiểu cách để khi đến 7H00 AM chương trình sẽ tự động chạy cái botton đó.
Mã:Private Sub Form_Timer()
If Time = "7:00:00 AM" Then
Code nút bấm
End If
End Sub
Yêu cầu:
1/ Máy tính đang mở lúc 7h (có thể sử dụng ứng dụng tự động mở máy tính, thiết đặt mở máy trước 7 giờ)
2/ Phần mềm cũng đang hoạt động lúc 7h (thiết đặt startup mở phần mềm khi khởi động máy tính)
Vậy là bạn có một ứng dụng hoàn toàn tự động rồi đó.