C#OPC数据采集（FORM）

using System;

using System.Windows.Forms;

using Opc;

using Opc.Da;

using OpcCom;

using opc_Library;

using opcTest.model;

using System.Collections.Generic;

 

namespace opc_collection

{

    public partial class Form1 : Form

    {

        private Opc.Da.Server m_server =null;//定义数据存取服务器

             

        private Opc.Da.Subscription subscription = null;//定义组对象（订阅者）

        private Opc.Da.SubscriptionState state = null;//定义组（订阅者）状态，相当于OPC规范中组的参数

        private Opc.IDiscovery m_discovery = new ServerEnumerator();//定义枚举基于COM服务器的接口，用来搜索所有的此类服务器。

        //时钟

        private Timer _timer = new Timer();

        //写日志记录

        write_log write_log = new write_log();

        public Form1()

        {

            InitializeComponent();

            // _timer.Interval = 2000;

            _timer.Enabled = false;

            _timer.Tick  = MainProcess;

            textBox1.Text = "192.168.1.100";

            //  button2.Enabled = false;

            //  button3.Enabled = false;

        }

          

        private void button1_Click(object sender, EventArgs e)

        {

            comboBox1.Items.Clear();

            //查询服务器

            try

            {

              string str=  Specification.COM_DA_20.ToString();

                Opc.Server[] servers = m_discovery.GetAvailableServers(Specification.COM_DA_20, textBox1.Text.ToString().Trim(), null);

                if (servers != null)

                {

                    foreach (Opc.Da.Server server in servers)

                    {

                        comboBox1.Items.Add(server.Name);

                    }

                }

               // comboBox1.SelectedIndex = 0;

            ls.Items.Add("查询服务器成功.请选择OPC进行连接");

            write_log.write_log_txt("查询服务器成功.请选择OPC进行连接");

 

              //  button1.Enabled = false;

                button2.Enabled = true;

            }

            catch (Exception ex)

            {

 

               ls.Items.Add(ex.Message);

               write_log.write_log_txt(ex.ToString());

            }

        }

 

        private void button2_Click(object sender, EventArgs e)

        {

            //连接

            if (button2.Text=="释放")

            {

                //结束：释放各资源

                button2.Text = "连接";

                ls.Items.Add("释放成功.不能进行读取数据,请重新连接");

                write_log.write_log_txt("释放成功.不能进行读取数据,请重新连接");

                btn_conllection.Enabled = false;

                try

                {

                    subscription.Dispose();//强制.NET资源回收站回收该subscription的所有资源。        

                    m_server.Disconnect();//断开服务器连接

                }

                catch (Exception ex)

                {

                    ls.Items.Add(ex.Message);

                    write_log.write_log_txt(ex.ToString());

                }

            }

            else

            {

                try

                {

                    Opc.Server[] servers = m_discovery.GetAvailableServers(Specification.COM_DA_20, textBox1.Text, null);

                    if (servers != null)

                    {

                        foreach (Opc.Da.Server server in servers)

                        {

                            if (String.Compare(server.Name, comboBox1.Text, true) == 0)//为true忽略大小写

                            {

                                m_server = server;//建立连接。

                                break;

                            }

                        }

                    }

                }

                catch (Exception ex)

                { 

                    ls.Items.Add(ex.Message);

                    write_log.write_log_txt(ex.ToString());

                    return;

                }

                if (m_server != null)

                {

                    try

                    {

                        m_server.Connect();

                       ls.Items.Add("OPC服务器连接成功,请填写变量名称进行读取数据");

                       write_log.write_log_txt("OPC服务器连接成功.");

                      

                        button2.Text = "释放";

                        btn_conllection.Enabled = true;                         

                    }

                    catch (Exception ex)

                    {

                        ls.Items.Add(ex.Message); 

                    } 

                }

                else

                {

                    ls.Items.Add("连接失败,请检查IP以及服务器对象");

                    write_log.write_log_txt("连接失败,请检查IP以及服务器对象");

                }

            }

        }

 

        private void button3_Click(object sender, EventArgs e)

