2011年11月9日 星期三

d2k呼叫c#並傳送參數

http://www.dotblogs.com.tw/atowngit/archive/2009/12/26/12681.aspx
C#端

Program.cs
static class Program
    {
        ///


        /// 應用程式的主要進入點。
        ///

        [STAThread]
        static void Main(string[] args)
        {
            Application.EnableVisualStyles();
            Application.SetCompatibleTextRenderingDefault(false);
            if (args.Length == 0){
                Application.Run(new Form1());
            } else {
                Application.Run(new Form1(args));
            }
        }
    }

Form1.cs
public partial class Form1 : Form
    {
        private string _args;
        public Form1()
        {
            InitializeComponent();
        }
        public Form1(string value)
        {
            //if (!string.IsNullOrEmpty(value))
            //{
            //    _args = value;
            //}


            textBox1.Text = value[0].ToString();
            textBox2.Text = value[1].ToString();
        }
    }

ORACLE FORM端
PROCEDURE host_csharp IS
  v_path    varchar2(50);
v_command varchar2(200);
BEGIN
  v_path:='D:\VS2005\WindowsApplication2.exe ';
  v_command := v_path||:BLOCK3.ITEM5||''||:BLOCK3.ITEM6;
  
  --Host(v_command, NO_SCREEN);
  Host(v_command);
  
  IF NOT Form_Success THEN
    Message('Error -- Message not sent.');
  ELSE Message('Message Sent.');
  END IF;

END;