关闭

在vs2005中使用Com连接SAP系统(二)

标签: sapfunctionthreadmodulewinformswinform
398人阅读 评论(0) 收藏 举报
昨天讲述了以下如何在VS2005中使用form的形式来调用SAP ECC6.0中的Function Module,今天将记录一下在VS2005中以web的形式来调用Function module.

      以web形式对function module进行调用与form形式基本一样,唯一值得注意的地方就是:"An ActiveX control must be run in an STA apartment. Because the attribute STAThread is applied to the Main method of a WinForm class by default with a WinForms Project, the main thread of your app will run in STA mode.".也就是说有些AcrtiveX控件或者Com组件必须运行在单线程单元下(STA:Single  Thread  Apartment ),否则的话会抛出“Bad variant type”异常。解决方案为:新开一个线程,并将该线程的运行模式设置为STA,然后再改线程下对Com组件或者ActiveX控件进行调用。

      对应到我们的事例中,如果不使用STA模式运行,我们可以连接到SAP系统,但调用Function Module的时候会抛出“Bad variant type”异常。所以要讲调用Function Module的代码在新开的线程中执行。具体步骤如下:

      一,添加对Interop.SAPFunctionsOCX.dll以及Interop.SAPLogonCtrl.dll和Interop.SAPTableFactoryCtrl.dllcom组件的引用。

      二,新开一个线程,并将该线程的运行模式设置为STA. 并将登录SAP系统以及调用Function module的方法运行在该线程下!代码如下:

    protected void Button1_Click(object sender, EventArgs e)
    {
        System.Threading.Thread s = new System.Threading.Thread(new System.Threading.ThreadStart(test)); //Create a new thread and set the method test() run in this thread
        s.SetApartmentState(System.Threading.ApartmentState.STA);                                        //Set the run mode 'STA'
        s.Start();                                                                                       //Start the thread
        s.Join();                                                                                        //Wait until thread run OK.
        GridView1.DataSource = dt;
        GridView1.DataBind();
        msg.Text = "Get Data from 'ENQUEUE_READ' OK!";
    }

    private void test()
    {
        SAPLogonCtrl.SAPLogonControlClass login = new SAPLogonCtrl.SAPLogonControlClass();
        login.ApplicationServer = "";
        login.Client = "";
        login.Language = "EN";
        login.User = username.Text;
        login.Password = Psw.Text;
        login.SystemNumber = 00;
        SAPLogonCtrl.Connection conn = (SAPLogonCtrl.Connection)login.NewConnection();

        if (conn.Logon(0, true))
        {
            SAPFunctionsOCX.SAPFunctionsClass func = new SAPFunctionsOCX.SAPFunctionsClass();
            func.Connection = conn;
            SAPFunctionsOCX.IFunction ifunc = (SAPFunctionsOCX.IFunction)func.Add("ENQUEUE_READ");
            SAPFunctionsOCX.IParameter gclient = (SAPFunctionsOCX.IParameter)ifunc.get_Exports("GCLIENT");
            gclient.Value = "301";
            SAPFunctionsOCX.IParameter GUNAME = (SAPFunctionsOCX.IParameter)ifunc.get_Exports("GUNAME");
            GUNAME.Value = "";
            SAPFunctionsOCX.IParameter LOCAL = (SAPFunctionsOCX.IParameter)ifunc.get_Exports("LOCAL");
            LOCAL.Value = "0";
            ifunc.Call();
            SAPTableFactoryCtrl.Tables tables = (SAPTableFactoryCtrl.Tables)ifunc.Tables;
            SAPTableFactoryCtrl.Table ENQ = (SAPTableFactoryCtrl.Table)tables.get_Item("ENQ");
            int n = ENQ.RowCount;
            dt = GetTable();
            for (int i = 1; i <= n; i++)
            {
                DataRow dr = dt.NewRow();
                dr["GNAME"] = ENQ.get_Cell(i, "GNAME").ToString();
                dr["GUNAME"] = ENQ.get_Cell(i, "GUNAME").ToString();
                dr["GARG"] = ENQ.get_Cell(i, "GARG").ToString();
                dr["GOBJ"] = ENQ.get_Cell(i, "GOBJ").ToString();
                dr["GTDATE"] = ENQ.get_Cell(i, "GTDATE").ToString();
                dt.Rows.Add(dr);
            }
        }
    }