        {

         _timer.Interval =Int32.Parse(txt_time.Text.ToString().Trim());

         _timer.Enabled = true;

 

           // l_m.Clear();

            //   xm.xml_to_model("XML_opc.xml");

          //  l_m = xm.get_monitor_Xml_m_all();

       //     Item[] items = new Item[100];//定义数据项，即item

            int i = 0;

        /*    string daname = string.Empty;

            foreach (var e_1 in l_m)    //遍历集合

            {

             //   items[i].ClientHandle = Guid.NewGuid().ToString();//客户端给该数据项分配的句柄。

             //   items[i].ItemPath = null; //该数据项在服务器中的路径。

             //   items[i].ItemName = e_1.Opc_da;//itemName[0]; //该数据项在服务器中的名字。

             //   i  ;

                daname = e_1.Opc_da;

            }

            try

            {

                state = new Opc.Da.SubscriptionState();//组（订阅者）状态，相当于OPC规范中组的参数

                state.Name = "newGroup";//组名

                state.ServerHandle = null;//服务器给该组分配的句柄。

                state.ClientHandle = Guid.NewGuid().ToString();//客户端给该组分配的句柄。

                state.Active = true;//激活该组。

                state.UpdateRate = 100;//刷新频率为1秒。

                state.Deadband = 0;// 死区值，设为0时，服务器端该组内任何数据变化都通知组。

                state.Locale = null;//不设置地区值。

 

                subscription = (Opc.Da.Subscription)m_server.CreateSubscription(state);//创建组

                ls.Items.Add("1");

                string[] itemName = new string[] {""};

                ls.Items.Add("2");

                itemName[0] = daname;

                ls.Items.Add("2.1");

                Item[] items = new Item[1];//定义数据项，即item

                items[0] = new Item();

                items[0].ClientHandle = Guid.NewGuid().ToString();//客户端给该数据项分配的句柄。

                items[0].ItemPath = null; //该数据项在服务器中的路径。

                items[0].ItemName = itemName[0]; //该数据项在服务器中的名字。

                subscription.AddItems(items);

                ls.Items.Add("3");

                ItemValueResult[] values =  subscription.Read(subscription.Items);

                ls.Items.Add("4");

                ls.Items.Add(items[0].Key.ToString());

               // ls.Items.Add(values[0].Value.ToString() );

               // ls.Items.Add(values[1].Value.ToString());

                try

                {

                     

                    foreach (ItemValueResult value in values)

                    {

                       ls.Items.Add("5");

                       ls.Items.Add("成功读取变量为<"   daname   ">的数据.值为<"   value.Value.ToString()   ">");

                    }

            /*        if (values[0].Quality.Equals(Opc.Da.Quality.Good))

                    {                        

                        // textBox3.Text = values[0].Value.ToString();

                        ls.Items.Add("成功读取变量为<"   daname   ">的数据.值为<"   values[0].Value.ToString()   ">");

                    }

             * */

       /*         }

                catch (Exception e2)

                {

                    ls.Items.Add("e2:" e2.ToString());

                }

                subscription.RemoveItems(subscription.Items);

                m_server.CancelSubscription(subscription);//m_server前文已说明，通知服务器要求删除组。

            }

            catch (Exception ex)

            { 

                ls.Items.Add(ex.Message);

            }

*/

        }

 

     //Form界面控制部分 

     #region Form_Monitor   

 

        private void alert(string msg)

        {

            MessageBox.Show(msg, "系统提示", MessageBoxButtons.OK, MessageBoxIcon.Information);

        }

 

        private void Form1_FormClosing(object sender, FormClosingEventArgs e)

        {

            if (e.CloseReason == CloseReason.UserClosing)//当用户点击窗体右上角X按钮或(Alt   F4)时 发生           

            {

                e.Cancel = true;

                this.ShowInTaskbar = false;

                this.notifyIcon1.Icon = this.Icon;

                this.Hide();

            } 

        }

 

        private void notifyIcon1_MouseClick(object sender, MouseEventArgs e)

        {

            if (e.Button == MouseButtons.Right)

            {

                mymenu.Show(System.Windows.Forms.Cursor.Position.X, System.Windows.Forms.Cursor.Position.Y);

                mymenu.Show();

            }

 

            if (e.Button == MouseButtons.Left)

            {

                this.Visible = true;

                mymenu.Hide();

                this.Icon = Resource1._20151104082741597_easyicon_net_256;

                this.WindowState = FormWindowState.Normal;

            }        

        }

 

        private void mymenu_Click(object sender, EventArgs e)

        {

 

        }

 

        private void mymenu_Opening(object sender, System.ComponentModel.CancelEventArgs e)

        {

 

        }

 

        private void mymenu_child_Click(object sender, EventArgs e)

        {

            Application.Exit();  

        }

 

        private void Form1_MinimumSizeChanged(object sender, EventArgs e)

        {

            if (this.WindowState == FormWindowState.Normal && this.Visible == true)

            { 

                this.notifyIcon1.Visible = true;//在通知区显示Form的Icon 

                this.WindowState = FormWindowState.Minimized; 

                this.Visible = false; 

                this.ShowInTaskbar = false;//使Form不在任务栏上显示 

            } 

        }

  #endregion

