求高手帮忙编写一个VBA代码 - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

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

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 求高手帮忙编写一个VBA代码

共有7581人关注过本帖树形打印复制链接主题：求高手帮忙编写一个VBA代码

JJJJANE	小大 1楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：论坛游民帖子：130 积分：346 威望：0 精华：0 注册：2012/2/16 22:36:20	求高手帮忙编写一个VBA代码 Post By：2012/3/21 22:27:24 [只看该作者] 用户已被锁定

guotx2010

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：蜘蛛侠帖子：1366 积分：5210 威望：0 精华：7 注册：2010/12/11 18:00:33

Post By：2012/3/22 8:25:56 [只看该作者]

弹出窗口，你还是看不到呀，除非你一直在电脑前，一直远程桌面连接。

JJJJANE	小大 3楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：论坛游民帖子：130 积分：346 威望：0 精华：0 注册：2012/2/16 22:36:20	Post By：2012/3/22 9:33:31 [只看该作者] 用户已被锁定

guotx2010

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：蜘蛛侠帖子：1366 积分：5210 威望：0 精华：7 注册：2010/12/11 18:00:33

Post By：2012/3/22 13:22:19 [只看该作者]

其实也有办法，就是将成交情况写到数据库中，客户端做个查询程序来查询就行了。

或者将每一笔成交发邮件给自己。

g555

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：43 积分：179 威望：0 精华：0 注册：2011/10/27 20:06:17

Post By：2012/3/31 10:20:00 [只看该作者]

你也可以专门申请一个QQ号，有信息时给你发 QQ 消息，论坛有代码

[此贴子已经被作者于2012-3-31 10:21:23编辑过]

zjfuwen

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：53 积分：258 威望：0 精华：0 注册：2010/12/4 10:46:10

Post By：2012/4/10 12:13:41 [只看该作者]

申请189邮箱（电信手机用户）或飞信，用vba的发邮件功能就行了

zjfuwen

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：53 积分：258 威望：0 精华：0 注册：2010/12/4 10:46:10

Post By：2012/4/10 12:14:39 [只看该作者]

qq的不适合远程的

zjfuwen

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：53 积分：258 威望：0 精华：0 注册：2010/12/4 10:46:10

Post By：2012/4/10 12:22:40 [只看该作者]

'邮件设置及发送
Sub mailsend()
    Set mail = CreateObject("WWSCommon.SmtpMail")
    with mail
         .Sendername = "zjfuwen"
         .SenderAddress = "zjfuwen@163.com"
         .Subject = "交易信号邮件提醒"
         .Mailer = "港城投资"
    end with
     call mail.AddReceiver("fw","1333650xxxx@189.cn")
   ' call mail.AddTextContent("详细请见附件EXCEL")
   ' call mail.AppOctStrmContent("D:\stock.xls")
     call mail.Sender("smtp.163.com","zjfuwen","xxxxxx")
     application.MsgOut "邮件发送成功！"
End Sub

zjfuwen

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：53 积分：258 威望：0 精华：0 注册：2010/12/4 10:46:10

Post By：2012/4/10 12:25:12 [只看该作者]

信号出现，激发mailsend，。subject的内容改成你喜好的提示信息就行了，189邮箱收到邮件后，会有短信提醒你的

下一主题 >> << 上一主题

RSS2.0 | Xhtml无图版 | Xslt无图版 Powered By weistock 2012
页面执行时间 00.04688 秒, 5 次数据查询

主题：求高手帮忙编写一个VBA代码