Delphi中用ICMP探测远程主机是否存活2005-03-10 jlbnet网络通讯中经常需要确定远程主机是否存活，以决定下一部进行的操作。

开发技术指南» 文章正文

引言： Delphi中用ICMP探测远程主机是否存活2005-03-10 jlbnet网络通讯中经常需要确定远程主机是否存活，以决定下一部进行的操作。

摘要：一、 dcom的配置(xp作服务器) 1、运行nt服务器上的dcomcnfg程序，进行dcom配置。 2、进入dcom的总体默认属性页面，将“在这台计算机上启用分布式com”打上勾，将默认身份级别改为“无”。 3、进入dcom的总体默认安全机制页面，确认默认访问权限和默认启动权限中的默认值无everyone，如果不去掉everyone，应用服务器不能......

·快速导出数据到excel（三）：利用excel内置功能 »显示摘要«

摘要：　　将数据导出到excel的方法有多种，速度有快慢之分，我用过三种方法，速度都比较快，下面的一种利用excel内置的功能，是三种之中最快的。其中最主要的是下面两句： xlquery := xlsheet.querytables.add(adoqexport.recordset ,xlsheet.range[a3]); xlquery.refresh;　　不过我这里稍为复杂一点，要通过某种条件完成分......

Delphi中用ICMP探测远程主机是否存活

delphi中用icmp探测远程主机是否存活

网络通讯中经常需要确定远程主机是否存活,以决定下一部进行的操作.可以直接使用icmp协议来实现,但是要考虑许多协议细节,实现起来比较麻烦.windows 自带的icmp库里有现成的函数可以使用,只要在使用前填充相应的数据结构就可以了. 【程序编程相关:Shutdown reboot logo】

2005-03-10 jlbnet 【推荐阅读:Create a menu item i】

//用到的协议数据结构【扩展信息:Simulate the pressin】

以下是要使用的数据结构.这些结构msdn里有c形式的声明,这里给出的是delphi的形式.

pipoptioninfo = ^tipoptioninfo; // ip 头选项

tipoptioninfo = packed record

ttl: byte;//存活时间

tos: byte;//type of service,请求类型

flags: byte;//标志

optionssize: byte;//选项长度

optionsdata: pchar;//选项数据

end;

picmpechoreply = ^ticmpechoreply;

ticmpechoreply = packed record // icmp 返回信息

address: dword;//ip地址

status: dword;//状态

rtt: dword;

datasize: word;//数据长度

reserved: word;//保留

data: pointer;//数据

options: tipoptioninfo;//选项区

end;

//动态库中的函数声明

ticmpcreatefile = function: thandle; stdcall; //创建icmp句柄

ticmpclosehandle = function(icmphandle: thandle): boolean; stdcall; //关闭icmp句柄

... 下一页

·用delphi实现动态代理(2)：设计说明 »显示摘要«

摘要：用delphi实现动态代理(2)：设计说明 [mental studio]猛禽[blog] 在上篇《aspx">用delphi实现动态代理(1)：概述》中，对动态代理作了一个概要的说明，比如为什么需要这样的动态代理，它有什么用等。本篇将对我实现的这个动态代理的设计思路作一下介绍。一、设计目标如上篇中这幅动态代理结构图所示：大致的设计目标有以下几项： tmd......

» 本期热门文章：

· 热门栏目：

» 相关精选文章

» 其它相关：