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

boyhong

DOS命令:
telnet pop.163.com 110

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

the886

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

remme

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

boyhong

如果只是为了诊断服务器状态的话，直接tcp比较快
remme 发表于 2010-4-8 12:49

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

boyhong

感谢三楼的提示。

TCPConnect ( IP地址, 端口)

根据其返回值搞定~~

remme

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

;===========检查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

telnet 可以发邮件吗？

chenzhi1210

我还没有试过呢

wsfda

路过一下，TCP待好好研究

leon460

回复 6# remme

测试通过，
但是不能返回同在dos窗口中的信息