主题：早上不发邮件？

。。。。。。。。。。。。。 

call application.SetTimer(3,1000)'1000毫秒扫一次

。。。。。。。。。。。。。
  if id=3 then  '发邮件
 if weekday(now)<>1 and weekday(now)<>7 then    
 if  cdate(time)="08:50:00" or  cdate(time)="15:15:00" then
     sendreport
 end if 
 end if
 end if

 

不知道为什么只有下午发邮件，早上8.50不发邮件？

if  cdate(time)="08:50:00" or  cdate(time)="15:15:00" then
     sendreport

    application.msgout "发了"
 end if 

这样加上调试代码后看看早盘有没有执行到

如果下午也不能发，我就认了，问题是下午能发，上午不能发？

"08:50:00" 也加上 Cdate,改为CDate( "08:50:00")试试

Cdate,改为CDate( "08:50:00")后早上收到邮件了，谢谢斑竹，但为什么加上CDATE就可以呢？学习下

你把你计算机时间改到早上8点，然后

 

    application.msgout cdate(time)

 

看看输出的到底是什么样的日期格式，我觉得做VBA编程的人，应该知道处理这些简单的逻辑思维吧