用PB编写邮件应用程序（3）
敬业的IT人
互联网
佚名
2008-1-4 12:06:06
- ·应用MFC开发高级应用程序
·在VC++应用程序中读取文本数据
·使用GWT开发AJAX应用程序
·DirectSound应用程序开发快速入门
·用Indy组件开发Socket应用程序
·在Ajax应用程序中实现数据交换
·VFP基础教程 第十一章 应用
·MFC应用程序框架入门
·Java桌面应用程序设计：SWT
·用VC++建立Service服务应用程序
图2
Integer Value
Value = GetFileOpenName(″选择附件″, docName, Named, ″DOC″, ″All Files (＊.＊),＊.＊″)
If Value = 1 Then
plb—2.AddItem(docName,1)
//docName中必须包含完整的路径信息
“删除附件”按钮用于把已添加的文件去掉，其Clicked事件代码为：
Ind= plb—2.SelectedIndex()
If Ind〈〉－1 Then plb—2. DeleteItem(Ind)
“发送”按钮的Clicked事件代码为：
msg.Subject=sle_4.Text //邮件主题
msg.NoteText=mle—2.Text //消息体
msg.Recipient[1].RecipientType=mailTo!
//指定收件人类型为mailTo!
msg.Recipient[1].Address=′SMTP:′＋sle—5.Text
//收件人地址，前面必须加上SMTP协议
For i=1 To plb—2.TotalItems()
//把选中的文件加到附件中
msg.AttachmentFile[i].FileType=mailAttach! //指定附件i的类型
msg.AttachmentFile[i].PathName= plb—2.Text(i) //附件i的完整文件名
Next
MyMail.mailSend(msg) //发送邮件
- 最新文章
- 用PB编写邮件应用程序（2）[01-04]
- 用PB编写邮件应用程序（1）[01-04]
- 循序渐进学习Power Builder 6.0(10-3)[01-04]
- 循序渐进学习Power Builder 6.0(10-2)[01-04]
- 循序渐进学习Power Builder 6.0(10-1)[01-04]
- 循序渐进学习Power Builder 6.0(9-5)[01-04]
- 相关文章
- 用PB编写邮件应用程序（2）[01-04]
- 用PB编写邮件应用程序（1）[01-04]
- PowerBuilder应用开发系列讲座(15)[01-04]
- 多层C/S系统及其在PB中的应用[01-04]
- 怎样将PB应用的全部源代码打印出来[01-04]
- 应用版本控制软件管理软件开发[01-04]
