IP地址切换器（易语言原创）

1.软件是由易语言编写，加了壳处理误报问题，目前360应该不会报毒，附源码
2.查毒链接：https://virusscan.jotti.org/zh-CN/filescanjob/8216owa7im
3.软件截图：
4.编写此软件的原因：在论坛下了几款来用，都不是那么好用，用过@wszjf 苦瓜甘甜老师发布的，用过@yuangao这位老师的，这位老师写的软件界面好看，就仿照那界面写了一个

[Python]  

1. import ctypes
2. import sys
3. import subprocess
4. import time
6. def is_admin():
7.     """检查是否以管理员身份运行"""
8.     try:
9.         return ctypes.windll.shell32.IsUserAnAdmin()
10.     except:
11.         return False
13. if not is_admin():
14.     print("正在尝试以管理员身份运行...")
15.     subprocess.run(["powershell", "Start-Process", "python", f'"{sys.argv[0]}"', "-Verb", "RunAs"], shell=True)
16.     sys.exit()
18. # 现在是管理员身份
19. def set_windows_network(interface, ip, subnet, gateway, dns):
20.     """修改 Windows 本地 IP、子网掩码、网关，并设置 DNS"""
21.     try:
22.         print(f"正在修改 {interface} 的 IP 地址...")
23.         subprocess.run(f'netsh interface ip set address name="{interface}" static {ip} {subnet} {gateway}', shell=True, check=True)
25.         print(f"正在设置 {interface} 的 DNS 为 {dns}...")
26.         subprocess.run(f'netsh interface ip set dns name="{interface}" static {dns}', shell=True, check=True)
28.         # 禁用网卡
29.         print(f"正在禁用 {interface}...")
30.         subprocess.run(f'netsh interface set interface "{interface}" admin=disable', shell=True, check=True)
31.         time.sleep(3)  # 等待 3 秒
33.         # 启用网卡
34.         print(f"正在启用 {interface}...")
35.         subprocess.run(f'netsh interface set interface "{interface}" admin=enable', shell=True, check=True)
37.         print(f"成功修改 {interface} 的网络配置：")
38.         print(f"IP 地址：{ip}")
39.         print(f"子网掩码：{subnet}")
40.         print(f"默认网关：{gateway}")
41.         print(f"DNS 服务器：{dns}")
43.     except subprocess.CalledProcessError as e:
44.         print(f"修改网络配置失败: {e}")
46. # 你的网络配置
47. INTERFACE_NAME = "WLAN"  # 确保你的无线网卡名称是 WLAN
48. IP_ADDRESS = "192.168.5.108"
49. SUBNET_MASK = "255.255.255.0"
50. GATEWAY = "192.168.5.1"
51. DNS_SERVER = "114.114.114.114"
53. # 执行修改
54. set_windows_network(INTERFACE_NAME, IP_ADDRESS, SUBNET_MASK, GATEWAY, DNS_SERVER)

复制代码

我自己执行了可以，用chatgpt写的

我是编程小白，大神可以有时间研究一款可以满足下面条件的一个工具吗
局域网计算机信息设置工具，
已有一张表格，表格里面分别有1000台计算机的计算机名，ip ，掩码，网关，DNS，MAC。
计算机系统包括XP,WINDOWS7(32位和64位)，windows10，windows11
要求：
1，计算机重新安装系统后，运行此工具，工具自动获取计算机的MAC，根据获取的MAC匹配对应的计算机名，ip ，掩码，网关，DNS，点击应用配置按钮，自动修改设置计算机的计算机名，ip ，掩码，网关，DNS
2，匹配结果界面的计算机名，ip ，掩码，网关，DNS，每项信息都可以手动修改和保存。
3，信息导入和导出功能

不错不错，感谢作者，很好用

在国外可以把IP改成国内看哎呦疼吗

终于看到个易语言编码的了，拜读

原理是什么？重启路由器？

感谢分享

终于看到个易语言编码的了，拜读

学习一下，感谢分享