易截截图软件、单文件、免安装、纯绿色、仅160KB

vb中如何修改局域网电脑的网关或dns?

自己采用的是Set objWMIService = GetObject("winmgmts:\\"&computername&"\root\cimv2")，其中computername是局域网一台电脑的IP或计算机名，但使用这个wmi语句对远程计算机进行操作时，说"拒绝的权限"，我有打开那台电脑的guest用户，自己本机的administrator跟那台电脑的administrator设的密码也一样还是不行，不晓得要如何设置？或者有其它好方法也可以
帮顶
你先试试运行那边打开共享可不可以
引用
你先试试运行那边打开共享可不可以

可以的
VB code:
Function ChangeIP(IP As String, NM As String, GW As String, MDNS As String, SDNS As String) As String
'返回值说明:返回一个设置的中文说明.
Dim strComputer, objWMIService, colNetAdapters, strIPAddress, strSubnetMask
Dim strGateway, strGatewaymetric, strDNS, objNetAdapter, errEnable, errGateways, errDNS
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
strIPAddress = Array(IP) 'ip地址
strSubnetMask = Array(NM) '子网掩码
strGateway = Array(GW) '网关
strDNS =


相关问答：

vb与xml问题

vb中怎么通过xml来解析数据库中的字段值。
没办法用XML解析数据库的字段值，除非数据库中保存的是XML格式的字符串文档。

XML用来展示层次的数据。
数据库一般是二维数据。

数据库中保存的是XML字符串格式� ......

VB中怎么样在表格中修改字体？ - VB / 基础类

比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......

vb修改DTPicker1日期问题

Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else ......

vb插入数据库重复值问题

在vb中怎么判断，插入到数据库中的值是重复的，本人才刚接触VB语言，甚是有好多地方还不懂，还请各位大侠们给出代码，谢谢了呀！！！
插入之前select一下阿。
或者写一个组合SQL插入语句，例如
IF not Exist(
& ......

vb控制GPRS MODEM拨号

我想做个用vb6做的程序，可以控制GPRS MODEM拨号，如拨我自己的手机
可以啊
你先下个AT命令集合学习学习

我来顶

顶贴

LZ好厉害

不顶不行

老是排MP
引用
LZ好厉害
......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号