无忧启动论坛

标题: 教大家如何使用批处理来发送电子邮件 [打印本页]
作者: bjay2008xmy    时间: 2022-5-12 19:31
提示: 作者被禁止或删除 内容自动屏蔽
作者: 481416322    时间: 2022-5-12 19:44
高！
作者: 481416322    时间: 2022-5-12 19:44
实在是高！
作者: 9527sss    时间: 2022-5-12 20:23
作者: Zzfabgroup    时间: 2022-5-12 20:33
厉害
作者: plusv    时间: 2022-5-12 20:40
本帖最后由 plusv 于 2022-5-12 21:12 编辑

这个方法在初学 IP Protocol 时玩过,
可能是约 25 年之前的事了,
Telnet 功能还是很多的,
也可以测试服务器是否正常提供服务,
不过用过最神奇的是远端云计算,
可能是约 30 年之前的事了,
本机 UNIX  比较慢,
Telnet 到 另一台 UNIX,
把 本机运算 丢给 比较快的 另一台 UNIX,
真是惊呆.

PS:
那时的 UNIX 工作站 硬件 每台都超过 一百万 台币(227,433 人民币),
那时的 UNIX 工作站 软件 每台都超过 一百万 台币(227,433 人民币),
真是贼贵,
约 30 年之前,大陆 房价如何,可以买多少户.

作者: 481416322    时间: 2022-5-12 20:47
暂时无此需求
作者: 邪恶海盗    时间: 2022-5-12 20:53
plusv 发表于 2022-5-12 20:40
这个方法在初学 IP Protocol 时玩过,
可能是约 25 年之前的事了,
Telnet 功能还是很多的,

壕,我们做朋友吧...
作者: bjay2008xmy    时间: 2022-5-12 21:05
提示: 作者被禁止或删除 内容自动屏蔽
作者: plusv    时间: 2022-5-12 21:06
邪恶海盗 发表于 2022-5-12 20:53
壕,我们做朋友吧...

习 :
我们是打断骨头连着筋的同胞兄弟,是血浓于水的一家人.

朋友 是啥.
作者: 邪恶海盗    时间: 2022-5-12 21:24
bjay2008xmy 发表于 2022-5-12 21:05
plusv阅历挺丰富的，30年前已经用过计算机了

人家早就财务自由了,哪像我们这些低阶打工人...
作者: htmlc4    时间: 2022-5-12 21:36
telnet没加密吧，不够安全
作者: plusv    时间: 2022-5-12 21:44
htmlc4 发表于 2022-5-12 21:36
telnet没加密吧，不够安全

有很多 第 3 方 Telnet 有 SSL 可替代.
作者: bjay2008xmy    时间: 2022-5-12 21:47
提示: 作者被禁止或删除 内容自动屏蔽
作者: plusv    时间: 2022-5-12 21:49
bjay2008xmy 发表于 2022-5-12 21:47
BASE64加密可能不够安全。这只是一个演示教程，可以实现自动化，其他的不会

回错人了.
作者: andyrave    时间: 2022-5-12 23:33
还要开Telnet 系统下也就算了 PE下太麻烦了 第三方小程序加批   PE和系统下都可以用
作者: plusv    时间: 2022-5-13 00:14
andyrave 发表于 2022-5-12 23:33
还要开Telnet 系统下也就算了 PE下太麻烦了 第三方小程序加批   PE和系统下都可以用

楼主 主要是提供思路,
用啥方法 能抓老鼠的猫都行.

致于 Telnet.exe 我是从 Windows XP 复制一份来运行.
作者: 窄口牛    时间: 2022-5-13 05:39
本帖最后由 窄口牛 于 2022-5-13 06:33 编辑

