{"id":966,"date":"2022-12-09T07:23:58","date_gmt":"2022-12-09T06:23:58","guid":{"rendered":"http:\/\/lesmrdtrucs.mataf35400.fr\/?page_id=966"},"modified":"2022-12-09T07:32:55","modified_gmt":"2022-12-09T06:32:55","slug":"ofs-sans-le-controle-saofs","status":"publish","type":"page","link":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/ofs-sans-le-controle-saofs\/","title":{"rendered":"OFS (sans le contr\u00f4le SaOFS)\u200b"},"content":{"rendered":"\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Ceci est un d\u00e9veloppement MRD d’apr\u00e8s ce site: http:\/\/www.developpez.net\/forums\/d958532\/systemes\/autres-systemes\/automation\/ofs-vb6\/<\/a><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t

\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Dans le gestionnaire de r\u00e9f\u00e9rences, cocher \u00ab\u00a0SA OPC Automation 2.0\u00a0\u00bb<\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t

\n\t\t\t\t
\n\t\t\t\t\t\t\t\t\t\t\t\t\t\"\"\t\t\t\t\t\t\t\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Le code \u00e0 taper:

Imports SAOPCAutomation<\/em><\/span>

Public Class FrmDepart<\/em><\/span>
\u00a0\u00a0 \u00a0Dim Ofs As New SAOPCAutomation.OPCServer<\/em><\/span>
\u00a0\u00a0 \u00a0Dim WithEvents Grp As OPCGroup<\/em><\/span>
\u00a0\u00a0 \u00a0Dim GrpItems As SAOPCAutomation.OPCItem<\/em><\/span>

\u00a0\u00a0 \u00a0Private Sub FrmDepart_Load(sender As Object, e As EventArgs) Handles MyBase.Load<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0‘——————————Cr\u00e9ation et gestion du Groupe OFS (M\u00e9thode sans le contr\u00f4le SaOfs)<\/span><\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0Ofs.Connect(\u00ab\u00a0Schneider-Aut.OFS\u00a0\u00bb)<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0If Ofs.ServerState = 1 Then<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0Grp = Ofs.OPCGroups.Add()<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0Application.DoEvents()<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0Grp.IsSubscribed = True<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0‘Deux exemples d’adressage<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0MesAdresses = \u00ab\u00a0XIP06:30.35!%MW1000:7\u00a0\u00bb<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0MesAdresses = \u00ab\u00a0MBT:139.160.96.135\/T!%MW1000:7\u00a0\u00bb<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0GrpItems = Grp.OPCItems.AddItem(MesAdresses, 1)<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0Else<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0Beep()<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0End If<\/em><\/span>
\u00a0\u00a0 \u00a0End Sub<\/em><\/span>

\u00a0\u00a0 \u00a0Private Sub BtnRead_Click(sender As Object, e As EventArgs) Handles BtnRead.Click<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0‘——————————Lecture explicite: par exemple en cliquant sur un bouton<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0GrpItems.Read(1)<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0Dim MesValeurs As Array = GrpItems.Value<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0LstGrp.Items.Clear()<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0For i = 0 To 3 : LstGrp.Items.Add(DecToHex(MesValeurs(i))) : Next<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0For i = 4 To 6 : LstGrp.Items.Add(DecToAsc(MesValeurs(i))) : Next<\/em><\/span>
\u00a0\u00a0 \u00a0End Sub<\/em><\/span>
End Class<\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t<\/div>\n\t\t","protected":false},"excerpt":{"rendered":"

Ceci est un d\u00e9veloppement MRD d’apr\u00e8s ce site: http:\/\/www.developpez.net\/forums\/d958532\/systemes\/autres-systemes\/automation\/ofs-vb6\/ Dans le gestionnaire de r\u00e9f\u00e9rences, cocher \u00ab\u00a0SA OPC Automation 2.0\u00a0\u00bb Le code \u00e0 taper: Imports SAOPCAutomation Public Class FrmDepart\u00a0\u00a0 \u00a0Dim Ofs As New SAOPCAutomation.OPCServer\u00a0\u00a0 \u00a0Dim WithEvents Grp As OPCGroup\u00a0\u00a0 \u00a0Dim GrpItems As SAOPCAutomation.OPCItem \u00a0\u00a0 \u00a0Private Sub FrmDepart_Load(sender As Object, e As EventArgs) Handles MyBase.Load\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0‘——————————Cr\u00e9ation […]<\/p>\n","protected":false},"author":1,"featured_media":0,"parent":0,"menu_order":0,"comment_status":"closed","ping_status":"closed","template":"","meta":{"ocean_post_layout":"","ocean_both_sidebars_style":"","ocean_both_sidebars_content_width":0,"ocean_both_sidebars_sidebars_width":0,"ocean_sidebar":"0","ocean_second_sidebar":"0","ocean_disable_margins":"enable","ocean_add_body_class":"","ocean_shortcode_before_top_bar":"","ocean_shortcode_after_top_bar":"","ocean_shortcode_before_header":"","ocean_shortcode_after_header":"","ocean_has_shortcode":"","ocean_shortcode_after_title":"","ocean_shortcode_before_footer_widgets":"","ocean_shortcode_after_footer_widgets":"","ocean_shortcode_before_footer_bottom":"","ocean_shortcode_after_footer_bottom":"","ocean_display_top_bar":"default","ocean_display_header":"default","ocean_header_style":"","ocean_center_header_left_menu":"0","ocean_custom_header_template":"0","ocean_custom_logo":0,"ocean_custom_retina_logo":0,"ocean_custom_logo_max_width":0,"ocean_custom_logo_tablet_max_width":0,"ocean_custom_logo_mobile_max_width":0,"ocean_custom_logo_max_height":0,"ocean_custom_logo_tablet_max_height":0,"ocean_custom_logo_mobile_max_height":0,"ocean_header_custom_menu":"0","ocean_menu_typo_font_family":"0","ocean_menu_typo_font_subset":"","ocean_menu_typo_font_size":0,"ocean_menu_typo_font_size_tablet":0,"ocean_menu_typo_font_size_mobile":0,"ocean_menu_typo_font_size_unit":"px","ocean_menu_typo_font_weight":"","ocean_menu_typo_font_weight_tablet":"","ocean_menu_typo_font_weight_mobile":"","ocean_menu_typo_transform":"","ocean_menu_typo_transform_tablet":"","ocean_menu_typo_transform_mobile":"","ocean_menu_typo_line_height":0,"ocean_menu_typo_line_height_tablet":0,"ocean_menu_typo_line_height_mobile":0,"ocean_menu_typo_line_height_unit":"","ocean_menu_typo_spacing":0,"ocean_menu_typo_spacing_tablet":0,"ocean_menu_typo_spacing_mobile":0,"ocean_menu_typo_spacing_unit":"","ocean_menu_link_color":"","ocean_menu_link_color_hover":"","ocean_menu_link_color_active":"","ocean_menu_link_background":"","ocean_menu_link_hover_background":"","ocean_menu_link_active_background":"","ocean_menu_social_links_bg":"","ocean_menu_social_hover_links_bg":"","ocean_menu_social_links_color":"","ocean_menu_social_hover_links_color":"","ocean_disable_title":"default","ocean_disable_heading":"default","ocean_post_title":"","ocean_post_subheading":"","ocean_post_title_style":"","ocean_post_title_background_color":"","ocean_post_title_background":0,"ocean_post_title_bg_image_position":"","ocean_post_title_bg_image_attachment":"","ocean_post_title_bg_image_repeat":"","ocean_post_title_bg_image_size":"","ocean_post_title_height":0,"ocean_post_title_bg_overlay":0.5,"ocean_post_title_bg_overlay_color":"","ocean_disable_breadcrumbs":"default","ocean_breadcrumbs_color":"","ocean_breadcrumbs_separator_color":"","ocean_breadcrumbs_links_color":"","ocean_breadcrumbs_links_hover_color":"","ocean_display_footer_widgets":"default","ocean_display_footer_bottom":"default","ocean_custom_footer_template":"0","footnotes":""},"class_list":["post-966","page","type-page","status-publish","hentry","entry"],"_links":{"self":[{"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/pages\/966","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/comments?post=966"}],"version-history":[{"count":7,"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/pages\/966\/revisions"}],"predecessor-version":[{"id":978,"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/pages\/966\/revisions\/978"}],"wp:attachment":[{"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/media?parent=966"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}