社区
PowerBuilder
帖子详情
PB同mail
dukeli
2000-03-07 08:54:00
能否用PB发送e-mail邮件?我在电脑报上看到了一则利用
mailsession收邮件的程序,但由于pop3和smtp配置有问题
没有成功?希望高手给出详细指点.
...全文
181
4
打赏
收藏
PB同mail
能否用PB发送e-mail邮件?我在电脑报上看到了一则利用 mailsession收邮件的程序,但由于pop3和smtp配置有问题 没有成功?希望高手给出详细指点.
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
none
2000-03-10
打赏
举报
回复
你是执行上述脚本么?
m_msg.Recipient[1].name='alex@goeasy.net'就是指定收件人地址。
另外,OUTLOOK本身也能处理INTERNET邮件呀
dukeli
2000-03-10
打赏
举报
回复
我的程序运行后,出现了一个地址簿的选择,里面有Outlook地址簿,但无法添加Internet邮件
none
2000-03-08
打赏
举报
回复
对不起,messagebox("提示","登陆失败")这句后应该加一句:RETURN。
none
2000-03-08
打赏
举报
回复
我的默认邮件处理程序是MS OUTLOOK。
经过试验发现,PB中的发送邮件,是将邮件发送到OUTLOOK的“发件箱”中,至此PB的“发送”就算成功。至于OUTLOOK(或其它的邮件处理程序)是否发送成功,就不关PB程序的事了。
脚本如下(调试成功):
MailSession m_session
MailReturnCode m_return
MailMessage m_msg
m_session = Create MailSession//创建一个SESSION
IF m_session.MailLogon(MailNewSession!) <> MailReturnSuccess! THEN
MessageBox("提示", '登陆失败')
END IF//登陆到SESSION
m_msg.Subject = "试验用PB发送邮件"//主题
m_msg.NoteText = "这里是邮件正文"//正文
m_msg.Recipient[1].name = 'alex@goeasy.net'//收件人1
m_return = m_session.MailSend(m_msg)//发送邮件
IF m_return <> mailReturnSuccess! THEN
MessageBox("发送结果", '发送失败')
ELSE
Messagebox("发送结果","发送成功")
END IF
m_session.MailLogoff()
DESTROY m_session
PB
收发
MAIL
的经典源码
PB
收发
MAIL
的经典源码,
PB
收发
MAIL
的经典源码
pb
发送
MAIL
用
pb
开发,发送
MAIL
成功率100%,自动发送
MAIL
系统
ELK/ELFK(7.3 ) 企业
PB
级日志系统实战
Elastic Stack日志系统是目前企业应用广泛的一套日志解决方案。 包含的组件有Filebeat,Logstash,Elastic,Kibana等 本堂课引入Kafka 让Elastic Stack 能适应企业
PB
级的业务日志量并弥补传统ELk架构的不足 ★学完这门课程会获得什么? 首先从零开始教你部署Elastic Stack系统, 详细讲解Elastic产品,包括 Kibana.Logstash,Beats的详细讲解以及Elastic的api操作, 并如何监控如何绘图等。最后结合自己的运维过程中的案例讲解,让学员能更加清楚了解原理以及少走一些弯路。 目前我们公司每天产生至少8个T的数据量,历史日志保存半年。此教程足以能承担
PB
级的日志收集系统的量。此教程的背景介绍请参阅我的CSDN博客,置顶内容的第一篇博文。
PB
E
MAIL
随着Internet进入千家万户,通过Internet收发 电子邮件将成为人们最受欢迎的通讯手段之一。如果我们的应用程序也能够提供收发电子 邮件的功能,就可以使我们方便快捷地与他人交换和共享应用的数据和信息,使其应用真 正地溶合于Internet这个大环境。下面我介绍一下在PowerBuild应用中实现收发电子邮件 的方法。
j
mail
.dll在
pb
中的应用收发邮件
j
mail
.dll在
pb
中的应用收发邮件 1、注册j
mail
.dll 方法:在运行中输入: regsvr32 路径\j
mail
.dll 2、示例代码: oleobject j
mail
J
mail
= Create OLEObject J
mail
.ConnectToNewObject("J
Mail
.Message") J
mail
.Charset = ls_charset //中文用 “GB2312” J
mail
.ISOEncodeHeaders = True J
mail
.silent = True J
mail
.Logging = True J
mail
.From = ls_user //发件人邮箱 J
mail
.FromName = ls_
mail
_fr //发件人 J
mail
.Subject = ls_subject //邮件主题 J
mail
.
Mail
ServerUserName = ls_user //发件邮箱登录账户 J
mail
.
Mail
ServerPassword = ls_pwd //发件邮箱用户密码 J
mail
.Priority = 3 //优先级 J
mail
.AddRecipient(ls_
mail
_to) //收件人邮箱 J
mail
.Body =ls_Text + "~r~n" //邮件内容 IF J
mail
.Send(ls_host) THEN //ls_host为发件邮箱服务器 messagebox('Info',"发送成功!") ELSE messagebox('Info',"发送失败!") END IF J
mail
.Close() Destroy J
mail
PowerBuilder
1,077
社区成员
66,438
社区内容
发帖
与我相关
我的任务
PowerBuilder
PowerBuilder 相关问题讨论
复制链接
扫一扫
分享
社区描述
PowerBuilder 相关问题讨论
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章