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

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

本帖最后由 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

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

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窗口中的信息

		自动登录	找回密码
密码			加入

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

评分

相关帖子