̵ÎÁ¥Ö¥í¥°ºîÀ®¥µ¡¼¥Ó¥¹ JUGEM
C#¸À¸ì¡Ê6¡Ë¡ÝTCPÄÌ¿®¡Ê¥ê¥¹¥Ê¡¼ÊÔ¡Ë
0

    JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

     

    º£²ó¤Ï¡¢¥ê¥¹¥Ê¡¼Â¦¤ÎTCPÄÌ¿®¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤ÎºîÀ®¤Ç¤¹¡£

    ºîÀ®¤¹¤ë¥À¥¤¥¢¥í¥°¤Ï²¼µ­¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¤¹¡£

    ¤¢¤Þ¤ê¡¢¥¯¥é¥¤¥¢¥ó¥È¦¤ÎTCPÄÌ¿®¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤È°ã¤¤¤Ï¤¢¤ê¤Þ¤»¤ó¤Í¡¦¡¦¡¦¡£

     

    ¥½¡¼¥¹¥³¡¼¥É¤Ï°Ê²¼¤ÎÄ̤ê¤Ç¤¹¡£

    ¢¨¥¯¥é¥¤¥¢¥ó¥È¤«¤é¤ÎÀܳÂÔ¤Á¡¢Àܳ¡¢¥Ç¡¼¥¿¤ÎÁ÷¼õ¿®¤ÎÉôʬ¤òÈ´¿è¤Ç¤¹¡£

    private void Btn_Start_Click(object sender, EventArgs e)
    {
    
        if (listener == null)
        {
            bStopFlg = false;
    
            clientList = new List();
    
            //----------------------------------------------
            // ¥¹¥ì¥Ã¥É½èÍý
            //----------------------------------------------
            ListenThread = new System.Threading.Thread(new System.Threading.ThreadStart(ListenStart));
            ListenThread.IsBackground = true;
            ListenThread.Start();
        }
        else
        {
            MessageBox.Show("ÀܳÂÔ¤Á¤Ç¤¹¡£");
        }
    
    }
    
    private void ListenStart()
    {
        //IP¥¢¥É¥ì¥¹¤ÎÀßÄê¡¢¥Ý¡¼¥ÈÈÖ¹æ¤ÎÀßÄê¡¢TcpListenerºîÀ®
        System.Net.IPAddress ipAdd = System.Net.IPAddress.Parse(GettxBoxIP());
        listener = new System.Net.Sockets.TcpListener(ipAdd, int.Parse(GettxBoxPort()));
    
        //Listen¤ò³«»Ï¤¹¤ë
        listener.Start();
        SettxBoxReceive(GettxBoxReceive() + "Listen¤ò³«»Ï¤·¤Þ¤·¤¿(" + ((System.Net.IPEndPoint)listener.LocalEndpoint).Address + ":" + ((System.Net.IPEndPoint)listener.LocalEndpoint).Port + ")¡£¥r¥n");
        SettxBoxReceiveScrollEnd();
    
        //ÀܳÍ׵᤬¤¢¤Ã¤¿¤é¼õ¤±Æþ¤ì¤ë
        do
        {
            System.Net.Sockets.TcpClient client = null;
            try
            {
                client = listener.AcceptTcpClient();
            }
            catch (SocketException e)
            {
                SettxBoxReceive(GettxBoxReceive() + "Listener¤òÊĤ¸¤Þ¤·¤¿¡£¥r¥n");
                SettxBoxReceiveScrollEnd();
                return;
            }
    
            SettxBoxReceive(GettxBoxReceive() + "¥¯¥é¥¤¥¢¥ó¥È(" + ((System.Net.IPEndPoint)listener.LocalEndpoint).Address + ")" + ((System.Net.IPEndPoint)listener.LocalEndpoint).Port + "¤ÈÀܳ¤·¤Þ¤·¤¿¡£¥r¥n");
            SettxBoxReceiveScrollEnd();
    
            clientList.Add(client);
    
            //----------------------------------------------
            // ¥¹¥ì¥Ã¥É½èÍý
            //----------------------------------------------
            ReceiveThread = new System.Threading.Thread(ReceiveStart);
            ReceiveThread.IsBackground = true;
            ReceiveThread.Start(client);
        } while (bStopFlg == false);
    
        //¥ê¥¹¥Ê¤òÊĤ¸¤ë
        listener.Stop();
        listener = null;
        Console.WriteLine("Listener¤òÊĤ¸¤Þ¤·¤¿¡£");
        SettxBoxReceive(GettxBoxReceive() + "Listener¤òÊĤ¸¤Þ¤·¤¿¡£¥r¥n");
        SettxBoxReceiveScrollEnd();
    }
    
    private void ReceiveStart(object iclient)
    {
        //¥¯¥é¥¤¥¢¥ó¥È¤«¤éÁ÷¤é¤ì¤¿¥Ç¡¼¥¿¤ò¼õ¿®¤¹¤ë
        System.Text.Encoding enc = System.Text.Encoding.UTF8;
    
        NetworkStream ns = null;
    
        TcpClient client = (TcpClient)iclient;
    
        //NetworkStream¤ò¼èÆÀ
        ns = client.GetStream();
    
        //¥¿¥¤¥à¥¢¥¦¥ÈÀßÄê
        ns.ReadTimeout = 10000;
        ns.WriteTimeout = 10000;
    
        do
        {
            System.IO.MemoryStream ms = new System.IO.MemoryStream();
            byte[] resBytes = new byte[256];
            int resSize = 0;
    
            do
            {
                try
                {
                    //¥Ç¡¼¥¿¤Î°ìÉô¤ò¼õ¿®¤¹¤ë
                    resSize = ns.Read(resBytes, 0, resBytes.Length);
                }
                catch (IOException e) { }
    
                //¼õ¿®¤·¤¿¥Ç¡¼¥¿¤òÃßÀѤ¹¤ë
                ms.Write(resBytes, 0, resSize);
    
            } while (ns.DataAvailable);
    
            //¼õ¿®¤·¤¿¥Ç¡¼¥¿¤òʸ»úÎó¤ËÊÑ´¹
            string resMsg = enc.GetString(ms.GetBuffer(), 0, (int)ms.Length);
            ms.Close();
            //ËöÈø¤Î¥n¤òºï½ü
            resMsg = resMsg.TrimEnd('¥n');
            if (resMsg != "")
            {
                Console.WriteLine(resMsg);
                SettxBoxReceive(GettxBoxReceive() + resMsg + "¥r¥n");
    
                SettxBoxReceiveScrollEnd();
    
            }
        } while (bStopFlg == false);
    
        //ÊĤ¸¤ë
        ns.Close();
        client.Close();
        SettxBoxReceive(GettxBoxReceive() + "¥¯¥é¥¤¥¢¥ó¥È¤È¤ÎÀܳ¤òÊĤ¸¤Þ¤·¤¿¡£¥r¥n");
        SettxBoxReceiveScrollEnd();
    }
    
    
    private void Btn_Stop_Click(object sender, EventArgs e)
    {
        bStopFlg = true;
    }
    
    private void Btn_Send_Click(object sender, EventArgs e)
    {
    
        if (clientList.Count != 0)
        {
            //----------------------------------------------
            // ¥¹¥ì¥Ã¥É½èÍý
            //----------------------------------------------
            SendThread = new System.Threading.Thread(new System.Threading.ThreadStart(SendStart));
            SendThread.IsBackground = true;
            SendThread.Start();
        }
                
    }
    
    private void SendStart()
    {
        //¥Ç¡¼¥¿¤òÁ÷¿®¤¹¤ë
        System.Text.Encoding enc = System.Text.Encoding.UTF8;
    
        //Console.WriteLine();
        foreach (TcpClient client in clientList)
        {
            NetworkStream ns = null;
    
            //NetworkStream¤ò¼èÆÀ
            ns = client.GetStream();
    
            //¥¿¥¤¥à¥¢¥¦¥ÈÀßÄê
            ns.ReadTimeout = 10000;
            ns.WriteTimeout = 10000;
                    
            //¥¯¥é¥¤¥¢¥ó¥È¤ËÁ÷¿®¤¹¤ëʸ»úÎó¤òºîÀ®
            string sendMsg = txtBox_Send.Text;
            //ʸ»úÎó¤òByte·¿ÇÛÎó¤ËÊÑ´¹
            byte[] sendBytes = enc.GetBytes(sendMsg + '¥r');
            //¥Ç¡¼¥¿¤òÁ÷¿®¤¹¤ë
            ns.Write(sendBytes, 0, sendBytes.Length);
        }
    }
    

    ¥ê¥¹¥Ê¡¼Â¦¤Ï¡¢¥¯¥é¥¤¥¢¥ó¥È¦¤ÎÀܳ¤òÂÔ¤Á¤Þ¤¹¡£

     

    ¤Þ¤º¤Ï¡¢IP¥¢¥É¥ì¥¹¤È¥Ý¡¼¥È¤ò»ØÄꤷ¤Æ¡¢TcpListener¥¯¥é¥¹¤ò¥¤¥ó¥¹¥¿¥ó¥¹²½¤·¤Þ¤¹¡£

    listener = new System.Net.Sockets.TcpListener(ipAdd, int.Parse(GettxBoxPort()));

     

    ¼¡¤Ë¡¢TcpListener¤ÎStart¥á¥½¥Ã¥É¤ÇÀܳÂÔ¤Á¤ò³«»Ï¤·¤Þ¤¹¡£

    client = listener.AcceptTcpClient();

     

    ÀܳÂÔ¤Á¤ò¤·¤Æ¤¤¤ë´Ö¡¢Â¾¤Î½èÍý¤ò¼õ¤±ÉÕ¤±¤Ê¤¯¤Ê¤Ã¤Æ¤·¤Þ¤¦¤Î¤Ç¡¢¥¹¥ì¥Ã¥É½èÍý¤ò¤·¤Æ¤ª¤¤¤¿Êý¤¬¤è¤¤¤Ç¤¹¡£

     

    ¥¯¥é¥¤¥¢¥ó¥È¦¤«¤éÀܳ¤¬¤¢¤ë¤È¡¢¥ê¥¹¥Ê¡¼¤Ï¥¯¥é¥¤¥¢¥ó¥È¾ðÊó¤ò¼èÆÀ¤·¤Þ¤¹¡£

    client = listener.AcceptTcpClient();

     

    ¤³¤Î¥¯¥é¥¤¥¢¥ó¥È¾ðÊó¤ò»ÈÍѤ·¤Æ¡¢¥Ç¡¼¥¿¤ÎÁ÷¼õ¿®¤ò¤·¤Þ¤¹¡£

    ¥Ç¡¼¥¿¤ÎÁ÷¼õ¿®½èÍý¤Ï¡¢¥¯¥é¥¤¥¢¥ó¥È¦¤Î½èÍý¤È¤Û¤Ü¤Û¤ÜƱ¤¸¤Ç¤¹¡£

     

    ¼ÂºÝ¤Ëʸ»ú¤òÁ÷¼õ¿®¤·¤Æ¤ë²èÌ̤ϡ¢²¼µ­¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¤¹¡£

     

    ¥¯¥é¥¤¥¢¥ó¥È¦

     

    ¥µ¡¼¥Ð¡¼Â¦

    | prog | C#¸À¸ì | comments(0) | - |
    C#¸À¸ì¡Ê5¡Ë¡ÝTCPÄÌ¿®¡Ê¥¯¥é¥¤¥¢¥ó¥ÈÊÔ¡Ë
    0

      JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

       

      C#¸À¸ì¤ò»ÈÍѤ·¤Æ¡¢TCPÄÌ¿®¤Î¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤·¤Þ¤¹¡£

      º£²ó¤Ï¡¢¥¯¥é¥¤¥¢¥ó¥È¦¤Î¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤Ë¤Ê¤ê¤Þ¤¹¡£

      TCPÄÌ¿®¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤Î¥À¥¤¥¢¥í¥°¤Ï²¼µ­¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¤¹¡£

       

      IP¤Ë¤Ï¡¢ÀܳÀ襢¥É¥ì¥¹¤òÆþÎϤ·¤Æ¡¢¥Ý¡¼¥È¤Ë¤Ï¡¢»ÈÍѤ¹¤ë¥Ý¡¼¥ÈÈÖ¹æ¤òÆþÎϤ·¤Þ¤¹¡£

      IP¡¢¥Ý¡¼¥È¤Ï¼«Ê¬¤ÎPC¤Î´Ä¶­¤Ë¹ç¤ï¤»¤Æ¤¯¤À¤µ¤¤¡£

      »ä¤Î¾ì¹ç¤Ï¡¢IP¡Ö192.168.25.1¡×¡¢¥Ý¡¼¥È¡Ö8888¡×¤òÆþÎϤ·¤Þ¤·¤¿¡£

      ¤Þ¤¿¡¢¥»¥­¥å¥ê¥Æ¥£¥½¥Õ¥È¤¬¥¤¥ó¥¹¥È¡¼¥ë¤µ¤ì¤Æ¤¤¤ë¾ì¹ç¤Ï¡¢¥Í¥Ã¥È¥ï¡¼¥¯¤ËÀܳ¤Ç¤­¤ë¤è¤¦¤Ë¡¢ÀßÄê¤ò¤·¤Æ²¼¤µ¤¤¡£

      ÆþÎϤ·¤¿¤é¡¢³«»Ï¥Ü¥¿¥ó¤ò¥¯¥ê¥Ã¥¯¤¹¤ë»ö¤Ç¡¢Àܳ¤ò»î¤ß¤Þ¤¹¡£

      Àܳ¤¬´°Î»¤·¤¿¤é¡¢²¼µ­¤Î¤è¤¦¤Ê¥á¥Ã¥»¡¼¥¸¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£

       

      ¥½¡¼¥¹¥³¡¼¥É¤Ï²¼µ­¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¤¹¡£

      ¢¨¥ê¥¹¥Ê¡¼Â¦¤È¤ÎÀܳ¡¢¥Ç¡¼¥¿¤ÎÁ÷¼õ¿®Éôʬ¤òÈ´¿è

      private void Btn_Start_Click(object sender, EventArgs e)
      {
          bStopFlg = false;
                  
          //ÀܳÀèIP¥¢¥É¥ì¥¹
          string strAdd = GettxBoxIP();
      
          //ÀܳÀè¥Ý¡¼¥ÈÈÖ¹æ
          //TcpListener¥ª¥Ö¥¸¥§¥¯¥È¤òºîÀ®¤¹¤ë
          int port = int.Parse(GettxBoxPort());
      
          //TcpClient¤òºîÀ®¤·¡¢¥µ¡¼¥Ð¡¼¤ÈÀܳ¤¹¤ë
          tcp = new System.Net.Sockets.TcpClient(strAdd, port);
          SettxBoxReceive("¥µ¡¼¥Ð¡¼(" + 
              ((System.Net.IPEndPoint)tcp.Client.RemoteEndPoint).Address + 
              ":" + ((System.Net.IPEndPoint)tcp.Client.RemoteEndPoint).Port + 
              ")¤ÈÀܳ¤·¤Þ¤·¤¿¡£");
          SettxBoxReceiveScrollEnd();
      
          ReceiveThread = new System.Threading.Thread(ReceiveStart);
          ReceiveThread.IsBackground = true;
          ReceiveThread.Start();
      }
      
      private void ReceiveStart()
      {
          //¥¯¥é¥¤¥¢¥ó¥È¤«¤éÁ÷¤é¤ì¤¿¥Ç¡¼¥¿¤ò¼õ¿®¤¹¤ë
          System.Text.Encoding enc = System.Text.Encoding.UTF8;
      
          NetworkStream ns = null;
      
          //NetworkStream¤ò¼èÆÀ
          ns = tcp.GetStream();
      
          //¥¿¥¤¥à¥¢¥¦¥ÈÀßÄê
          ns.ReadTimeout = 10000;
          ns.WriteTimeout = 10000;
      
          do
          {
              System.IO.MemoryStream ms = new System.IO.MemoryStream();
              byte[] resBytes = new byte[256];
              int resSize = 0;
      
              do
              {
                  try
                  {
                      //¥Ç¡¼¥¿¤Î°ìÉô¤ò¼õ¿®¤¹¤ë
                      resSize = ns.Read(resBytes, 0, resBytes.Length);
                  }
                  catch (IOException e) { }
      
                  //¼õ¿®¤·¤¿¥Ç¡¼¥¿¤òÃßÀѤ¹¤ë
                  ms.Write(resBytes, 0, resSize);
      
              } while (ns.DataAvailable);
      
              //¼õ¿®¤·¤¿¥Ç¡¼¥¿¤òʸ»úÎó¤ËÊÑ´¹
              string resMsg = enc.GetString(ms.GetBuffer(), 0, (int)ms.Length);
              ms.Close();
              //ËöÈø¤Î¥n¤òºï½ü
              resMsg = resMsg.TrimEnd('¥n');
              if (resMsg != "")
              {
                  Console.WriteLine(resMsg);
                  SettxBoxReceive(GettxBoxReceive() + resMsg + "¥r¥n");
      
                  SettxBoxReceiveScrollEnd();
      
              }
          } while (bStopFlg == false);
      
          //ÊĤ¸¤ë
          ns.Close();
          tcp.Close();
          SettxBoxReceive(GettxBoxReceive() + "¥¯¥é¥¤¥¢¥ó¥È¤È¤ÎÀܳ¤òÊĤ¸¤Þ¤·¤¿¡£¥r¥n");
          SettxBoxReceiveScrollEnd();
      }
      
      private void Btn_Send_Click(object sender, EventArgs e)
      {
          if (tcp != null)
          {
              SendThread = new System.Threading.Thread(SendStart);
              SendThread.IsBackground = true;
              SendThread.Start();
          }
      
      }
      
      private void SendStart()
      {
          //¥Ç¡¼¥¿¤òÁ÷¿®¤¹¤ë
          System.Text.Encoding enc = System.Text.Encoding.UTF8;
      
          NetworkStream ns = null;
      
          //NetworkStream¤ò¼èÆÀ
          ns = tcp.GetStream();
      
          //¥¿¥¤¥à¥¢¥¦¥ÈÀßÄê
          ns.ReadTimeout = 10000;
          ns.WriteTimeout = 10000;
                  
          //¥¯¥é¥¤¥¢¥ó¥È¤ËÁ÷¿®¤¹¤ëʸ»úÎó¤òºîÀ®
          string sendMsg = txtBox_Send.Text;
          //ʸ»úÎó¤òByte·¿ÇÛÎó¤ËÊÑ´¹
          byte[] sendBytes = enc.GetBytes(sendMsg + '¥r');
          //¥Ç¡¼¥¿¤òÁ÷¿®¤¹¤ë
          ns.Write(sendBytes, 0, sendBytes.Length);
      
      }
      

      ¥¯¥é¥¤¥¢¥ó¥È¦¤ÎÀܳ¤Ï¥·¥ó¥×¥ë¤Ç¤¹¡£

      tcp = new System.Net.Sockets.TcpClient(strAdd, port);

      System.Net.Sockets.TcpClient¥¯¥é¥¹¤ËIP¥¢¥É¥ì¥¹¤È¥Ý¡¼¥ÈÈÖ¹æ¤òÅϤ·¤Æ¡¢¥¯¥é¥¹¤ò¥¤¥ó¥¹¥¿¥ó¥¹²½¤¹¤ì¤ÐÎɤ¤¤Ç¤¹¡£

      Áê¼ê¦¤ËÀܳ¤Ç¤­¤ì¤Ð¡¢¼õ¿®¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤ËÀܳ¤Ç¤­¤¿¤³¤È¤òɽ¼¨¤·¤Þ¤¹¡£

      ¤½¤Î¸å¡¢¥¹¥ì¥Ã¥É½èÍý¤ò¤·¤Þ¤¹¡£

      ¥¹¥ì¥Ã¥É½èÍý¤ÎÃæ¤Ç¤Ï¡¢¥ê¥¹¥Ê¡¼Â¦¤«¤éÁ÷¤é¤ì¤Æ¤¯¤ëʸ»úÎó¤Î½èÍý¤ò¤·¤Þ¤¹¡£

      ¤³¤³¤Ç¡¢¥¹¥ì¥Ã¥É½èÍý¤ò¤·¤Æ¤ª¤«¤Ê¤¤¤È¡¢Â¾¤Îưºî¤¬¤Ç¤­¤Ê¤¤¤Î¤Ç¡¢¥¹¥ì¥Ã¥É½èÍý¤¬É¬ÍפǤ¹¡£

      ¥¹¥ì¥Ã¥É½èÍý¤Ë¤Ä¤¤¤Æ¤Ï¡¢¤Þ¤¿¸åÄø¡¢µ­»ö¤òºîÀ®¤·¤è¤¦¤È»×¤¤¤Þ¤¹¡£

      bStopFlg¤¬false¤Î´Ö¤Ï¡¢¼õ¿®¤ò³¤±¤Þ¤¹¡£

      Àܳ¤ò½ªÎ»¤·¤¿¤¤¾ì¹ç¤Ï¡¢bStopFlg¤òfalse¤Ë¤¹¤ëɬÍפ¬¤¢¤ë¤ï¤±¤Ç¤¹¡£

      Ää»ß¥Ü¥¿¥ó¤Îưºî¤Ë¡¢bStopFlg=true;¤òÄɲ乤ì¤Ð¤è¤¤¤Ç¤¹¤Í¡£

       

      ¤Þ¤¿¡¢¥¹¥ì¥Ã¥É½èÍý¤ò¤¹¤ëºÝ¤ËÃí°Õ¤¹¤ëɬÍפ¬¤¢¤ë¤³¤È¤Ï¡¢¥À¥¤¥¢¥í¥°¤ÎÃæ¤Î¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤Ëʸ»ú¤òɽ¼¨¤µ¤»¤Æ¤¤»þ¤Î½èÍý¤Ç¤¹¡£

      ¥À¥¤¥¢¥í¥°¤Î²èÌ̤ϡ¢¼õ¿®¥¹¥ì¥Ã¥É¤È¤Ï¡¢Ê̤Υ¹¥ì¥Ã¥É¤Çưºî¤·¤Æ¤¤¤ë¤Î¤Ç¡¢¤½¤Î¤Þ¤Þ¡¢¼õ¿®¥¹¥ì¥Ã¥É¤ÎÃæ¤Ç¡¢¥À¥¤¥¢¥í¥°¤Î¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤Ë¤Ï¥¢¥¯¥»¥¹¤Ç¤­¤Þ¤»¤ó¡£

      ¤½¤³¤Ç¡¢SettxBoxReceive´Ø¿ô¤òºîÀ®¤·¤Æ¤¤¤Þ¤¹¡£

      SettxBoxReceive´Ø¿ô¤Ç¤Ï¡¢¥³¡¼¥ë¥Ð¥Ã¥¯´Ø¿ô¤ò»ÈÍѤ·¤Æ¡¢¥À¥¤¥¢¥í¥°¤Ë¥¢¥¯¥»¥¹¤Ç¤­¤ë¤è¤¦¤Ë´Ø¿ô¤òºîÀ®¤·¤Æ¤ª¤ê¤Þ¤¹¡£

      ¤³¤Á¤é¤â¸åÄø¡¢µ­»ö¤òºîÀ®¤·¤è¤¦¤È»×¤¤¤Þ¤¹¡£

       

      ʸ»úÎó¤ÎÁ÷¿®¤Ï¡¢Á÷¿®¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤Ëʸ»ú¤òÆþÎϤ·¤Æ¡¢Á÷¿®¤ò²¡¤¹¤È¡¢¥ê¥¹¥Ê¡¼Â¦¤Ëʸ»úÎó¤¬Á÷¿®¤µ¤ì¤Þ¤¹¡£

      ¤³¤Á¤é¤â¡¢¥¹¥ì¥Ã¥É½èÍý¤ÇÁ÷¿®¤Ï¹Ô¤Ã¤Æ¤¤¤Þ¤¹¡£

      ¥¿¥¤¥à¥¢¥¦¥ÈÀßÄê¤ò¤·¤Æ¤¤¤ë¤Î¤Ç¡¢Á÷¿®¤Î¾ì¹ç¤Ï¡¢¥¹¥ì¥Ã¥É½èÍý¤ò¤·¤Ê¤¯¤Æ¤â¤è¤¤¤Ç¤¹¡£

       

      ¼ÂºÝ¤Ëʸ»ú¤òÁ÷¼õ¿®¤·¤Æ¤ë²èÌ̤ϡ¢¥ê¥¹¥Ê¡¼Â¦¤ÎTCPÄÌ¿®¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤·¤¿»þ¤Ë¡¢²èÁü¤òޤêÉÕ¤±¤¿¤¤¤È»×¤¤¤Þ¤¹¡£

       

      ¼¡²ó¤Ï¡¢¥ê¥¹¥Ê¡¼Â¦¤ÎTCPÄÌ¿®¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤·¤Þ¤¹¡£

      | prog | C#¸À¸ì | comments(0) | - |
      C#¸À¸ì¡Ê4¡Ë¡ÝRS232CÄÌ¿®¡Ê¥·¥ê¥¢¥ëÄÌ¿®¡Ë¡Ê2¡Ë
      0

        JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

         

        Á°²ó¡¢RS232ÄÌ¿®¤Î¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤Î¥À¥¤¥¢¥í¥°¤òºîÀ®¤·¤Þ¤·¤¿¡£

         

         

        ËÜÆü¤Ï¡¢³Æ¼ï¥Ü¥¿¥ó¤ä¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤Îưºî¤òÄêµÁ¤·¤Æ¤¤¤­¤Þ¤¹¡£

         

        ¤Þ¤º¤Ï¡¢¥À¥¤¥¢¥í¥°¤ò¥í¡¼¥É¤·¤¿¤È¤­¤Îưºî¤Ç¤¹¡£

        private void SerialForm_Load(object sender, EventArgs e)
        {
            string[] PortList = SerialPort.GetPortNames();
        
            cmbBox_Port.Items.Clear();
        
            foreach (string PortName in PortList)
            {
                cmbBox_Port.Items.Add(PortName);
            }
        }
        

        SerialPort¥¯¥é¥¹¤Î¥á¥½¥Ã¥É¡¢GetPortNames¤ÇÍøÍѲÄǽ¤Ê¥·¥ê¥¢¥ë¥Ý¡¼¥È̾¤ò¼èÆÀ¤·¤Þ¤¹¡£

        ¼èÆÀ¤·¤¿¥·¥ê¥¢¥ë¥Ý¡¼¥È̾¤òcmbBox_Port¥³¥ó¥Ü¥Ü¥Ã¥¯¥¹¤ÎÃͤËÄɲä·¤Þ¤¹¡£

        ¤³¤ì¤Ç¡¢¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¼Â¹Ô»þ¤Ë¥·¥ê¥¢¥ë¥Ý¡¼¥È¤òÁªÂò¤Ç¤­¤Þ¤¹¡£

         

        ¼¡¤ÏÀܳ¥Ü¥¿¥ó¤Îưºî¤Ç¤¹¡£

        private void Btn_Connect_Click(object sender, EventArgs e)
        {
            if (serialPort1.IsOpen == false)
            {
                if (cmbBox_Port.Items.Count <= 0)
                {
                    return;
                }
        
                serialPort1.PortName = cmbBox_Port.SelectedItem.ToString();
                serialPort1.BaudRate = 9600;
                serialPort1.DataBits = 8;
                serialPort1.Parity = Parity.None;
                serialPort1.StopBits = StopBits.One;
                serialPort1.Handshake = Handshake.None;
                serialPort1.Encoding = Encoding.GetEncoding(932);
                serialPort1.ReadTimeout = 3000;
        
                try
                {
                    serialPort1.Open();
                    MessageBox.Show("Àܳ¤·¤Þ¤·¤¿¡£");
                }
                catch (Exception ex)
                {
                    MessageBox.Show(ex.Message);
                    return;
                }
            }
        
            return;
        
        }
        

        ¥À¥¤¥¢¥í¥°ºîÀ®»þ¤ËÄɲä·¤Þ¤·¤¿serialPort1¤Î¥×¥í¥Ñ¥Æ¥£¤Ë³Æ¼ï¥Ñ¥é¥á¡¼¥¿¤òÀßÄꤷ¤Æ¤¤¤Þ¤¹¡£

        Open¥á¥½¥Ã¥É¤ÇRS232ÄÌ¿®¡Ê¥·¥ê¥¢¥ëÄÌ¿®¡Ë¤ò³«»Ï¤·¤Þ¤¹¡£

         

        ²ò½ü¥Ü¥¿¥ó¤Îưºî¤Ç¤¹¡£

        private void Btn_Disconnect_Click(object sender, EventArgs e)
        {
            if (serialPort1.IsOpen == true)
            {
                serialPort1.Close();
                MessageBox.Show("ÀÚÃǤ·¤Þ¤·¤¿¡£");
            }
        
            return;
        }
        

        Close¥á¥½¥Ã¥É¤ÇRS232ÄÌ¿®¡Ê¥·¥ê¥¢¥ëÄÌ¿®¡Ë¤ò½ªÎ»¤·¤Þ¤¹¡£

         

        ¼¡¤Ï¡¢Á÷¿®¥Ü¥¿¥ó¤Îưºî¤ÎÄêµÁ¤Ç¤¹¡£

        private void Btn_Send_Click(object sender, EventArgs e)
        {
            if (serialPort1.IsOpen == false)
            {
                MessageBox.Show("¥Ý¡¼¥È¤¬³«¤«¤ì¤Æ¤¤¤Þ¤»¤ó¡£");
                return;
            }
        
            if (string.IsNullOrEmpty(txtBox_Send.Text) == true)
            {
                MessageBox.Show("¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤¬¶õÍó¤Ç¤¹");
                return;
            }
        
            try
            {
                serialPort1.Write(txtBox_Send.Text + "¥r");
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
                return;
            }
        
            return;
        }
        

        Write¥á¥½¥Ã¥É¤ÇPC¦¤«¤éÁê¼ê¦¤Ëʸ»úÎó¤ò1ʸ»ú¤º¤ÄÁ÷¿®¤·¤Þ¤¹¡£

        »ä¤ÎºîÀ®¤¹¤ëÁȤ߹þ¤ß¥½¥Õ¥È¥¦¥§¥¢¤Ï¶èÀÚ¤êʸ»ú¤Ë"¥r"¤ò»ÈÍѤ¹¤ë»ÈÍѤǤ¢¤ë¤Î¤Ç¡¢Write¥á¥½¥Ã¥É¤Î°ú¿ôʸ»úÎó¤ÎºÇ¸å¤Î"¥r"¤òÄɲ䷤Ƥ¤¤Þ¤¹¡£

         

        ¼õ¿®¥Ü¥¿¥ó¤Îưºî¤ÎÄêµÁ¤Ç¤¹¡£

        private void Btn_Receive_Click(object sender, EventArgs e)
        {
            string sReceive = "";
        
            if (serialPort1.IsOpen == false)
            {
                MessageBox.Show("¥Ý¡¼¥È¤¬³«¤«¤ì¤Æ¤¤¤Þ¤»¤ó¡£");
                return;
            }
        
            try
            {
                sReceive = serialPort1.ReadTo("¥r");
                sReceive = sReceive + "¥r¥n";
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
                return;
            }
        
            txtBox_Receive.Text = txtBox_Receive.Text + sReceive;
        }
        

        ReadTo¥á¥½¥Ã¥É¤Ç»ØÄꤷ¤¿Ê¸»ú¤Þ¤Ç¤Îʸ»úÎó¤ò¼õ¿®¤·¤Þ¤¹¡£

        ¥¿¥¤¥à¥¢¥¦¥È»þ´Ö¤Ï¡¢Àܳ¥Ü¥¿¥ó¤ò²¡¤·¤¿ºÝ¤Ë¡¢3000msec¤È»ØÄꤷ¤Æ¤¢¤ë¤Î¤Ç¡¢3Éðʾ夿¤Ã¤Æ¤â»ØÄꤷ¤¿Ê¸»ú¤ò¼õ¿®¤·¤Ê¤¤¾ì¹ç¤Ï¡¢¥¿¥¤¥à¥¢¥¦¥È¤·¤Þ¤¹¡£

         

        ¤³¤ì¤Ë¤ÆC#¸À¸ì¤Ë¤è¤ëRS232ÄÌ¿®¤Î´°À®¤Ç¤¹¡£

         

        Áê¼ê¦¤ÏArduino¤ÇºîÀ®¤·¤è¤¦¤È»×¤¤¤Þ¤¹¡£

        Áê¼ê¦¤Ë¤Ä¤¤¤Æ¤Ï²¼µ­¤Î¥µ¥¤¥È¤Ëµ­ºÜ¤·¤Æ¤¢¤ê¤Þ¤¹¡£

        Arduino¡Ê1¡Ë¡Ý¥·¥ê¥¢¥ëÄÌ¿®

         

        PC¦¤«¤éSend¤òÁ÷¿®¤¹¤ë¤È¡¢Arduino¤ÎLED(L)¤¬ÅÀÅô¤·¤Þ¤¹¡£

        PC¦¤Î¼õ¿®¥Ü¥¿¥ó¤ò²¡¤¹¤ÈOK¤ò¼õ¿®¤·¤Þ¤¹¡£

         

        | prog | C#¸À¸ì | comments(0) | - |
        C#¸À¸ì¡Ê3¡Ë¡ÝRS232CÄÌ¿®¡Ê¥·¥ê¥¢¥ëÄÌ¿®¡Ë¡Ê1¡Ë
        0

          JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

           

          ÁȤ߹þ¤ß¥½¥Õ¥È¥¦¥§¥¢¤Î³«È¯¤ÎºÝ¤Ë¤Ï¡¢Âç³µ¡¢¥·¥ê¥¢¥ëÄÌ¿®µ¡Ç½¤òÅëºÜ¤·¤Þ¤¹¡£

          ¥·¥ê¥¢¥ëÄÌ¿®¤ò³°Éôµ¡´ï¤È¤Î¤ä¤ê¼è¤ë¤ò¤¹¤ë¾å¤ÇÂçÀڤʵ¡Ç½¤Ç¤¹¡£

          ¥Ç¥Ð¥Ã¥¯ºî¶È¤ò¤¹¤ëºÝ¤Ë¤â¤È¤Æ¤âÌòΩ¤Á¤Þ¤¹¡£

           

          PC¦¤ÏOSI»²¾È¥â¥Ç¥ë¤ÎʪÍýÁؤ˰ÌÃ֤Ť±¤é¤ì¤ëRS232CÄÌ¿®¤ò»ÈÍѤ·¤Þ¤¹¡£

          ¤½¤ì¤Ç¤Ï¡¢Áᮡ¢¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤·¤Þ¤·¤ç¤¦¡£

          ¥Ü¥¿¥ó¤ä¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤ÎºîÀ®ÊýË¡¤Ï¡¢C#¸À¸ì¡Ê2¡Ë¡Ý¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤·¤Æ¤ß¤ë¤ò»²¹Í¤Ë¤·¤Æ²¼¤µ¤¤¡£

          ²¼µ­¤Î¤è¤¦¤Ê¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤·¤Þ¤¹¡£

           

           

          ¥×¥í¥Ñ¥Æ¥£¤Î¥Æ¥­¥¹¥ÈÍó¤òÊÔ½¸¤·¤Æ¡¢¥Ü¥¿¥ó¤ä¥°¥ë¡¼¥×¥Ü¥Ã¥¯¥¹¤Îɽ¼¨¤òÊÔ½¸¤Ç¤­¤Þ¤¹¡£

           

           

          ¥×¥í¥Ñ¥Æ¥£¤ÎName¤òÊÔ½¸¤·¤Æ¡¢¥Ü¥¿¥ó¤ä¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤Ë¼±Ê̻ҤòÄêµÁ¤·¤Þ¤¹¡£

           

           

          ²¼µ­¤Ë¥Ü¥¿¥ó¤ä¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤Î¼±Ê̻Ҥòµ­ºÜ¤·¤Æ¤ª¤­¤Þ¤¹¤Î¤Ç¡¢»²¹Í¤Ë¤·¤Æ²¼¤µ¤¤¡£

          Name Text
          groupBox1 ¥Ý¡¼¥È
          cmbBox_Port ¶õÍó
          Btn_Connect Àܳ
          Btn_Disconnect ²ò½ü
             
          groupBox2 Á÷¿®
          txtBox_Send ¶õÍó
          Btn_Send Á÷¿®
             
          groupBox3 ¼õ¿®
          Btn_Receive ¼õ¿®
          txtBox_Receive ¶õÍó

           

          º£²ó¡¢¥Ý¥¤¥ó¥È¤È¤Ê¤Ã¤Æ¤¯¤ë¤Î¤¬²¼µ­¤Îºî¶È¤Ë¤Ê¤ê¤Þ¤¹¡£
          ¥Ä¡¼¥ë¥Ü¥Ã¥¯¥¹¤è¤êSerialPort¤ò¥À¥Ö¥ë¥¯¥ê¥Ã¥¯¤·¤ÆÄɲä·¤Þ¤¹¡£

          ¥À¥¤¥¢¥í¥°¤Î²¼¤ÎÊý¤ËserialPort1¤¬Äɲäµ¤ì¤Æ¤¤¤Þ¤¹¡£

          ¤³¤ÎserialPort1¤ò»ÈÍѤ·¤Æ¡¢RS232ÄÌ¿®¤ò¹Ô¤¤¤Þ¤¹¡£

           

           

          ¤Þ¤º¤Ï¡¢¥À¥¤¥¢¥í¥°¤ÎºîÀ®¤Þ¤Ç¤Ç¤­¤Þ¤·¤¿¡£

          ¼¡²ó¤«¤é³Æ¼ï¥Ü¥¿¥ó¤ä¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤Î¤Ê¤É¤Îưºî¤òÄêµÁ¤·¤Æ¤¤¤³¤¦¤È»×¤¤¤Þ¤¹¡£

          | prog | C#¸À¸ì | comments(0) | - |
          C#¸À¸ì¡Ê2¡Ë¡Ý¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤·¤Æ¤ß¤ë
          0

            JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

             

            Á°²ó¡¢C#¸À¸ì¤ò»ÈÍѤ¹¤ë°Ù¤Î³«È¯´Ä¶­(Visual Studio)¤Î½àÈ÷¤ò¤·¤Þ¤·¤¿¡£

            º£²ó¤Ï¡¢Áᮡ¢¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤·¤Æ¤ß¤Þ¤·¤ç¤¦¡£

             

            ºîÀ®¤¹¤ë¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤Ï²¼µ­¤Î¤è¤¦¤Ê¥À¥¤¥¢¥í¥°¤Ë¤Ê¤ê¤Þ¤¹¡£

             

            ɽ¼¨¥Ü¥¿¥ó¤ò²¡¤¹¤È¡¢¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤ËHello¤Èɽ¼¨¤·¤Æ¡¢¥¯¥ê¥¢¥Ü¥¿¥ó¤ò²¡¤¹¤È¡¢¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤ò¶õÍó¤Ë¤¹¤ë¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤Ç¤¹¡£

             

            ¤Þ¤º¤Ï¡¢¿·µ¬¥×¥í¥¸¥§¥¯¥È¤ÎºîÀ®¤ò¹Ô¤¤¤Þ¤¹¡£

            ¥á¥Ë¥å¡¼¤è¤ê¡¢¥Õ¥¡¥¤¥ë¡¢¿·µ¬¥×¥í¥¸¥§¥¯¥ÈºîÀ®¤òÁªÂò¤·¤Þ¤¹¡£

             

            ¤¹¤ë¤È¡¢²¼µ­¤Î¤è¤¦¤Ê²èÌ̤¬É½¼¨¤µ¤ì¤ë¤Î¤Ç¡¢windows¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òÁªÂò¡¢¥×¥í¥¸¥§¥¯¥È̾¡ÊǤ°Õ̾¡Ë¤òÆþÎϤ·¤Æ¡¢´°Î»¤òÁªÂò¤·¤Þ¤¹¡£

            »ä¤Ï¡¢£Ápplication_001¤È¤¤¤¦¥×¥í¥¸¥§¥¯¥È̾¤Ë¤·¤Þ¤·¤¿¡£

             

            ¤¹¤ë¤È¡¢C#¸À¸ì¤Çwindows¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤òºîÀ®¤¹¤ë¤¿¤á¤Î¥Ù¡¼¥¹¤¬ÍѰդµ¤ì¤Þ¤¹¡£

             

            ¤³¤Î¾õÂ֤ǡ¢¥Ó¥ë¥É¤·¤Æ¤ß¤Þ¤·¤ç¤¦¡£

             

            ¥Ó¥ë¥É¤¬À®¸ù¤·¤¿¤é¡¢¥Ç¥Ð¥Ã¥¯¤ò¼Â¹Ô¤·¤Þ¤¹¡£

             

            ¤¹¤ë¤È¡¢²¼µ­¤Î¤è¤¦¤Ê²¿¤âÀßÃÖ¤·¤Æ¤¤¤Ê¤¤¥À¥¤¥¢¥í¥°¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£

             

            Íפ¹¤ë¤Ë¡¢¿·µ¬¤Ë¥×¥í¥¸¥§¥¯¥È¤òºîÀ®¤¹¤ë¤À¤±¤Ç¡¢¤³¤³¤Þ¤ÇºîÀ®¤·¤Æ¤¯¤ì¤ë¤Î¤Ç¤¹¡£

            ¤¹¤Ð¤é¤·¡¼¤¤¡ª¡ª

             

            ¤½¤ì¤Ç¤Ï¡¢¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤òÇÛÃÖ¤·¤Þ¤¹¡£

            ¥Ä¡¼¥ë¥Ü¥Ã¥¯¥¹¤«¤éTextBox¤òÁªÂò¤·¡¢¥É¥é¥Ã¥¯¡õ¥É¥í¥Ã¥×¤ÇÇÛÃ֤Ǥ­¤Þ¤¹¡£

            ¥×¥í¥Ñ¥Æ¥£¤Î¥Ç¥¶¥¤¥ó¤ÎName¤ËtextBox1¤Èµ­ºÜ¤µ¤ì¤Æ¤Þ¤¹¤¬¡¢¤³¤ì¤¬¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤Î¼±Ê̻ҤȤʤê¤Þ¤¹¡£

             

            Ʊ¤¸¤è¤¦¤Ë¡¢¥Ü¥¿¥ó¤âÇÛÃÖ¤·¤Þ¤¹¡£

            ¥Ä¡¼¥ë¥Ü¥Ã¥¯¥¹¤«¤éButton¤òÁªÂò¤·¡¢¥É¥é¥Ã¥¯¡õ¥É¥í¥Ã¥×¤ÇÇÛÃÖ¤·¤Þ¤¹¡£

            ¥Ü¥¿¥ó¤Î¼±Ê̻ҤϤ½¤ì¤¾¤ìbutton1¤Èbutton2¤Ë¤Ê¤Ã¤Æ¤¤¤Þ¤¹¡£

             

            ¼¡¤Ë¡¢¥Ü¥¿¥ó¤Î̾¾Î¤òÊѹ¹¤·¤Æ¤ß¤Þ¤·¤ç¤¦¡£

            ¥×¥í¥Ñ¥Æ¥£¤Îɽ¼¨¤ËText¤È¤¤¤¦Í󤬤¢¤ë¤Î¤Ç¡¢button1¤Ë¤Ïɽ¼¨¡¢button2¤Ë¤Ï¥¯¥ê¥¢¤òÆþÎϤ·¤Þ¤¹¡£

            ¤¹¤ë¤È¥À¥¤¥¢¥í¥°¾å¤Î¥Ü¥¿¥ó¤Îɽµ­¤¬ÊѤï¤ê¤Þ¤¹¡£

             

            ¤½¤ì¤Ç¤Ï¡¢¥Ü¥¿¥ó¤Îưºî¤òÄêµÁ¤·¤Þ¤¹¡£

            button1¡Êɽ¼¨¡Ë¤ò¥À¥Ö¥ë¥¯¥ê¥Ã¥¯¤·¤Þ¤¹¡£

            ¤¹¤ë¤È¡¢button1_Click¤È¤¤¤¦´Ø¿ô¤¬ºîÀ®¤µ¤ì¤Þ¤¹¡£

            ¤³¤ÎÃæ¤Ëbutton1¤ò¥¯¥ê¥Ã¥¯¤·¤¿ºÝ¤Îưºî¤òµ­½Ò¤·¤Þ¤¹¡£

             

            butto1_Click´Ø¿ô¤Ë²¼µ­¤Î¥³¡¼¥É¤òµ­½Ò¤·¤Þ¤¹¡£

            textBox1.Text = "Hello";

             

            button2¡Ê¥¯¥ê¥¢¡Ë¤âƱ¤¸¤è¤¦¤Ëbutto2_Click´Ø¿ô¤òºîÀ®¤·¡¢¤Ë²¼µ­¤Î¥³¡¼¥É¤òµ­½Ò¤·¤Þ¤¹¡£

            textBox2.Text = "";

             

            ¤³¤ì¤Ç´°À®¤Ç¤¹¡£

             

            ¤½¤ì¤Ç¤ÏÀèÄø¤ÈƱ¤¸¤è¤¦¤Ë¥Ó¥ë¥É¤·¤Æ¡¢¥Ç¥Ð¥Ã¥¯¤ò¼Â¹Ô¤·¤Æ¤ß¤Þ¤·¤ç¤¦¡£

            ²¼µ­¤Î¤è¤¦¤Ê¥À¥¤¥¢¥í¥°¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£

             

            ¥À¥¤¥¢¥í¥°¾å¤Îɽ¼¨¤ò¥¯¥ê¥Ã¥¯¤¹¤ë¤È¡¢¥Æ¥­¥¹¥È¥Ü¥Ã¥¯¥¹¤ËHello¤È¤¤¤¦Ê¸»ú¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£

             

            ¥¯¥ê¥¢¤ò¥¯¥ê¥Ã¥¯¤¹¤ë¤È¡¢¶õÍó¤Ë¤Ê¤ê¤Þ¤¹¡£

             

            ¤³¤Î¤è¤¦¤Ë¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤¬ºîÀ®¤Ç¤­¤Þ¤¹¡ª

             

            | prog | C#¸À¸ì | comments(0) | - |
            C#¸À¸ì¡Ê1¡Ë¡Ý³«È¯¸À¸ì¡ÊVisualStudio¡Ë¤Î½àÈ÷
            0

              JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

               

              º£²ó¤Ï¡¢C#¸À¸ì¤Ë¤Ä¤¤¤Æ¤Î¤ªÏäǤ¹¡£

               

              C#¸À¸ì¤Ï¡¢¼«Ê¬¤Î¥¤¥á¡¼¥¸¤Ç¤Ï¡¢Visual Basic¤È C++¤ÎÎɤ¤¤È¤³¤í¤É¤ê¤È¤¤¤¦¥¤¥á¡¼¥¸¤Ç¤¹¡£

              ¤È¤Æ¤â»È¤¤¤ä¤¹¤¤¸À¸ì¤Ç¤¢¤ë¤È»×¤¤¤Þ¤¹¡£

              ¤â¤È¤â¤È¤Ï¡¢C++¸À¸ì¤ò»È¤¦¤³¤È¤¬Â¿¤«¤Ã¤¿¤Î¤Ç¤¹¤¬¡¢ºÇ¶á¤Ï¤Û¤È¤ó¤É¡¢C#¸À¸ì¤Ç¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤ÎºîÀ®¤ò¹Ô¤Ã¤Æ¤¤¤Þ¤¹¡£

               

              ¤½¤ì¤Ç¤Ï¡¢¤Þ¤º¤Ï¡¢³«È¯´Ä¶­¤ÎVisual Studio¤ò¥¤¥ó¥¹¥È¡¼¥ë¤·¤Þ¤¹¡£

              ²¼µ­¤Î¥µ¥¤¥È¤Ë¥¢¥¯¥»¥¹¤·¤Æ¡¢Ìµ½þÈǤǤ¢¤ëVisual Studio Community¤ò¥¯¥ê¥Ã¥¯¤¹¤ë¤È¡¢¥¤¥ó¥¹¥È¡¼¥é¤Î¥À¥ó¥í¡¼¥É¤¬³«»Ï¤µ¤ì¤Þ¤¹¡£

              https://www.visualstudio.com/ja/downloads/?rr=http%3A%2F%2Fwww.microsoft.com%2Fja-jp%2Fdev%2Fdefault.aspx

               

              vs_community__¡û¡û¡û.¡û¡û¡û.exe¤È¤¤¤¦¥Õ¥¡¥¤¥ë¤¬¥À¥¦¥ó¥í¡¼¥É¤µ¤ì¤ë¤È»×¤¤¤Þ¤¹¡£

              ¤³¤ì¤ò¥À¥Ö¥ë¥¯¥ê¥Ã¥¯¤Ç¼Â¹Ô¤¹¤ë¤È¡¢¥¤¥ó¥¹¥È¡¼¥ë¤¬³«»Ï¤µ¤ì¤Þ¤¹¡£

              ¥¤¥ó¥¹¥È¡¼¥ë¤ò³«»Ï¤¹¤ë¤È²¼µ­¤Î¤è¤¦¤Ê²èÌ̤¬É½¼¨¤µ¤ì¤Þ¤¹¡£

              º£²ó¡¢C#¸À¸ì¤Ç¤Î³«È¯¤ò¹Ô¤ª¤¦¤È¹Í¤¨¤Æ¤¤¤ë¤Î¤Ç¡¢¤È¤ê¤¢¤¨¤º²¼µ­¤Î3ÅÀ¤Ë¥Á¥§¥Ã¥¯¤òÆþ¤ì¤Æ¡¢¥¤¥ó¥¹¥È¡¼¥ë¥Ü¥¿¥ó¤ò¥¯¥ê¥Ã¥¯¤¹¤ì¤Ð¤¤¤¤¤«¤Ê¤È»×¤¤¤Þ¤¹¡£

              ¸å¤Ï¡¢¼«Æ°¤Ç¥¤¥ó¥¹¥È¡¼¥ë¤·¤Æ¤¯¤ì¤Þ¤¹¤¬¡¢¥¤¥ó¥¿¡¼¥Í¥Ã¥È¤ò»ÈÍѤ·¤Æ¡¢¥Õ¥¡¥¤¥ë¤ò¥À¥¦¥ó¥í¡¼¥É¤ò¤·¤Ê¤¬¤é¥¤¥ó¥¹¥È¡¼¥ë¤ò¤·¤Þ¤¹¤Î¤Ç¡¢¥¤¥ó¥¿¡¼¥Í¥Ã¥È¤Ë¤ÏÀܳ¤·¤¿¾õÂ֤ǹԤäƤ¯¤À¤µ¤¤¡£

               

              ¥¤¥ó¥¹¥È¡¼¥ë¤¬´°Î»¤¹¤ë¤È¡¢Visual Studio 2017¤È¤¤¤¦¥¢¥¤¥³¥ó¤¬¤¢¤ë¤È»×¤¤¤Þ¤¹¤Î¤Ç¡¢¥À¥Ö¥ë¥¯¥ê¥Ã¥¯¤Ç¼Â¹Ô¤·¤Æ²¼¤µ¤¤¡£

              ̵¤¤¾ì¹ç¤Ï¡¢¥¹¥¿¡¼¥È¥á¥Ë¥å¡¼¤è¤êVisual Studio 2017¤òÁªÂò¤·¤Æ²¼¤µ¤¤¡£

              ÁªÂò¤¹¤ë¤ÈVisual Studio 2017¤¬¼Â¹Ô¤µ¤ì¤ë¤Î¤Ç¡¢²èÌ̤λٻý¤Ë½¾¤Ã¤Æ¡¢¿Ê¤á¤Æ²¼¤µ¤¤¡£

              ³Î¤«Microsoft¤Î¥¢¥«¥¦¥ó¥È¤òÅÐÏ¿¤¹¤ë¤è¤¦¤Ëµá¤á¤é¤ì¤ë¤Î¤Ç¡¢ÅÐÏ¿¤·¤Æ²¼¤µ¤¤¡£

              ÅÐÏ¿¤·¤Ê¤¤¤È¡¢ºÇ½é¤Î¤³¤í¤Ï¤è¤¤¤Î¤Ç¤¹¤¬¡¢¸å¡¹Visual Studio¤¬»ÈÍѤǤ­¤Ê¤«¤Ã¤¿¤è¤¦¤Êµ¤¤¬¤·¤Þ¤¹¡£

               

              ºÇ½ªÅª¤Ë¤Ï¡¢²¼µ­¤Î¤è¤¦¤Ê²èÌ̤¬É½¼¨¤µ¤ì¤ì¤Ð½àÈ÷OK¤Ç¤¹¡£

               

               

               

               

              | prog | C#¸À¸ì | comments(0) | - |
              VBA¡Ê4¡Ë¡Ý¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤Î¼Â¹Ô
              0

                JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

                 

                º£²ó¤Ï¡¢vba¤«¤é¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤Î¼Â¹Ô¤ò¤·¤Þ¤¹¡£

                 

                ¥¢¥×¥ê¥±¡¼¥·¥ç¥óÆâ¤Ç½èÍý¤ò´°·ë¤·¤¿¤«¤Ã¤¿¤Î¤Ç¤¹¤¬¡¢¤Ê¤«¤Ê¤«Í»Ä̤¬¤­¤«¤Ê¤«¤Ã¤¿¤Î¤Ç¡¢vba¤ÈÁȤ߹ç¤ï¤»¤ë¤³¤È¤Ë¤·¤Þ¤·¤¿¡£

                ¤½¤Î°Ù¡¢vba¤«¤é¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤ò¼Â¹Ô¤¹¤ëÊýË¡¤òÌϺ÷¤·¤¿¤È¤³¤í¡¢²¼µ­¤Î2¤Ä¤ÎÊýË¡¤¬¤¢¤ê¤Þ¤·¤¿¡£

                 

                ­¡Shell¤ò»ÈÍѤ·¤Æ¼Â¹Ô¤¹¤ë

                Sub Sample()
                    Shell "C:¥Windows¥Notepad.exe", 1
                    SendKeys "1"
                End Sub
                
                

                Shell¤ò»ÈÍѤ·¤Æ¡¢¥Î¡¼¥È¥Ñ¥Ã¥É¤ò³«¤¤¤Æ¡¢1¤òµ­Æþ¤·¤Æ¤ß¤Þ¤·¤¿¡£

                ¢¨PC¤Ë¤è¤Ã¤Æ¤Ï¡¢½èÍý®ÅÙ¤ÎÌäÂê¤Ç1¤¬ÆþÎϤµ¤ì¤Æ¤¤¤Ê¤¤¾ì¹ç¤â¤¢¤ê¤Þ¤¹¡£

                ¡¡¤½¤Î¾ì¹ç¤Ï¡¢Sendkeys¤ÎÁ°¤ËSleep½èÍý¤òÆþ¤ì¤ë¤Ê¤É¤·¤Æ½èÍý¤òÃ٤餻¤Æ¤¯¤À¤µ¤¤¡£

                Shell¤ò»ÈÍѤ·¤¿¾ì¹ç¤Ç¤¹¤¬¡¢¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤ò³«¤¤¤¿¸å¡¢vba¤Ø½èÍý¤¬¤â¤É¤Ã¤Æ¤·¤Þ¤¤¤Þ¤¹¡£

                ¤Þ¤¿¡¢¥Õ¥¡¥¤¥ë¤«¤é¤Î¼Â¹Ô¤¬¤Ç¤­¤Ê¤¤¤Î¤Ç¾¯¡¹º£²ó¤ÎÌÜŪ¤òãÀ®¤¹¤ë¤Ë¤Ïµ¡Ç½¤¬ÉÔ½½Ê¬¤Ç¤¹¡£

                 

                ­¢CreateObject("Wscript.Shell").Run¤ò»ÈÍѤ·¤Æ¼Â¹Ô¤·¤Þ¤¹¡£

                Sub Sample()
                    With CreateObject("Wscript.Shell")
                        .Run "C:¥sample.xlsx", , True
                    End With
                End Sub
                
                

                CreateObject("Wscript.Shell").Run¤ò»ÈÍѤ·¤¿¾ì¹ç¡¢¥Õ¥¡¥¤¥ë¤«¤é¤Î¼Â¹Ô¤â¤Ç¤­¤ë¤Î¤Ç¡¢ÊØÍø¤Ç¤¹¡£

                ¤Þ¤¿¡¢°ú¿ô¤òTrue¤Ë¤¹¤ë»ö¤Ç¡¢¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤ò¼Â¹Ô¤·¤Æ¡¢½ªÎ»¤¹¤ë¤Þ¤Ç¡¢vba¤Ø½èÍý¤¬Ìá¤é¤Ê¤¤¤Î¤Ç¡¢º£²ó¤ÎÌÜŪ¤Ë¹çÃפ·¤Æ¤¤¤Þ¤¹¡£

                ¢¨°ú¿ô¤ËFalse¤ËÀßÄꤹ¤ë¤È¡¢¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤ò¼Â¹Ô¤·¤¿¸å¤Ë¡¢vba¤Ø¥³¥ó¥È¥í¡¼¥ëÌ᤹¤è¤¦¤Ê½èÍý¤Ë¤â¤Ç¤­¤Þ¤¹¡£

                 

                º£²ó¤Ï¡¢­¢¤Î½èÍý¤ò»ÈÍѤ¹¤ë»ö¤Ç¡¢vba¤Î¥×¥í¥°¥é¥ß¥ó¥°¤ò¹Ô¤¤¤Þ¤·¤¿¡£

                 

                | prog | VBA | comments(0) | - |
                VBA¡Ê3¡Ë¡ÝVBA¤Î»È¤¤Êý¡¡¥³¡¼¥É¤ò½ñ¤¤¤Æ¤ß¤ë
                0

                  JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

                   

                  Á°²ó¡¢VBA¤Î³«È¯´Ä¶­¤Î½àÈ÷¤ò¹Ô¤¤¤Þ¤·¤¿¡£

                   

                  º£²ó¤Ï¡¢¤³¤Î³«È¯´Ä¶­¤ò»ÈÍѤ·¤Æ¡¢VBA¤Î¥×¥í¥°¥é¥ß¥ó¥°¤ò¼Â»Ü¤·¤Æ¤ß¤Þ¤¹¡£

                   

                  VBA¤Ç¹Ô¤Ã¤Æ¤ß¤ë¤³¤È¤Ï¡¢²¼µ­¤ÎÄ̤ê¤Ë¤Ê¤ê¤Þ¤¹¡£

                  ­¡Excel¤Î¥»¥ë¤ÎÃͤòÆÉ¤ß¼è¤ë¡£

                  ­¢¥»¥ë¤ÎÃͤË+1¤¹¤ë¡£

                  ­£+1¤·¤¿Ãͤò¥á¥Ã¥»¡¼¥¸¥Ü¥Ã¥¯¥¹¤Ëɽ¼¨¤¹¤ë¡£

                  ­¤+1¤·¤¿ÃͤòÊ̤Υ»¥ë¤Ë½ñ¤­¹þ¤à¡£

                   

                  ¤Þ¤º¤Ï¡¢¥â¥¸¥å¡¼¥ë¤òºîÀ®¤·¤Þ¤¹¡£

                  VBAProject¡ÊBook1¡Ë¤ò±¦¥¯¥ê¥Ã¥¯¤·¤Æ¡¢¥á¥Ë¥å¡¼¤òɽ¼¨¤·¤Þ¤¹¡£

                  ¥á¥Ë¥å¡¼¤«¤é¡¢[ÁÞÆþ]→[ɸ½à¥â¥¸¥å¡¼¥ë]¤òÁªÂò¤·¤Þ¤¹¡£

                   

                  ɸ½à¥â¥¸¥å¡¼¥ë¤¬ºîÀ®¤µ¤ì¤Þ¤·¤¿¡£

                   

                  ¤³¤Îɸ½à¥â¥¸¥å¡¼¥ë¤ÎÃæ¤Ë¡¢VBA¤Ç¥×¥í¥°¥é¥ß¥ó¥°¤·¤Æ¤¤¤­¤Þ¤¹¡£

                  ¼ÂºÝ¤Ë¥×¥í¥°¥é¥ß¥ó¥°¤·¤¿·ë²Ì¤Ï°Ê²¼¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¡£

                  Sub Main()
                      
                      Dim iInput As Integer
                      Dim iOutPut As Integer
                      
                      iInput = ActiveSheet.Range("A1")
                      iOutPut = iInput + 1
                      MsgBox iOutPut
                      ActiveSheet.Range("B1") = iOutPut
                      
                  End Sub
                  
                  

                  Excel¤Ï²¼µ­¤Î¾õÂ֤ˤ·¤Æ¤ª¤­¤Þ¤¹¡£

                   

                  ¤½¤ì¤Ç¤Ï¡¢¼Â¹Ô¤·¤Æ¤ß¤Þ¤·¤ç¤¦¡£

                  ¥á¥Ë¥å¥Ð¡¼¤Î[¼Â¹Ô]→[Sub¡¿¥æ¡¼¥¶¡¼¥Õ¥©¡¼¥à]¤Î¼Â¹Ô¤òÁªÂò¤·¤Þ¤¹¡£

                  ¡Ê¾åµ­ÁªÂò¤Î¾¤Ë¤â¥½¡¼¥¹¥³¡¼¥É¾å¤Ç¡ÖF5¥­¡¼¡×¤ò²¡¤·¤Æ¤â¼Â¹Ô¤Ç¤­¤Þ¤¹¡£¡Ë

                   

                  ¼Â¹Ô·ë²Ì¤Ï²¼µ­¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¤¹¡£

                   

                  ¼ÂºÝ¤Ëư¤¯¤È¤ä¤Ã¤Ñ¤ê¤ª¤â¤·¤í¤¤¤Ç¤¹¤Í¡ª

                  | prog | VBA | comments(0) | - |
                  VBA¡Ê2¡Ë¡ÝVBA¤Î»È¤¤Êý¡¡³«È¯´Ä¶­¤Î½àÈ÷
                  0

                    JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

                     

                    Á°²ó¡¢VBA¤Ë¤è¤ëExcel¤ÎPDF²½¤Î¤ªÏäò¤·¤Þ¤·¤¿¡£

                    ¤Þ¤ÀVBA¤Î»È¤¤Êý¤Î¤ªÏäò¤·¤Æ¤¤¤Ê¤«¤Ã¤¿¤Î¤Ç¡¢¤Þ¤È¤á¤Æ¤¤¤³¤¦¤È»×¤¤¤Þ¤¹¡£

                     

                    ºÇ¶á¤Î¥Ð¡¼¥¸¥ç¥ó¤ÎExcel¤Ï¡¢³«È¯µ¡Ç½¤¬¥Ç¥Õ¥©¥ë¥È¤Ç¤Ïɽ¼¨¤µ¤ì¤Æ¤¤¤Þ¤»¤ó¡£

                     

                     

                    ¤Þ¤º¤Ï¡¢³«È¯µ¡Ç½¤òɽ¼¨¤·¤Þ¤·¤ç¤¦¡£

                    [¥Õ¥¡¥¤¥ë]→[¥ª¥×¥·¥ç¥ó]→[¥ê¥Ü¥ó¤Î¥æ¡¼¥¶ÀßÄê]¤òÁªÂò¤·¤Þ¤¹¡£

                    ¡Ö³«È¯¡×¤Ë¥Á¥§¥Ã¥¯¤·¤Þ¤¹¡£

                     

                    ¤¹¤ë¤È¡¢³«È¯µ¡Ç½¤¬É½¼¨¤µ¤ì¤Þ¤·¤¿¡£

                     

                    ¡ÖVisual Basic¡×¤òÁªÂò¤·¤Þ¤¹¡£

                     

                    ¤³¤Î²èÌ̤ò»È¤Ã¤Æ¡¢VBA¤Î¥×¥í¥°¥é¥ß¥ó¥°¤ò¹Ô¤¤¤Þ¤¹¡£

                    | prog | VBA | comments(0) | - |
                    VBA¡Ê1¡Ë¡ÝExcel¥·¡¼¥È¤ÎPDF²½
                    0

                      JUGEM¥Æ¡¼¥Þ¡§¥×¥í¥°¥é¥ß¥ó¥°

                       

                      ¤³¤ó¤Ë¤Á¤Ï¡£prog¤Ç¤¹¡£

                      ¤³¤ì¤«¤éµ¹¤·¤¯¤ª´ê¤¤¤·¤Þ¤¹¡£

                       

                      º£²ó¤Ï¡¢VBA¤ò»ÈÍѤ·¤¿Excel¥·¡¼¥È¤ÎPDF²½¤Ë¤Ä¤¤¤Æ¤Î¤ªÏäǤ¹¡£

                      VBA¤Ï¡¢Visual Basic for Applications¤Îά¤Ç¡¢¼ç¤ËMicrosoft¤ÎOfficeµ¡Ç½¤Ë¤Æ»ÈÍѤ·¤Þ¤¹¡£

                      Office¤ò»ÈÍѤ·¤¿ºî¶È¤Î¸úΨ²½¤Î°Ù¡¢VBA¤Ë¤Æ¥×¥í¥°¥é¥ß¥ó¥°¤ò¼Â»Ü¤·¤Æµ¡Ç½¤òºîÀ®¤·¤¿¤ê¤·¤Þ¤¹¡£

                      ¤Þ¤¿¡¢VBA¤Î»È¤¤Êý¤Ê¤É¤â¤´¾Ò²ð¤·¤Æ¤¤¤³¤¦¤È»×¤¤¤Þ¤¹¤¬¡¢º£²ó¤ÏExcel¥·¡¼¥È¤ÎPDF²½¤ËŪ¤ò¹Ê¤Ã¤Æ¡¢¹Í¤¨¤Æ¤¤¤³¤¦¤È»×¤¤¤Þ¤¹¡£

                       

                      ¥µ¥ó¥×¥ë¥³¡¼¥É¤Ï°Ê²¼¤ÎÄ̤ê¤Ç¤¹¡£

                      
                      '------------------------------------------------------------
                      '°õºþ¡ÊPDFºîÀ®¡Ë¤Î°Ù¤ÎÀßÄê
                      '------------------------------------------------------------
                      ActiveSheet.PageSetup.Orientation = xlPortrait ' ½Ä¸þ¤­°õºþÀßÄê
                      ActiveSheet.PageSetup.FitToPagesWide = 1 'Á´¤Æ¤ÎÎó¤ò1¥Ú¡¼¥¸¤Ë°õºþ
                      ActiveSheet.PageSetup.FitToPagesTall = 1 'Á´¤Æ¤Î¹Ô¤ò1¥Ú¡¼¥¸¤Ë°õºþ
                      ActiveSheet.PageSetup.Zoom = False ' ³ÈÂ礷¤Ê¤¤
                      End With
                      '------------------------------------------------------------
                      'PDFºîÀ®
                      'ExportAsFixedFormat¤Î°ú¿ô
                      'Type:=Type:=xlTypePDF→¥Õ¥©¡¼¥Þ¥Ã¥È¤Î»ØÄê
                      'Filename:=Filename→Êݸ̾
                      'Quality:=xlQualityStandard→PDF¤ÎÉʼÁ
                      'IncludeDocProperties:=True→¥Õ¥¡¥¤¥ë¤Îʸ½ñ¥×¥í¥Ñ¥Æ¥£¤Î̵ͭ
                      'IgnorePrintAreas:=False→°õºþÈϰϤÎ̵ͭ
                      'OpenAfterPublish:=True→PDFºîÀ®¸å¤Ë¡¢¥Ç¡¼¥¿¤ò³«¤¯¤«¤É¤¦¤«
                      '------------------------------------------------------------
                      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Filename, _
                      Quality:=xlQualityStandard, _
                      IncludeDocProperties:=True, _
                      IgnorePrintAreas:=False, _
                      OpenAfterPublish:=True
                      
                      

                      ²£¸þ¤­°õºþ¤·¤¿¤¤¾ì¹ç¤Ï¡¢

                      ActiveSheet.PageSetup.Orientation = xlPortrait

                      ¤ò

                      ActiveSheet.PageSetup.Orientation = xlLandscape

                      ¤È¤¤¤¦¤è¤¦¤Ë¤·¤Þ¤¹¡£
                       

                      °õºþÈϰϤλØÄê¤ò¤·¤¿¤¤¾ì¹ç¤Ï¡¢

                      'ActiveSheet.PageSetup.PrintArea = "A$1:$D$69"

                      ¤òÄɲä·¤Þ¤¹¡£

                       

                      °õºþÍѻ極¥¤¥º¤Î»ØÄê¤ò¤·¤¿¤¤¾ì¹ç¤Ï¡¢

                      'ActiveSheet.PageSetup.PageSize = xlPaperA4

                      ¤òÄɲä·¤Þ¤¹¡£

                       

                      ¤³¤Î¤è¤¦¤ËVBA¤Çµ­½Ò¤¹¤ë¤ÈExcel¥·¡¼¥È¤ÎPDF²½¤¬¤Ç¤­¤Þ¤¹¡£
                       

                      | prog | VBA | comments(0) | - |