vbs就能发邮件，貌似不需要telnet？
  1. function Send_mail(You_Account,You_Password,Send_Email,Send_Email2,Send_Topic,Send_Body,Send_Attachment)  
  2. 'code by NetPatch  
  3. 'VBS发送邮件参数说明  
  4. 'You_Account：你的邮件帐号  
  5. 'You_Password:你的邮件密码  
  6. 'Send_Email:  
  7. '主要邮件地址  
  8. 'Send_Email2: 备用邮件地址  
  9. 'Send_Topic:  
  10. '邮件主题  
  11. 'Send_Body:  
  12. '邮件内容  
  13. 'Send_Attachment:邮件附件  

  15. You_ID=Split(You_Account, "@", -1, vbTextCompare)  
  16. '帐号和服务器分离  
  17. MS_Space = "http://schemas.microsoft.com/cdo/configuration/"  
  18. '这个是必须要的，不过可以放心的事，不会通过微软发送邮件  
  19. Set Email = CreateObject("CDO.Message")  
  20. Email.From = You_Account  
  21. '这个一定要和发送邮件的帐号一样  
  22. Email.To = Send_Email  
  23. '主要邮件地址  

  25. If Send_Email2 <> "" Then  

  27. Email.CC = Send_Email2  
  28. '备用邮件地址  
  29. End If  

  31. Email.Subject = Send_Topic  
  32. '邮件主题  
  33. Email.Textbody = Send_Body  
  34. '邮件内容  

  36. If Send_Attachment <> "" Then  

  38. Email.AddAttachment Send_Attachment  
  39. '邮件附件  
  40. End If  

  42. With Email.Configuration.Fields  
  43. .Item(MS_Space&"sendusing") = 2  
  44. '发信端口  
  45. .Item(MS_Space&"smtpserver") = "smtp."&You_ID(1)  
  46. 'SMTP服务器地址  
  47. .Item(MS_Space&"smtpserverport") = 25  
  48. 'SMTP服务器端口  
  49. .Item(MS_Space&"smtpauthenticate") = 1  
  50. 'cdobasec  
  51. .Item(MS_Space&"sendusername") = You_ID(0)  
  52. '你的邮件帐号  
  53. .Item(MS_Space&"sendpassword") = You_Password  
  54. '你的邮件密码  
  55. .Update  
  56. End With  
  57. Email.Send  
  58. '发送邮件  
  59. Set Email=Nothing  
  60. '关闭组件  

  62. Send_Mail=True  
  63. '如果没有任何错误信息，则表示发送成功,否则发送失败  
  64. If Err Then  

  66. Err.Clear  

  68. Send_Mail=False  
  69. End If  
  70. End Function  

  72. '以下是利用上面的函数发送带附件的邮件例子  
  73. If Send_Mail("sss852@163.com","xxxxxx","other@qq.com","","邮件主题","Some code from vbs","")=True Then  

  75. Wscript.Echo "发送成功"  
  76. Else  

  78. Wscript.Echo "发送失败"  
  79. End If
复制代码


作者: wcs    时间: 2022-5-13 06:07
支持分享
作者: 旁观者清    时间: 2022-5-13 08:12
谢谢分享。
作者: bjay2008xmy    时间: 2022-5-13 08:26
提示: 作者被禁止或删除 内容自动屏蔽
作者: JAXE16    时间: 2022-5-13 10:33
感謝分享
作者: bjay2008xmy    时间: 2022-5-13 13:57
提示: 作者被禁止或删除 内容自动屏蔽
作者: llnm    时间: 2022-5-13 14:13
{:1_183
作者: szwp    时间: 2022-5-13 14:29
这个不用改设置。

Synopsis:  sendEmail.exe -f ADDRESS [options]

  Required:
    -f ADDRESS                from (sender) email address
    * At least one recipient required via -t, -cc, or -bcc
    * Message body required via -m, STDIN, or -o message-file=FILE
作者: bjay2008xmy    时间: 2022-5-14 00:21
提示: 作者被禁止或删除 内容自动屏蔽
作者: 12丫2    时间: 2022-5-31 14:40
这挺好，收藏一下
作者: ak009    时间: 2022-12-6 18:40
试试
作者: Liyoulove    时间: 2022-12-7 23:11
牛逼啊
作者: come77    时间: 2022-12-9 20:10
感谢分享好技巧
作者: 54czp    时间: 2022-12-30 23:15
666
作者: woodee    时间: 2023-1-15 15:02
学习 一个



欢迎光临 无忧启动论坛 (http://bbs.wuyou.net/) Powered by Discuz! X3.3