0
0
查看评论

在vs2005中使用Com连接SAP系统(一)

开博了,总要写点什么吧!正好前两天做了一个小实验"在vs2005中使用Com连接SAP ECC 6.0",记录如下:      我分别以form和web的形式对SAP中的Function module进行了调用,在form中稍微简单一点,...
  • zhongguomao
  • zhongguomao
  • 2011-08-29 17:03
  • 557

在vs2005中使用Com连接SAP系统-Web方式

测试结果: VS2005 c# + SAP ECC6.0  未通过。VB测试通过,实际应用可以采用C#与VB相结合的方式。 原文地址:http://www.cnblogs.com/flysky927/archive/2009/01/04/1368484.html 昨天讲...
  • wren2004
  • wren2004
  • 2009-01-22 09:39
  • 1820

在vs2005中使用Com连接SAP系统-Form方式

原文地址:http://www.cnblogs.com/flysky927/archive/2009/01/03/1367684.html一,添加对Interop.SAPFunctionsOCX.dll以及Interop.SAPLogonCtrl.dll这两个com组件的引用。  ...
  • wren2004
  • wren2004
  • 2009-01-22 09:37
  • 1707

使用VS2005开发自定义控件

注:本文参考MSDN使用 .NET Framework 开发自定义 Windows 窗体控件一节,根据该文的结构对VS2005下开发自定义控件作了一个综合性的说明。本文将偏重于在开发自定义控件的过程中常见的难点的指导性介绍,而对MSDN中该节中已经说明的内容不...
  • codepython
  • codepython
  • 2014-06-19 13:36
  • 532

C# 实现调用 SAP Com组件

 ///         /// 登陆SAP系统        ///       ...
  • Peak915
  • Peak915
  • 2009-02-05 08:33
  • 1485

在vs2005中添加 组件 com组件

<br />工具————选择工具箱项 ——com组件。
  • xinke87
  • xinke87
  • 2010-11-17 10:15
  • 1935

VS2005 NET连接SAP系统专题

原文地址:http://blog.csdn.net/mengxin523/article/details/6710088  .NET调用RFC几种方式(一) 本 来今天是要写一篇关于NCO3.0的东西,就是关乎.NET调用SAP的RFC的,支持VS2010和.NET 4.0等。现在...
  • Trassion
  • Trassion
  • 2012-02-28 11:48
  • 4004

如何从SAP中连接其他数据库

 1.       工作环境需求    A. The operating system user adm must be able to log on to the secondary databas...
  • CompassButton
  • CompassButton
  • 2006-08-30 15:07
  • 6154

vba调用vs2005使用atl开发的com组件

1、新建工程 New -- Project -- ATL Project 勾选Allow merging of proxy/stub code 2、添加接口 右键工程 --  Add  --  ATL Simple Object 3、添加接口函数 类视图中,...
  • hyhnoproblem
  • hyhnoproblem
  • 2014-12-24 20:17
  • 2096

vs2005 里工具箱内控件不知道怎么没有了解决办法

vs2005 里工具箱内控件不知道怎么没有了 1、工具箱上右键——重置工具箱 2、工具——导入和导出设置——重置所有设置 以上不行就修复安装或是重新安装一下吧
  • 2004v2004
  • 2004v2004
  • 2008-08-05 09:38
  • 1721
    个人资料
    • 访问:4643712次
    • 积分:65286
    • 等级:
    • 排名:第42名
    • 原创:1753篇
    • 转载:2551篇
    • 译文:101篇
    • 评论:343条
    博客专栏
    最新评论
    微信公众号
      为你推荐最新的博文~更有惊喜等着你