如何实现修改本地计算机的IP地址？

Question

方法有几种,给你个提示.
1 修改注册表.
2 读写系统的硬件资料.在tsinghua的相关版面上面有例子.
3 以上的两种方法偶都用VC做过,不过年代久远,加上不在身边,不能给你具体的代码,实在抱歉.

Answer 1

试试~~
procedure TForm1.button1click
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.RootKey := HKEY_LOCAL_MACHINE;
  if Reg.OpenKey('\System\CurrentControlSet\Services\Class\NetTrans\0000', True)
    then Reg.WriteString('IPAddress','192.1.1.1');
    Reg.CloseKey;
    Reg.Free;
  end;
end

Answer 2

修改注册表好象不行吧。
我看了一下，注册表根本没有上面 lastlove(小豆芽) 兄写的那个键。我在TCPIP选项下找到了IP地址的键，修改了IP后。到CMD下用IPCONFIG发现IP地址没有变！
难道要重新启动？我想用程序实现修改后马上能改变IP，就象在TCP/IP配置中修改了就能用一样。
对了，我用的是WIN2000。
不知哪位兄弟能给个思路？

Answer 3

hehefaint(分特) 兄，把TSINGHUA上有资料的网址给我发一下，何如？

Answer 4

我在想会不会有相关的API呢？

Answer 5

我试过了，98下面修改注册表后要重新启动才生效！可是Win2000改了也没有用，不解中~~
：（

Answer 6

我也不知道win2k怎么改，因为我以前试过重启也不行，关注！！