如何AlarmControl中的报警内容-技术论坛-工业支持中心-西门子中国

运维工程师专区

官方商城

作者	主题
那一剑的温柔侠圣经验值: 2241 发帖数: 378 精华帖: 4 主题：【求助】如何AlarmControl中的报警内容只看楼主只看精华楼主 2021-02-17 17:56:57 标签：使用操作 wincc v7.5 sp1 报警信息读取脚本请问，在wincc V7.5 SP1 如何读取AlarmControl控件中，鼠标选中的报警信息的编号和内容？谢谢扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论... 重要声明：著作权归作者所有。商业转载请联系作者获得授权，非商业转载请注明出处。帖子链接：https://www.ad.siemens.com.cn/club/bbs/post.aspx?a_id=1680714&b_id=5&s_id=0&num=5
zhangli0 版主经验值: 43582 发帖数: 15779 精华帖: 61 回复：如何AlarmControl中的报警内容只看楼主只看精华 1楼 2021-03-15 10:00:53 你这样的操作只有用脚本了呀！你读取选中的干什么呢？如果要导出等，你可以直接把所有的都导出来的。活到老，学到老！为了生活学习吧！扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...
那一剑的温柔侠圣经验值: 2241 发帖数: 378 精华帖: 4 回复：如何AlarmControl中的报警内容只看楼主只看精华楼主 2楼 2021-03-15 16:23:02 利用InsertAuditEntry函数插入一条审计追踪数据，审计追踪中需体现出操作员确认了哪一条报警，报警内容是什么。扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...
那一剑的温柔侠圣经验值: 2241 发帖数: 378 精华帖: 4 回复：如何AlarmControl中的报警内容只看楼主只看精华楼主 3楼 2021-03-15 16:24:36 如果可以读取当前选中的报警的报警内容，那么就可以把这个报警内容加到InsertAuditEntry函数中，实现具体某一条报警的审计追踪。扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...
W.M.J 侠士经验值: 1729 发帖数: 104 精华帖: 6 回复：如何AlarmControl中的报警内容只看楼主只看精华 4楼 2021-12-23 12:43:13 给你一段示例代码： Dim ctrl Dim coll Dim lIndex Dim lCellIndex Set ctrl = ScreenItems("AlarmControl") Set coll = ctrl.GetRowCollection HMIRuntime.Trace "Number of message rows:" & coll.Count & vbCrLf 'enumerate and trace out row numbers For lIndex = 1 To coll.Count HMIRuntime.Trace "Row: " & (ctrl.GetRow(lIndex).RowNumber) & " " 'enumerate and trace out column titles and cell texts For lCellIndex = 1 To ctrl.GetRow(lIndex).CellCount HMIRuntime.Trace ctrl.GetMessageColumn(lCellIndex -1).Name & " " HMIRuntime.Trace ctrl.GetRow(lIndex).CellText(lCellIndex) & " " Next HMIRuntime.Trace vbNewLine Next 扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...
那一剑的温柔侠圣经验值: 2241 发帖数: 378 精华帖: 4 回复：如何AlarmControl中的报警内容只看楼主只看精华楼主 5楼 2021-12-31 13:51:41 *以下是引用W.M.J在2021-12-23 12:43:13的发言 >4楼*：给你一段示例代码： Dim ctrl Dim coll Dim lIndex Dim lCellIndex Set ctrl = ScreenItems("AlarmControl") Set coll = ctrl.GetRowCollection HMIRuntime.Trace "Number of message rows:" & coll.Count & vbCrLf 'enumerate and trace out row numbers For lIndex = 1 To coll.Count HMIRuntime.Trace "Row: " & (ctrl.GetRow(lIndex).RowNumber) & " " 'enumerate and trace out column titles and cell texts For lCellIndex = 1 To ctrl.GetRow(lIndex).CellCount HMIRuntime.Trace ctrl.GetMessageColumn(lCellIndex -1).Name & " " HMIRuntime.Trace ctrl.GetRow(lIndex).CellText(lCellIndex) & " " Next HMIRuntime.Trace vbNewLine Next 谢谢提供解决思路扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...

作者

主题

那一剑的温柔

侠圣

经验值: 2241
发帖数: 378
精华帖: 4

主题：【求助】如何AlarmControl中的报警内容

