动态改变/添加网络设置中TCP/IP的DNS

2003-10-19　网友评论 0 条　点击进入论坛

例如，把 DNS Server的地址添加为192.0.0.1和192.1.1.0，可调用：

SetTCPIPDNSAddresses(192.0.0.1 192.1.1.0) ;

// 各地址之间用一个空格隔开

1. SetTCPIPDNSAddresses 定义如下：

procedure SetTCPIPDNSAddresses( sIPs : string );

begin

//

// if using Windows NT

//

SaveStringToRegistry_LOCAL_MACHINE(

SYSTEM\CurrentControlSet +

\Services\Tcpip\Parameters,

NameServer,

sIPs );

//

// if using Windows 95

//

SaveStringToRegistry_LOCAL_MACHINE(

SYSTEM\CurrentControlSet +

\Services\VxD\MSTCP,

NameServer,

sIPs );

end;

2. 其中 SaveStringToRegistry_LOCAL_MACHINE 定义：

uses Registry;

procedure SaveStringToRegistry_LOCAL_MACHINE(

sKey, sItem, sVal : string );

var

reg : TRegIniFile;

begin

reg := TRegIniFile.Create( );

reg.RootKey := HKEY_LOCAL_MACHINE;

reg.WriteString( sKey, sItem, sVal + #0 );

reg.Free;

end;

今日推荐

• ·微软欲起诉谷歌Chrome浏览器垄断
• ·精选ERP以技术为纲
• ·技术答疑：AC.NET标准会计软件--《会稽山》单机专业版[图]
• ·AC.NET标准会计软件--《会稽山》下载安装与操作流程
• ·敏捷开发和高级别CMMI

• ·Siemens PLM Software 技术技巧（12）[组图]
• ·Siemens PLM Software 技术技巧（11）[组图]
• ·用ANSYS计算变压器箱体涡流，可以加阻抗边界条件吗
• ·企业为什么要实施易拓软件
• ·网络管理系统的进步[图]

重点推荐

领军企业技术文库

最新专题

电子杂志订阅

技术热点