如果是拨号网络连接的话,就只需要一个代码:
挂断 ()
一旦不需要拨号网络连接的话,就可以使用本命令断开。
----------------------------------------------------------
如果不是的话代码如下:
版本 2
子程序 _将所有网络连接挂断_被单击
局部变量 枚举连接, 文本型, , "0"
局部变量 i, 整数型
计次循环首 (枚举所有网络连接__已连接的 (枚举连接), i)
设置本地连接 (枚举连接 [i], 假)
计次循环尾 ()
返回 (假)
子程序 枚举所有网络连接_已连接的, 整数型, 公开
参数 网络连接名, 文本型, 参考 可空 数组
局部变量 size, 整数型
局部变量 AdapterInfo, IP_ADAPTER_INFO
局部变量 buf, 字节集
局部变量 addr, 整数型
局部变量 i, 整数型
局部变量 mac, 文本型
局部变量 tmp, 文本型
局部变量 Addr_ip, 整数型
局部变量 buf_ip, IP_ADDR_STRING
局部变量 size_dns, 整数型
局部变量 buf_dns, 字节集
局部变量 dns, IP_PER_ADAPTER_INFO
局部变量 addr_dns, 整数型
清除数组 (网络连接名)
GetAdaptersInfo ({ 0 }, size)
buf = 取空白字节集 (size)
addr = 取变量地址_字节集 (buf, buf, 0)
如果真 (GetAdaptersInfo (buf, size) = 0)
循环判断首 ()
CopyMemory_iai (AdapterInfo, addr, 640)
加入成员 (网络连接名, 取文本注册项 (4, “SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\” + 到文本 (AdapterInfoAdapterName) + “\Connection\Name”, ))
addr = AdapterInfoNext
循环判断尾 (addr ≠ 0)
如果真结束
返回 (取数组成员数 (网络连接名))
版本 2
DLL命令 GetAdaptersInfo, 整数型, "IPHlpApi"
参数 IpAdapterInfo, 字节集
参数 pOutBufLen, 整数型, 传址
DLL命令 GetPerAdapterInfo, 整数型, "IPHlpApi"
参数 IfIndex, 整数型
参数 pPerAdapterInfo, 字节集
参数 pOutBufLen, 整数型, 传址
DLL命令 Len_iai, 整数型, "kernel32", "LocalSize"
参数 hMem, IP_ADAPTER_INFO, 传址
DLL命令 len_ipai, 整数型, , "LocalSize"
参数 hMem, IP_PER_ADAPTER_INFO, 传址
DLL命令 Len_ias, 整数型, "kernel32", "LocalSize"
参数 hMem, IP_ADDR_STRING, 传址
DLL命令 取变量地址_字节集, 整数型, , "lstrcpynA"
参数 变量, 字节集, 传址
参数 变量, 字节集, 传址
参数 保留, 整数型, , 0
DLL命令 CopyMemory_iai, , "kernel32", "RtlMoveMemory"
参数 Destination, IP_ADAPTER_INFO, 传址
参数 Source, 整数型
参数 Length, 整数型
DLL命令 CopyMemory_ipai, , "kernel32", "RtlMoveMemory"
参数 Destination, IP_PER_ADAPTER_INFO, 传址
参数 Source, 整数型
参数 Length, 整数型
DLL命令 CopyMemory_ias, , "kernel32", "RtlMoveMemory"
参数 Destination, IP_ADDR_STRING, 传址
参数 Source, IP_ADDR_STRING
参数 Length, 整数型
版本 2
数据类型 IP_ADAPTER_INFO
成员 Next, 整数型
成员 ComboIndex, 整数型
成员 AdapterName, 字节型, , "260", 名称
成员 Description, 字节型, , "132", 描述
成员 AddressLength, 整数型
成员 Address, 字节型, , "8"
成员 Index, 整数型
成员 Type, 整数型, , , 类型
成员 DhcpEnabled, 整数型
成员 CurrentIpAddress, 整数型
成员 IpAddressList, IP_ADDR_STRING
成员 GatewayList, IP_ADDR_STRING
成员 DhcpServer, IP_ADDR_STRING
成员 HaveWins, 逻辑型
成员 PrimaryWinsServer, IP_ADDR_STRING
成员 SecondaryWinsServer, IP_ADDR_STRING
成员 LeaseObtained, 整数型
成员 LeaseExpires, 整数型
数据类型 IP_ADDR_STRING
成员 Next, 整数型
成员 IpAddress, 字节型, , "16", IP_ADDRESS_STRING
成员 IpMask, 字节型, , "16", IP_MASK_STRING=IP_ADDRESS_STRING
成员 Context, 整数型
数据类型 IP_PER_ADAPTER_INFO
成员 tmp, 整数型, , "3"
成员 CurrentDnsServer, IP_ADDR_STRING
成员 DnsServerList, IP_ADDR_STRING
置随机数种子(到数值(取秒(取现行时间())))’随机种子,每次种子都不一样
随机数=取随机数(111,666)‘随机数字
如果要把这些内容填到控件中不需取得这3个控件的元素ID(可以下载个起易模块,有网页填表)
网页填表初始化(超文本浏览框取窗口句柄())‘如果是超文本浏览框里操作就这样
网页填表文本框写内容(元素ID,到文本(随机数),)
这是起易模块操作源码,如果其他模块就另当别论了。 如果您有不懂可以留下****或者百度hi我
用超级模块里边的驱动(Drive)双开加载()
超级模块的下载(DownLoad)地址能在baidu搜索“超级模块”
------------------------------
中国蓝客联盟-天空为你解答,想学技术的话能来蓝盟看看,进方法,baidu搜索中国蓝客联盟
我用的网页操作类模块对网页对象进行操作的,模块的话会简单很多不知道你能接受不
组合框经常会出现联动的问题,要执行网页事件,一般都是onchange的事件
如果能接受使用模块,那你随便找个网页操作类的模块,我用的是“wzbc模块”;
如果你不能接受,那你就不用往下看了,我建议你可以找找网页操作类的码元来学习后自己写。
如果用类模块一般都是要求先声明一个全局变量,类型就是模块里的那个大类的名字,wzbc是“网页操作类”,然后就可以用这个形式进行操作
版本 2a初始化 (浏览器窗口句柄)a组合框_选择项目 (“2”, 5)‘第二个组合框的第5项内容a对象操作_执行事件 (a对象_取组合框对象 (2), “onchange”)配合winapi能省去很多麻烦,例如SendMessageA,FindWindow,GetWindow,可以具体到浏览器的控件操作。
下面这个子程序,程序没显示完整,跟上面的代码一个意思,只是多了同步显示到程序内部的组合框里罢了
我这里用的是两个组合框来同步显示网页上的两个联动组合框,不过最后没太大用,代码就写乱了,你大概看看
注:如果打算做状态栏,必须加入延迟
最好的教程是:易语言自带的知识库,视频教学,十天学会易语言
推荐的教程是:易语言组件与实例(可以到官方论坛下载)
专业的教程是:易语言编程系统(65元,与易语言公司联系购买)
例程下载:易语言官方网站的易语言资源网
论坛求助:易语言官方论坛
易语言……
不懂。
不过方法应该是通用的。
第一种,遍历进程表,计数自身进程的数量。这个是最正统,最方便,最安全的。
第二种,利用网络广播来计数。程序启动时,发一个广播信号,收到信号的进程给回复。
第三种,在系统中找一个隐秘的地方设置一个信号量。
重点说说第三种,其关键在于隐秘。可能的方法大概有:
A、在系统固定位置写一个文本文件,里面是一个计数,启动时加一,退出时减一。
B、每个实例都在固定位置创建一个临时文件,退出时删除自己的。
C、在注册表中指定位置增加一条计数项。
D、绑定某端口。比如:从32450开始,寻找未被绑定的端口……
所有上面这些归类于第三种的方法都有不可靠,易于破解的缺陷。
而且实现起来不见得比前两种难度低。
选择最适合自己的吧。
以上就是关于易语言断开本地网络连接源码!全部的内容,包括:易语言断开本地网络连接源码!、易语言网页填表的问题、怎么用易语言做软件多开器。怎么办等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!