设置IP地址
shellexecute(handle,'','netsh interface ip set address ' + SRegedit +
'static 192.168.0.1 255.255.255.0 192.168.0.10 1',nil,nil,sw_hide)