boyhong 发表于 2010-1-15 16:33:18

[已解决]关于用telnet 判断邮件服务器状态的故障

本帖最后由 boyhong 于 2010-4-8 14:20 编辑

DOS命令:
telnet pop.163.com 110

我试着用：
AU3下的RUN 这个DOS命令。>>c:\123.txt   竟然这个123.txt为空/
然后找了下论坛。StdoutRead($foo)同样也获取失败。
最后冷静想，发现这个DOS命令输入完毕后，其运行结果是新开一个窗口了。。所以导致以上两种方法失败.
各位感兴趣的朋友，请实际试试看？盼得到你们的答复。
我用这串命令这结果。是为了。想用telnet 命令的返回结果。判断邮件服务器状态的故障

the886 发表于 2010-2-1 19:43:12

学习了............

remme 发表于 2010-4-8 12:49:51

如果只是为了诊断服务器状态的话，直接tcp比较快

boyhong 发表于 2010-4-8 12:56:50

如果只是为了诊断服务器状态的话，直接tcp比较快
remme 发表于 2010-4-8 12:49 http://www.autoitx.com/images/common/back.gif

能说一下详细的实现过程吗？感谢指教~~~

boyhong 发表于 2010-4-8 14:21:08

感谢三楼的提示。

TCPConnect ( IP地址, 端口)

根据其返回值搞定~~

remme 发表于 2010-4-8 14:41:42

虽然晚到一步，我还是贴一个吧。

;===========检查TCP端口是否打开================
Func Check_TCP_PORT($dIP,$dPort)
local $g_IP = $dIP
local $g_Port = Number($dPort)
TCPStartUp()
$socket = TCPConnect( $g_IP, $g_Port )
If $socket=-1 Then
        ;Switch @ERROR
        ;        case 10060
        ;        $msg = "IP地址不正确"
        ;        case 10061
        ping($g_ip)
        switch @error
        case 0
                $msg = "端口不正确"
        case 1
                $msg = "无法连接端口，其可能性有" &@CR &"1、主机不存在" &@CR & "2、存在防火墙"
        case 2
                $msg = "网络不可达"
        Case 3
                $msg = "错误目的地"
        Case 4
                $msg = "未知错误"
        EndSwitch
        ;EndSwitch       
else
        $msg = "IP地址" & $g_ip & "的TCP " &$g_Port &"端口可以打开"
EndIf
TCPShutdown()
return $msg
EndFunc ;>=结束程序

chenzhi1210 发表于 2011-6-10 12:26:18

telnet 可以发邮件吗？

chenzhi1210 发表于 2011-6-10 12:26:30

我还没有试过呢

wsfda 发表于 2011-6-10 12:45:47

路过一下，TCP待好好研究

leon460 发表于 2011-11-3 11:33:47

回复 6# remme

测试通过，
但是不能返回同在dos窗口中的信息
页: [1]
查看完整版本: [已解决]关于用telnet 判断邮件服务器状态的故障