        private void btn_stop_Click(object sender, EventArgs e)

        {

            _timer.Enabled = false;

            ls.Items.Clear();

        } 

        //重新加载OPC点位

        List<monitor> l_m = new List<monitor>();

        xml_to_model xm = new xml_to_model("XML_opc.xml");

        string daname = string.Empty;

        public void MainProcess(object sender, EventArgs e)

        {

            l_m.Clear();

         //   xm.xml_to_model("XML_opc.xml");

            l_m=xm.get_monitor_Xml_m_all();

       //     Item[] items = new Item[100];//定义数据项，即item

        //    int i = 0;

            

        //    foreach (var e_1 in l_m)  //遍历集合

         //   {

 

            foreach (var e_1 in l_m)    //遍历集合

            {

                daname = e_1.Opc_da; 

                try

                {

                    state = new Opc.Da.SubscriptionState();//组（订阅者）状态，相当于OPC规范中组的参数

                    state.Name = "newGroup";//组名

                    state.ServerHandle = null;//服务器给该组分配的句柄。

                    state.ClientHandle = Guid.NewGuid().ToString();//客户端给该组分配的句柄。

                    state.Active = true;//激活该组。

                    state.UpdateRate = 100;//刷新频率为1秒。

                    state.Deadband = 0;// 死区值，设为0时，服务器端该组内任何数据变化都通知组。

                    state.Locale = null;//不设置地区值。

 

                    subscription = (Opc.Da.Subscription)m_server.CreateSubscription(state);//创建组

                    ls.Items.Add("1");

                    string[] itemName = new string[] { "" };

                    ls.Items.Add("2");

                    itemName[0] = daname;

                    ls.Items.Add("2.1");

                    Item[] items = new Item[1];//定义数据项，即item

                    items[0] = new Item();

                    items[0].ClientHandle = Guid.NewGuid().ToString();//客户端给该数据项分配的句柄。

                    items[0].ItemPath = null; //该数据项在服务器中的路径。

                    items[0].ItemName = itemName[0]; //该数据项在服务器中的名字。

                    subscription.AddItems(items);

                    ls.Items.Add("3");

                    ItemValueResult[] values = subscription.Read(subscription.Items);

                    ls.Items.Add("4");

                    ls.Items.Add(items[0].Key.ToString());

                    // ls.Items.Add(values[0].Value.ToString() );

                    // ls.Items.Add(values[1].Value.ToString());

                    try

                    {

 

                       // foreach (ItemValueResult value in values)

                      //  {

                            ls.Items.Add("5");

                            #region

                            //插入DB OPCMAP

                            Db_Access dba = new Db_Access();

                            //判断MAP表里是否有该DA

                            ReadXml readxml = new ReadXml();

                            string[] db_name_insert = readxml.getXml_node("2", "db_name", "XML_db.xml");

                            string db_name = db_name_insert[0];

                            string map_isexists = @"select count(opc_id) from";

                            map_isexists = map_isexists   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc_map]";

                            write_log.write_log_txt(map_isexists);

                            if (dba.get_sql_int("2", map_isexists) == 0)

                            {

                                string map_insert = @"INSERT INTO ";

                                map_insert = map_insert   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc_map]([opc_id]" 

                                " ,[opc_da],[opc_name],[opc_type],[c_flag])"   " "   "select "   "'"   "1"   "',"   "'"   e_1.Opc_da.Trim()   "',"   "'"   e_1.Opc_name.Trim()   "'"   ","   "'"   e_1.Opc_type.Trim()   "',"   "'"   e_1.C_flag.Trim()   "'";

                                write_log.write_log_txt(map_insert);

                                if (dba.get_sql_opreate("2", map_insert) == "1")

                                {

                                    //获取插入的OPC ID

                                    string opc_id_sql = @"select top 1 opc_id from";

                                    opc_id_sql = opc_id_sql   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc_map] where opc_name='"   e_1.Opc_name.Trim()   "'";

                                    write_log.write_log_txt(opc_id_sql );

                                    string opc_id = dba.get_sql_opreate("2", opc_id_sql);

                                    string opc_insert = @"INSERT INTO ";

                                    opc_insert = opc_insert   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc]([opc_id]"

                                          ",opc_value,collection_time)"   "select "   "'"   opc_id.Trim()   "',"   "'"  "0.01"  "',"   "'"   DateTime.Now.ToString()   "'";

                                //  opc_insert = opc_insert   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc]([opc_id]"

                                //          ",opc_value,collection_time)"   "select "   "'"   opc_id.Trim()   "',"   "'"  values[0].Value.ToString().Trim()   "',"   "'"   DateTime.Now.ToString()   "'";

                                    write_log.write_log_txt(opc_insert );

                                    if (dba.get_sql_opreate("2", opc_insert) == "0")

                                    {

                                        write_log.write_log_txt("插入OPC数据表失败，请检查程序。");

                                    }

                                }

                                else

                                {

                                    write_log.write_log_txt("插入OPC配置表失败，请检查程序。");

                                }

                            }

 

                            if (dba.get_sql_int("2", map_isexists) > 0)

                            {

 

                                //获取插入的OPC ID

                                string opc_id_sql = @"select count(opc_id) from";

                                opc_id_sql = opc_id_sql   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc_map] where opc_name='"   e_1.Opc_name.Trim()   "'";

                                write_log.write_log_txt(">0:"   opc_id_sql);

                               // string opc_id = dba.get_sql_opreate("2", opc_id_sql);

                                int opc_id_flag = dba.get_sql_int("2", opc_id_sql);

                                string opc_id = string.Empty;

                                if (opc_id_flag > 0)

                                {

                                     string opc_id_sql_1 = @"select top 1 opc_id from";

                                     opc_id_sql_1 = opc_id_sql_1   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc_map] where opc_name='"   e_1.Opc_name.Trim()   "'";

 

                                    opc_id = dba.get_sql_str("2", opc_id_sql_1);

                                }

                                if (opc_id_flag == 0)

                                {

 

 

                                    string opc_id_sql_1 = @"select max(opc_id) 1 from";

                                    opc_id_sql_1 = opc_id_sql_1   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc_map]";

 

                                  string   opc_id_map= dba.get_sql_str("2", opc_id_sql_1);

 

                                    string map_insert = @"INSERT INTO ";

                                    map_insert = map_insert   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc_map]([opc_id]" 

                                    " ,[opc_da],[opc_name],[opc_type],[c_flag])"   " "   "select "   "'"   opc_id_map   "',"   "'"   e_1.Opc_da.Trim()   "',"   "'"   e_1.Opc_name.Trim()   "'"   ","   "'"   e_1.Opc_type.Trim()   "',"   "'"   e_1.C_flag.Trim()   "'";

                                    dba.get_sql_opreate("2",map_insert);

                                    string opc_id_sql_2 = @"select top 1 opc_id from";

                                    opc_id_sql_2 = opc_id_sql_2   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc_map] where opc_name='"   e_1.Opc_name.Trim()   "'";

 

