欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 金字塔软件问题提交 → [求助]请版主帮忙看看代码，成交邮件确认不停的发送

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有6852人关注过本帖树形打印复制链接

主题：[求助]请版主帮忙看看代码，成交邮件确认不停的发送
帅哥哟，离线，有人找我吗？
sorros900
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：61 积分：691 威望：0 精华：0 注册：2010/8/7 16:06:56 		[求助]请版主帮忙看看代码，成交邮件确认不停的发送  发帖心情 Post By：2010/8/18 18:12:37 [显示全部帖子]

请版主帮忙看看代码，成交就发送一次邮件确认，但是不知为什么不停的发送

 

myhold:=EXTGBDATA('myholddata');
EXTGBDATASET('myholdtest',THOLDING2);
mytest:=EXTGBDATA('myholdtest');
if myhold<>mytest then
begin
SENDMAIL(1,'*******@sohu.com',numtostr(TENTERPRICE,1)&numtostr(EXITPRICE,1)&'成交'&numtostr(THOLDING2,1),'');
EXTGBDATASET('myholddata',THOLDING2);
end
查看使用道具详细信息
获赠金币帖，共获得 0 个金币
 回到顶部
帅哥哟，离线，有人找我吗？
sorros900
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：61 积分：691 威望：0 精华：0 注册：2010/8/7 16:06:56 		[求助]请版主帮忙,这个代码是从分钟改变就显示一次的代码稍作改动来的  发帖心情 Post By：2010/8/18 19:39:30 [显示全部帖子]

请版主帮忙,这个代码是分钟改变就显示一次的代码稍作改动来的，下面这个代码测试没有问题啊，只是把minu改成tholding2

,把DEBUGFILE2改成sendmail,不知为什么不停发送邮件，请版主指教

 

 

谢谢

 

seco:=mod(TIMETOT0(CURRENTTIME),60);
minu:=(mod(TIMETOT0(CURRENTTIME),3600)-mod(TIMETOT0(CURRENTTIME),60))/60;

dd:=EXTGBDATA('mydd');
EXTGBDATASET('mytt',minu);
tt:=EXTGBDATA('mytt');
if tt<dd then
begin
DEBUGFILE2('D:\TEST.TXT','tt=%f',tt,1);
EXTGBDATASET('mydd',minu);
end
赠送楼主:0个金币
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.04700 秒, 6 次数据查询