求一程序:运行在本地机上,如果用户改动本地机的ip地址,就谈出一个对话框。

liangbinger 2004-04-03 07:59:58
我想用vb.net实现一个功能:
此程序运行在本地机上,如果用户改动本地机的ip地址,就谈出一个对话框。
怎么实现?
...全文
89 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
hertcloud 2004-04-04
  • 打赏
  • 举报
回复
关注!
liangbinger 2004-04-04
  • 打赏
  • 举报
回复
douhapy(双喜) ( ) 信誉:100
你的意思是过一段时间查看一次吗?我想时刻监测!
liangbinger 2004-04-04
  • 打赏
  • 举报
回复
请各位老师关注一下:
http://expert.csdn.net/Expert/topic/2924/2924317.xml?temp=.4719202
LiJoe 2004-04-04
  • 打赏
  • 举报
回复
'用一个Timer控件定时扫描本机IP
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Dim OldIp As IPAddress
'原本机IP
OldIp = IPAddress.Parse("192.168.0.137")

Dim ipList As IPHostEntry
'获取本机IP列表
ipList = Dns.GetHostByName(Dns.GetHostName)
Dim i As Integer
'遍历IP列表,对比有没有修改
For i = 0 To ipList.AddressList.Length - 1
If ipList.AddressList(i).ToString.Equals(OldIp.ToString) = False Then
MsgBox("IP已经被修改")
End If
Next
End Sub

在实际应用中可能存在有多个IP,可以将OldIp定义成IPAddress数组
yoobj 2004-04-04
  • 打赏
  • 举报
回复
先确定本机的IP地址。IP1
然后通过WMI获得本机IP地址。IP2
判断2者是否相等。
liangbinger 2004-04-04
  • 打赏
  • 举报
回复
在线等待,请大家帮忙,谢谢了
douhapy 2004-04-03
  • 打赏
  • 举报
回复
先保存IP然后,然后IP地址是否与保存的Ip相同,若不同,弹出窗体,将新的Ip保存。
liangbinger 2004-04-03
  • 打赏
  • 举报
回复
用vb.net写

谢谢

16,721

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