Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共6 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:早上不发邮件?

1楼
solarhe2006 发表于:2013/7/11 10:08:19

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

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不发邮件?

2楼
王锋 发表于:2013/7/11 10:16:22

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

    application.msgout "发了"
 end if 

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

3楼
solarhe2006 发表于:2013/7/11 10:24:05
如果下午也不能发,我就认了,问题是下午能发,上午不能发?
4楼
guotx2010 发表于:2013/7/11 11:38:30
"08:50:00" 也加上 Cdate,改为CDate( "08:50:00")试试
5楼
solarhe2006 发表于:2013/7/12 9:05:13
Cdate,改为CDate( "08:50:00")后早上收到邮件了,谢谢斑竹,但为什么加上CDATE就可以呢?学习下
6楼
王锋 发表于:2013/7/12 13:55:08

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

 

    application.msgout cdate(time)

 

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

共6 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.01563 s, 2 queries.