标题: 批处理有这个功能吗？将本机IP发到指定的邮箱 [打印本页]
作者: nblue 时间: 2006-6-8 14:46 标题: 批处理有这个功能吗？将本机IP发到指定的邮箱
批处理有这个功能吗？
运行此批处理后会将本机IP发到指定的邮箱，如果本机没有联网则不显示错误提示和不发送。
不知我的这个设想能否实现？
作者: piziliu2004 时间: 2006-6-8 14:54
可以的.! 很久以前用過一次,!現在不記得了.!只知道是有個郵件收發的命令. 後接
指定的邮箱,內容就可以了.
作者: nblue 时间: 2006-6-8 17:06
谁知道具体是怎么写的呀
作者: bagpipe 时间: 2006-6-8 17:17
本人觉得批处理本来来解决这个问题好像是行不通的，除了第三方工具，不过可以批处理＋VBS脚本来实现，我给你一下VBS脚本发送邮件的代码，你用他和批处理结合就可以使用了，代码如下
NameSpace="http://schemas.microsoft.com/cdo/configuration/"
Set Email=CreateObject("CDO.Message")
Email.From="bwli@ql-art.com"
Email.To="bagpipe737@163.com"
Email.Subject="我只是试试而已"
Email.Textbody="OK!"
Email.AddAttachment "C:\gp.rar"
With Email.Configuration.Fields
.Item(NameSpace&"sendusing")=2
.Item(NameSpace&"smtpserver")="mail.ql-art.com"
.Item(NameSpace&"smtpserverport")=25
.Item(NameSpace&"smtpauthenticate")=1
.Item(NameSpace&"sendusername")="xxx"
.Item(NameSpace&"sendpassword")="xxx"
.Update
End With
Email.Send
wscript.echo "Send Finish!!!!!! "
作者: nblue 时间: 2006-6-8 17:35
谢谢楼上的，但我是个菜鸟，批处理要怎么来写呢
作者: willsort 时间: 2006-6-8 20:57
───────────────── 版主提示 ─────────────────
请注意你所提及的问题已经涉及到某些敏感或具有潜在危害性的技术信息
如果你无法在一日内证明获取此类信息的正当性与合法性
本版版主将有权利对你的提问和相关回复采取一些有效的屏蔽手段
───────────────── 版主提示 ─────────────────
[ Last edited by willsort on 2006-6-8 at 21:00 ]
作者: electronixtar 时间: 2006-6-8 21:49
使用批处理是可行的，登陆 Mail Server可以用 telnet ～～不过要对RFC狠狠的研究透才行～～
作者: nblue 时间: 2006-6-9 09:53
回板主，本人想用此方法管理网络，绝对没有任何违法企图！
作者: bagpipe 时间: 2006-6-9 10:03
WINDOWS 2000测试通过，不适用98系统
@echo off
for /f "tokens=2 delims=:" %%i in ('"ipconfig|findstr /I /c:"ip address""') do set a=%%i
echo NameSpace="http://schemas.microsoft.com/cdo/configuration/" >1.vbs
echo Set Email=CreateObject("CDO.Message") >>1.vbs
echo Email.From="你发送的邮箱地址" >>1.vbs
echo Email.To="你接收的邮箱地址" >>1.vbs
echo Email.Subject="TEST" >>1.vbs
echo Email.Textbody="%a%" >>1.vbs
echo With Email.Configuration.Fields >>1.vbs
echo ^.Item(NameSpace^&"sendusing")=2 >>1.vbs
echo ^.Item(NameSpace^&"smtpserver")="SMTP地址" >>1.vbs
echo ^.Item(NameSpace^&"smtpserverport")=25 >>1.vbs
echo ^.Item(NameSpace^&"smtpauthenticate")=1 >>1.vbs
echo ^.Item(NameSpace^&"sendusername")="用户名" >>1.vbs
echo ^.Item(NameSpace^&"sendpassword")="密码" >>1.vbs
echo ^.Update >>1.vbs
echo End With >>1.vbs
echo Email.Send >>1.vbs
cscript c:\1.vbs
del c:\1.vbs
作者: electronixtar 时间: 2006-6-9 10:47
呵呵，还是vbs～～～
作者: bagpipe 时间: 2006-6-9 10:56
electronixtar哈哈，估计你在发几个帖子就能够得到“银牌会员”的称呼了，羡慕啊!!!.........
作者: electronixtar 时间: 2006-6-11 20:03
汗～～～帖子水分居多，等级资格充数，其实该羡慕的是你啊，帖子又多质量又高！
作者: piziliu2004 时间: 2006-6-12 10:16
CDO.Message再winxp下找不到.?.
請問winxp下vbs怎麼寫
作者: Climbing 时间: 2006-6-12 15:42
有一个第三方的工具叫blat，是用于从命令行发送邮件的。
http://www.blat.net
作者: chineselgs 时间: 2006-6-12 18:26
呵呵,看了老半天,眼睛都痛了,还是搞不懂~
.....................
作者: nblue 时间: 2006-6-12 19:13
9楼
>>1.VBS是什么呀
作者: zfbuild 时间: 2006-6-13 16:16
c:\1.vbs(15, 1) CDO.Message.1: 要求至少一个收件人，但未找到任何收件人。
报错了
作者: nblue 时间: 2006-6-13 17:15
@echo off
for /f "tokens=2 delims=:" %%i in ('"ipconfig|findstr /I /c:"ip address""') do set a=%%i
echo NameSpace="http://schemas.microsoft.com/cdo/configuration/"
echo Set Email=CreateObject("CDO.Message")
echo Email.From="redf555@163.com"
echo Email.To="redf555@163.com"
echo Email.Subject="TEST"
echo Email.Textbody="%a%"
echo With Email.Configuration.Fields
echo ^.Item(NameSpace^&"sendusing")=2
echo ^.Item(NameSpace^&"smtpserver")="smtp.163.com"
echo ^.Item(NameSpace^&"smtpserverport")=25
echo ^.Item(NameSpace^&"smtpauthenticate")=1
echo ^.Item(NameSpace^&"sendusername")="redf555"
echo ^.Item(NameSpace^&"sendpassword")="123456"
echo ^.Update
echo End With
echo Email.Send
cscript c:\1.vbs
del c:\1.vbs
我在XP下直接点它，提示出错：
标题是：WINDOWS脚宿主
内容是：脚本：C:\1.VBS
行：1
字符：1
错误：无效字符
代码：800A0408
源：MICROSOFT VBSCRIPT编译错误
作者: bagpipe 时间: 2006-6-13 17:29
我的妈呀，我2000都有CDO.MESSAGE对象，你们的没有，还有楼上的，你看好在回复好吗？您的这个代码对吗？唉................这次真的流泪了，是给我气哭的...........
作者: Climbing 时间: 2006-6-13 19:49
呵呵哈，碰到DOS菜鸟了。
作者: nblue 时间: 2006-6-14 08:54
| Quote: | |
|
不好意思呀，我在这方面的基础实在差，如果不是需要这个功能，我想连这些我还不知道呢？拜托讲的明白些好吗？也许你已经讲的很清楚了，但对我这种菜鸟来说还是感觉很高深哟。
作者: nblue 时间: 2006-6-14 16:23
| Quote: | |
|
呵呵，出丑了，见笑了。
现在我终于搞定了，为了搞明白，我专门将批处理看了一遍，才知道DOS还有> >>这种命令，长见识了！现在已经测试成功！
谢谢各位了！
但我发现，在内部网中，只能发送内部IP，而不能找到外部IP
作者: shuaigeya 时间: 2007-3-10 04:33
郁闷 看了那么多帖子 看的头疼 还是没看懂几个
作者: qq82015930 时间: 2007-3-12 07:20
爱没看懂
作者: happygogo 时间: 2007-3-13 05:32
没有用纯的bat啊？
作者: yishanju 时间: 2007-3-13 05:42
晕,老发现这种问题
根本就是批处理干的事情嘛
汗