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

他们

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

llcpojie

yc506545795 发表于 2025-3-19 08:11
我是编程小白，大神可以有时间研究一款可以满足下面条件的一个工具吗
局域网计算机信息设置工具，
已有一 ...

[Python] 纯文本查看 复制代码

import ctypes
import sys
import subprocess
import time

def is_admin():
    """检查是否以管理员身份运行"""
    try:
        return ctypes.windll.shell32.IsUserAnAdmin()
    except:
        return False

if not is_admin():
    print("正在尝试以管理员身份运行...")
    subprocess.run(["powershell", "Start-Process", "python", f'"{sys.argv[0]}"', "-Verb", "RunAs"], shell=True)
    sys.exit()

# 现在是管理员身份
def set_windows_network(interface, ip, subnet, gateway, dns):
    """修改 Windows 本地 IP、子网掩码、网关，并设置 DNS"""
    try:
        print(f"正在修改 {interface} 的 IP 地址...")
        subprocess.run(f'netsh interface ip set address name="{interface}" static {ip} {subnet} {gateway}', shell=True, check=True)

        print(f"正在设置 {interface} 的 DNS 为 {dns}...")
        subprocess.run(f'netsh interface ip set dns name="{interface}" static {dns}', shell=True, check=True)

        # 禁用网卡
        print(f"正在禁用 {interface}...")
        subprocess.run(f'netsh interface set interface "{interface}" admin=disable', shell=True, check=True)
        time.sleep(3)  # 等待 3 秒

        # 启用网卡
        print(f"正在启用 {interface}...")
        subprocess.run(f'netsh interface set interface "{interface}" admin=enable', shell=True, check=True)

        print(f"成功修改 {interface} 的网络配置：")
        print(f"IP 地址：{ip}")
        print(f"子网掩码：{subnet}")
        print(f"默认网关：{gateway}")
        print(f"DNS 服务器：{dns}")

    except subprocess.CalledProcessError as e:
        print(f"修改网络配置失败: {e}")

# 你的网络配置
INTERFACE_NAME = "WLAN"  # 确保你的无线网卡名称是 WLAN
IP_ADDRESS = "192.168.5.108"
SUBNET_MASK = "255.255.255.0"
GATEWAY = "192.168.5.1"
DNS_SERVER = "114.114.114.114"

# 执行修改
set_windows_network(INTERFACE_NAME, IP_ADDRESS, SUBNET_MASK, GATEWAY, DNS_SERVER)

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

yc506545795

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

l99453

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

最温柔的复仇

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

windyz

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

yingke

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

rsz008

感谢分享

windy1111

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

Lyc20150208

学习一下，感谢分享

BakesHe

感谢分享