IFIX上位机网络测试画面

BigNerdCoding 发布于2021-11-23 09:51 / 926人阅读

IFIX上位机添加IP测试

效果

实现画面

实现脚本

Option Explicit Private Declare Function GetExitCodeProcess Lib "kernel32" ( _        ByVal hProcess As Long, _        lpExitCode As Long) As Long Private Declare Function CloseHandle Lib "kernel32" ( _        ByVal hObject As Long) As Long Private Declare Function OpenProcess Lib "kernel32" ( _        ByVal dwDesiredAccess As Long, _        ByVal bInheritHandle As Long, _        ByVal dwProcessId As Long) As Long        Const PROCESS_QUERY_INFORMATION = &H400Const STILL_ALIVE = &H103Private Sub Text2_Click()        Dim pid As Long    pid = Shell("cmd.exe /C Ping " & "192.168.0.135" & " > c:/ipaac.txt", vbHide)    Dim hProc As Long    hProc = OpenProcess(PROCESS_QUERY_INFORMATION, 0, pid)    Dim ExitCode As Long    Do        Call GetExitCodeProcess(hProc, ExitCode)        DoEvents    Loop While ExitCode = STILL_ALIVE        Text3.Caption = ""     Open "c:/ipaac.txt" For Input As #1    Dim strLine As String    Do Until EOF(1)        Line Input #1, strLine        Text3.Caption = Text3.Caption & strLine & vbNewLine    Loop         Close #1    On Error Resume Next    Kill "c:/ipaac.txt"    On Error GoTo 0End Sub

GPU云服务器云服务器 pos机上位机下位机赛普拉斯上位机开发 java实现上位机 ifix报表制作

文章版权归作者所有，未经允许请勿转载,若此文章存在违规行为，您可以联系管理员删除。

转载请注明本文地址：https://www.ucloud.cn/yun/124449.html

SCADA系统资料整理-概论

摘要：系统资料整理概论系统，即数据采集与监视控制系统，发展到今天已经经历了四代。系统的组成从网络构架来看，系统一般由下位机上位机和通信网络组成。 SCADA系统资料整理-...

hqman 2021-10-12 10:12 评论0 收藏0
三年探索：一条自控、电信/科类学生的技术成长路线

摘要：所以我必须基于自己现在的情况走出一条适合自己情况的成长路线。下位机上位机的思想下位机上位机这就是我自己探索出来的技术成长路线。对和嵌入式的朋友感兴趣的朋友可以试一下我这条学习路线 ...

Miracle 2021-09-09 09:33 评论0 收藏0
02_基于西门子CM1241的ModbusRTU串口通讯实现

摘要：但是我对此协议并不熟悉，本文便以测试为目的基于西门子模块主站，采用通讯协议与温湿度传感器从站通讯获取数据。文章目录前言一、前期准备二、编写通讯程序 1.通讯测试工具和软件 2.编写TIA Portal程序三、基于OPC UA的通讯传输总结前言最近作者在...

不知名网友 2021-11-29 10:50 评论0 收藏0