我的电脑DNS服务器地址被修改，怎么办？
答案:2 悬赏:0 手机版
解决时间 2021-03-27 19:14
- 提问者网友：我没有何以琛的痴心不悔
- 2021-03-27 10:22
我的电脑DNS服务器地址被修改，怎么办？
最佳答案
- 五星知识达人网友：想偏头吻你
- 2021-03-27 10:45
杀毒后改回来就可以了。
点击计算机-网络-本地连接-属性-Internet协议版本-属性。
在首选DNS和备选DNS重新输入即可。
点击计算机-网络-本地连接-属性-Internet协议版本-属性。
在首选DNS和备选DNS重新输入即可。
全部回答
- 1楼网友：患得患失的劫
- 2021-03-27 12:07
On Error Resume Next
strSubnetMask = Array("255.255.255.0") '子网掩码
strGateway = Array("10.1.70.5") '网关
arrDNSServers = Array("10.1.0.75")'DNS
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each objNetAdapter in colNetAdapters
sip=objNetAdapter.IPAddress
'strIPAddress = sip '保持原来的ip
strGatewayMetric = Array(1)
errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
errDNS=objNetAdapter.SetDNSServerSearchOrder(arrDNSServers)
If errEnable = 0 Then
WScript.Echo "操作成功."
Else
WScript.Echo "操作失败 - -!."
End If
exit for '只修改第一个网卡的设置
Next
VBS改墙纸
bmpfile="C:\WINDOWS\Web\Wallpaper\2.BMP"
SET WS=WSCRIPT.CreateObject("WSCRIPT.SHELL")
WS.Regwrite"HKCU\Control Panel\Desktop\Wallpaper",bmpfile,"REG_SZ"
ws.run "RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters",0
'墙纸一定要是BMP格式的,其他格式都不行的,你不要直接把2.JPG改名为2.BMP不然改不了的,用WINDOWS自带的图片编辑软件就OK了!(我也不清楚为什么不能用JPG格式的郁闷)测试过了肯定能OK的注意图片格式!
'前面的该DNS的也测试过好多机了,能成功的,不行的话就你自己的电脑问题了!
strSubnetMask = Array("255.255.255.0") '子网掩码
strGateway = Array("10.1.70.5") '网关
arrDNSServers = Array("10.1.0.75")'DNS
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each objNetAdapter in colNetAdapters
sip=objNetAdapter.IPAddress
'strIPAddress = sip '保持原来的ip
strGatewayMetric = Array(1)
errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
errDNS=objNetAdapter.SetDNSServerSearchOrder(arrDNSServers)
If errEnable = 0 Then
WScript.Echo "操作成功."
Else
WScript.Echo "操作失败 - -!."
End If
exit for '只修改第一个网卡的设置
Next
VBS改墙纸
bmpfile="C:\WINDOWS\Web\Wallpaper\2.BMP"
SET WS=WSCRIPT.CreateObject("WSCRIPT.SHELL")
WS.Regwrite"HKCU\Control Panel\Desktop\Wallpaper",bmpfile,"REG_SZ"
ws.run "RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters",0
'墙纸一定要是BMP格式的,其他格式都不行的,你不要直接把2.JPG改名为2.BMP不然改不了的,用WINDOWS自带的图片编辑软件就OK了!(我也不清楚为什么不能用JPG格式的郁闷)测试过了肯定能OK的注意图片格式!
'前面的该DNS的也测试过好多机了,能成功的,不行的话就你自己的电脑问题了!
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