只看楼主只看精华楼主 2021-02-17 17:56:57

标签：

请问，在wincc V7.5 SP1 如何读取AlarmControl控件中，鼠标选中的报警信息的编号和内容？谢谢

以下网友喜欢您的帖子：

重要声明：

著作权归作者所有。商业转载请联系作者获得授权，非商业转载请注明出处。

帖子链接：https://www.ad.siemens.com.cn/club/bbs/post.aspx?a_id=1680714&b_id=5&s_id=0&num=5

zhangli0

版主

经验值: 43582
发帖数: 15779
精华帖: 61

回复：如何AlarmControl中的报警内容

只看楼主只看精华 1楼 2021-03-15 10:00:53

你这样的操作只有用脚本了呀！

你读取选中的干什么呢？如果要导出等，你可以直接把所有的都导出来的。

活到老，学到老！为了生活学习吧！

以下网友喜欢您的帖子：

那一剑的温柔

侠圣

经验值: 2241
发帖数: 378
精华帖: 4

回复：如何AlarmControl中的报警内容

只看楼主只看精华楼主 2楼 2021-03-15 16:23:02

利用InsertAuditEntry函数插入一条审计追踪数据，审计追踪中需体现出操作员确认了哪一条报警，报警内容是什么。

以下网友喜欢您的帖子：

那一剑的温柔

侠圣

经验值: 2241
发帖数: 378
精华帖: 4

回复：如何AlarmControl中的报警内容

只看楼主只看精华楼主 3楼 2021-03-15 16:24:36

如果可以读取当前选中的报警的报警内容，那么就可以把这个报警内容加到InsertAuditEntry函数中，实现具体某一条报警的审计追踪。

以下网友喜欢您的帖子：

W.M.J

侠士

经验值: 1729
发帖数: 104
精华帖: 6

回复：如何AlarmControl中的报警内容

只看楼主只看精华 4楼 2021-12-23 12:43:13

给你一段示例代码：

Dim ctrl

Dim coll

Dim lIndex

Dim lCellIndex

Set ctrl = ScreenItems("AlarmControl")

Set coll = ctrl.GetRowCollection

HMIRuntime.Trace "Number of message rows:" & coll.Count & vbCrLf

'enumerate and trace out row numbers

For lIndex = 1 To coll.Count

HMIRuntime.Trace "Row: " & (ctrl.GetRow(lIndex).RowNumber) & " "

'enumerate and trace out column titles and cell texts

For lCellIndex = 1 To ctrl.GetRow(lIndex).CellCount

HMIRuntime.Trace ctrl.GetMessageColumn(lCellIndex -1).Name & " "

HMIRuntime.Trace ctrl.GetRow(lIndex).CellText(lCellIndex) & " "

HMIRuntime.Trace vbNewLine

以下网友喜欢您的帖子：

那一剑的温柔

侠圣

经验值: 2241
发帖数: 378
精华帖: 4

回复：如何AlarmControl中的报警内容

只看楼主只看精华楼主 5楼 2021-12-31 13:51:41

以下是引用W.M.J在2021-12-23 12:43:13的发言 >4楼：

给你一段示例代码：

Dim ctrl

Dim coll

Dim lIndex

Dim lCellIndex

Set ctrl = ScreenItems("AlarmControl")

Set coll = ctrl.GetRowCollection

HMIRuntime.Trace "Number of message rows:" & coll.Count & vbCrLf

'enumerate and trace out row numbers

For lIndex = 1 To coll.Count

HMIRuntime.Trace "Row: " & (ctrl.GetRow(lIndex).RowNumber) & " "

'enumerate and trace out column titles and cell texts

For lCellIndex = 1 To ctrl.GetRow(lIndex).CellCount

HMIRuntime.Trace ctrl.GetMessageColumn(lCellIndex -1).Name & " "

HMIRuntime.Trace ctrl.GetRow(lIndex).CellText(lCellIndex) & " "

HMIRuntime.Trace vbNewLine

谢谢提供解决思路

以下网友喜欢您的帖子：

