| 网站首页 | 业界新闻 | 群组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 编程论坛
免费IT实战开发视频教程合集分享千里之行 始于足下
共有 177 人关注过本帖
标题:VB关闭指定IP的网络连接
只看楼主 加入收藏
leziyi
Rank: 1
等 级:新手上路
帖 子:39
专家分:0
注 册:2016-10-30
结帖率:100%
  已结贴   问题点数:20  回复次数:4   
VB关闭指定IP的网络连接
本人编了一个显示所有网络连接的程序,但无法获取进程名,在网上搜了好久都没搜到,求代码(要有注释和原理说明)
附件: 您没有浏览附件的权限,请 登录注册
2018-11-06 13:54
wube
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:18
帖 子:1750
专家分:3642
注 册:2011-3-24
  得分:10 
https://zhidao.baidu.com/question/172001152.html

获取进程名用spy++去找关键字~再用API去撷取句柄

不要選我當版主
2018-11-06 15:23
ZHRXJR
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:74
帖 子:767
专家分:4054
注 册:2016-5-10
  得分:5 
程序代码:
'给你一个 API 函数,功能是结束一个网络连接:
Declare Function WNetAddConnection Lib "mpr.dll" Alias "WNetAddConnectionA" (ByVal lpszNetPath As String, ByVal lpszPassword As String, ByVal lpszLocalName As String) As Long
'另一个 API 函数,功能是结束一个枚举操作:
Declare Function WNetCloseEnum Lib "mpr.dll" Alias "WNetCloseEnum" (ByVal hEnum As Long) As LongDeclare Function WNetCloseEnum Lib "mpr.dll" (ByVal hEnum As Long) As Long
'再另一个 API 函数,功能是枚举网络资源:
Declare Function WNetEnumResource Lib "mpr.dll" Alias "WNetEnumResourceA" (ByVal hEnum As Long, lpcCount As Long, lpBuffer As Any, lpBufferSize As Long) As Long
Declare Function WNetEnumResource Lib "mpr.dll" Alias "WNetEnumResourceA" (ByVal hEnum As Long, lpcCount As Long, lpBuffer As NETRESOURCE, lpBufferSize As Long) As Long

看看对你有没有帮助。
2018-11-06 18:57
leziyi
Rank: 1
等 级:新手上路
帖 子:39
专家分:0
注 册:2016-10-30
  得分:0 
兄弟,顺便帮忙看一下:

Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

Private Declare Function CreateToolhelp32Snapshot Lib "kernel32" (ByVal dwFlags As Long, ByVal th32ProcessID As Long) As Long

Private Declare Function Module32First Lib "kernel32" (ByVal hSnapShot As Long, lppe As MODULEENTRY32) As Long------------------------------用户类型未定义

Private Declare Function Module32Next Lib "kernel32" (ByVal hSnapShot As Long, lppe As MODULEENTRY32) As Long

Private Declare Function Process32First Lib "kernel32" (ByVal hSnapShot As Long, lppe As PROCESSENTRY32) As Long

Private Declare Function Process32Next Lib "kernel32" (ByVal hSnapShot As Long, lppe As PROCESSENTRY32) As Long

Private Declare Function Thread32First Lib "kernel32" (ByVal hSnapShot As Long, lppe As THREADENTRY32) As Long

Private Declare Function Thread32Next Lib "kernel32" (ByVal hSnapShot As Long, lppe As THREADENTRY32) As Long

Private Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long

Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long

Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
2018-11-06 19:05
ZHRXJR
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:74
帖 子:767
专家分:4054
注 册:2016-5-10
  得分:5 
1、CloseHandle 函数的功能是:关闭一个内核对象。其中包括文件、文件映射、进程、线程、安全和同步对象等。涉及文件处理时,这个函数通常与vb的close命令相似。应尽可能的使用close,因为它支持vb的差错控制。注意这个函数使用的文件句柄与vb的文件编号是完全不同的。
2、CreateToolhelp32Snapshot 函数的功能是:函数通过获取进程信息为指定的进程、进程使用的堆[HEAP]、模块[MODULE]、 线程建立一个快照。说到底,可以获取系统中正在运行的进程信息,线程信息,等。
3、Module32First 函数的功能是:从Snapshot得到第一个Module记录信息。
4、Module32Next 函数的功能是:从Snapshot得到下一个Module记录信息。
5、Process32First 函数的功能是:从Snapshot得到第一个进程记录信息。
6、Thread32Next 函数的功能是:从Snapshot得到下一个Thread记录信息。
7、TerminateProcess 函数的功能是:用来终止进程,可以是系统中的任何进程,只要知道进程的句柄,就可以终止。
8、OpenProcess 函数的功能是:用来打开一个已存在的进程对象,并返回进程的句柄。
9、GetCurrentProcessId 函数的功能是:获取到的是本进程的进程ID。
大概是这样吧,至于函数的参数因为太多,就不一个一个说明了。
2018-11-07 09:06







关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023676 second(s), 8 queries.
Copyright©2004-2018, BCCN.NET, All Rights Reserved