                                    opc_id = dba.get_sql_str("2", opc_id_sql_2);

                                }

                                string opc_insert = @"INSERT INTO ";

                                opc_insert = opc_insert   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc]([opc_id]"

                                      ",opc_value,collection_time)"   "select "   "'"   opc_id.Trim()   "',"   "'"   "0.00"  "',"   "'"   DateTime.Now.ToString()   "'";

                            //    opc_insert = opc_insert   " "   "[".Trim()   db_name.Trim()   "]".Trim()   ".".Trim()   "[dbo]".Trim()   ".".Trim()   "[tb_opc]([opc_id]"

                             //     ",opc_value,collection_time)"   "select "   "'"   opc_id.Trim()   "',"   "'"   values[0].Value.ToString().Trim()   "',"   "'"   DateTime.Now.ToString()   "'";

                        

                                write_log.write_log_txt(">0:"   opc_insert);

                                if (dba.get_sql_opreate("2", opc_insert) == "0")

                                {

                                    write_log.write_log_txt("插入OPC数据表失败，请检查程序。");

                                }

                            }

                            #endregion

                            ls.Items.Add(new ListViewItem(new string[] { e_1.Opc_da.Trim(), e_1.Opc_name.Trim(), values[0].Value.ToString().Trim(), DateTime.Now.ToString() }));

                            write_log.write_log_txt(e_1.Opc_da   "  "   e_1.Opc_name   "  "   values[0].Value.ToString()   "  "   DateTime.Now.ToString());

                    //    }

                        /*        if (values[0].Quality.Equals(Opc.Da.Quality.Good))

                                {

                        

                                    // textBox3.Text = values[0].Value.ToString();

                                    ls.Items.Add("成功读取变量为<"   daname   ">的数据.值为<"   values[0].Value.ToString()   ">");

                                }

                         * */

                    }

                    catch (Exception e2)

                    {

                        ls.Items.Add("e2:"   e2.ToString());

                    }

                    subscription.RemoveItems(subscription.Items);

                    m_server.CancelSubscription(subscription);//m_server前文已说明，通知服务器要求删除组。

                }

                catch (Exception ex)

                { 

                    ls.Items.Add(ex.Message);

                }

            }                 

            }         

    }

}