作者	主题
那一剑的温柔侠圣经验值: 2241 发帖数: 378 精华帖: 4 主题：【求助】如何AlarmControl中的报警内容只看楼主只看精华楼主 2021-02-17 17:56:57 标签：使用操作 wincc v7.5 sp1 报警信息读取脚本请问，在wincc V7.5 SP1 如何读取AlarmControl控件中，鼠标选中的报警信息的编号和内容？谢谢扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论... 重要声明：著作权归作者所有。商业转载请联系作者获得授权，非商业转载请注明出处。帖子链接：https://www.ad.siemens.com.cn/club/bbs/post.aspx?a_id=1680714&b_id=5&s_id=0&num=5
zhangli0 版主经验值: 43582 发帖数: 15779 精华帖: 61 回复：如何AlarmControl中的报警内容只看楼主只看精华 1楼 2021-03-15 10:00:53 你这样的操作只有用脚本了呀！你读取选中的干什么呢？如果要导出等，你可以直接把所有的都导出来的。活到老，学到老！为了生活学习吧！扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...
那一剑的温柔侠圣经验值: 2241 发帖数: 378 精华帖: 4 回复：如何AlarmControl中的报警内容只看楼主只看精华楼主 2楼 2021-03-15 16:23:02 利用InsertAuditEntry函数插入一条审计追踪数据，审计追踪中需体现出操作员确认了哪一条报警，报警内容是什么。扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...
那一剑的温柔侠圣经验值: 2241 发帖数: 378 精华帖: 4 回复：如何AlarmControl中的报警内容只看楼主只看精华楼主 3楼 2021-03-15 16:24:36 如果可以读取当前选中的报警的报警内容，那么就可以把这个报警内容加到InsertAuditEntry函数中，实现具体某一条报警的审计追踪。扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...
W.M.J 侠士经验值: 1729 发帖数: 104 精华帖: 6 回复：如何AlarmControl中的报警内容只看楼主只看精华 4楼 2021-12-23 12:43:13 给你一段示例代码： Dim ctrl Dim coll Dim lIndex Dim lCellIndex Set ctrl = ScreenItems("AlarmControl") Set coll = ctrl.GetRowCollection HMIRuntime.Trace "Number of message rows:" & coll.Count & vbCrLf 'enumerate and trace out row numbers For lIndex = 1 To coll.Count HMIRuntime.Trace "Row: " & (ctrl.GetRow(lIndex).RowNumber) & " " 'enumerate and trace out column titles and cell texts For lCellIndex = 1 To ctrl.GetRow(lIndex).CellCount HMIRuntime.Trace ctrl.GetMessageColumn(lCellIndex -1).Name & " " HMIRuntime.Trace ctrl.GetRow(lIndex).CellText(lCellIndex) & " " Next HMIRuntime.Trace vbNewLine Next 扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...
那一剑的温柔侠圣经验值: 2241 发帖数: 378 精华帖: 4 回复：如何AlarmControl中的报警内容只看楼主只看精华楼主 5楼 2021-12-31 13:51:41 *以下是引用W.M.J在2021-12-23 12:43:13的发言 >4楼*：给你一段示例代码： Dim ctrl Dim coll Dim lIndex Dim lCellIndex Set ctrl = ScreenItems("AlarmControl") Set coll = ctrl.GetRowCollection HMIRuntime.Trace "Number of message rows:" & coll.Count & vbCrLf 'enumerate and trace out row numbers For lIndex = 1 To coll.Count HMIRuntime.Trace "Row: " & (ctrl.GetRow(lIndex).RowNumber) & " " 'enumerate and trace out column titles and cell texts For lCellIndex = 1 To ctrl.GetRow(lIndex).CellCount HMIRuntime.Trace ctrl.GetMessageColumn(lCellIndex -1).Name & " " HMIRuntime.Trace ctrl.GetRow(lIndex).CellText(lCellIndex) & " " Next HMIRuntime.Trace vbNewLine Next 谢谢提供解决思路扫码分享好友任选多种周边以下网友喜欢您的帖子：更多填写您的评论...

热门搜索

移动端入口

@CurrentUser.NickName@

技术论坛

自动化系统

驱动技术

数控系统

低压电器

传感器与通讯

谈天说地

咱工程师的故事

1847大咖专栏

特别专题

培训与认证答疑专区

服务合作伙伴专区

如何AlarmControl中的报警内容

20秒帮我们优化支持中心！

系统提示

系统提示

系统提示

微信登录扫码一键登录 验证码登录 密码登录

微信登录扫码一键登录

验证码登录

密码登录