摘要:
<% ' 执行每天只需处理一次的事件 Call BrandNewDay() ' ============================================ ' 执行每天只需处理一次的事件 ' ============================================ Sub BrandNewDay() Dim sDate sDate = Date() If Application( "date_today ") = sDate Then Exit Sub ' 具体操作 Application.Lock 阅读全文
posted @ 2012-11-23 13:07
Hellen.Li
阅读(212)
评论(0)
推荐(0)

浙公网安备 33010602011771号