.net连接SAP的几种方式

gbless

　　.net连接SAP的几种方式
　　一、 SAP .net connector
　　这是SAP专为.net连接开发的一个工具，简单方便，但是只支持VS2003.当然想在VS2003以上的版本使用可以选择在VS2003上包装下再用。
　　使用方法：
　　1．首先安装SAP .net connector，一路next即可
　　2．打开VS2003，新建一个项目，打开server explorer,你会发现多了一个SAP的server图标(如果没有，点击服务器浏览器的刷新按钮即可)，添加一个服务器，设置方式选择”自定义登录方式”，然后配置用户名，密码，服务器地址，客户端等

　　3.配置完毕后会出现一个SAP服务器，展开，在选择“Functions”节点，添加一个filter，过滤下，以免该用户名下的RFC太多。添加完毕后会出现一个RFC
　　4.在项目上新建一个SAP Connectot proxy，并设置其属性如下图

　　5.将RFC拖到该proxy上
　　6.开始编码
　　C# Code
　　SAP.Connector.Destination destination = new SAP.Connector.Destination();
　　destination.Username = "PULLSYSTEM"; // SAP username
　　destination.Password = "npullpwd"; // SAP username's password
　　destination.AppServerHost = "hksapecc"; // SAP application server's ip number or id
　　estination.Client = 800; // Client number
　　destination.SystemNumber = 0; // application server system number
　　SAP.Connector.SAPConnection sapConnection = new SAP.Connector.SAPConnection(destination);
　　SAPProxy1 proxy = new SAPProxy1();
　　proxy.Connection = sapConnection;
　　proxy.Z_RFC_PO_INF(strPO,strPoItem,out strPRPO,out strI2PRPO,
　　out strPRItemPO,out strBuyerCodePO,out strBuyerNamePO,
　　out E_INSMK,out strCostCenterPO,out strSlocPO,out strVendorPO,
　　out strPartNOPO,out strUnitPO,out strQtyPO,out strPricePO,
　　out E_PSTYP,out strGLPO,out strPlantPO,out E_ZPMAT);
　　proxy.Connection.Close();
　　二、 是用SAP客户端，调用com组件连接SAP
　　使用方法：
　　1． 引用一下组件：

　　2． 开始编码
　　C# Code
　　private void trytoconnectSAP()
　　{
　　try
　　{
　　SAPLogonCtrl.SAPLogonControlClass logon = new SAPLogonCtrl.SAPLogonControlClass();
　　logon.ApplicationServer = "10.10.209.164"; //SAP system's IP
　　logon.Client = "800"; //SAP system'client
　　logon.Language = "EN";
　　logon.User = "PULLSYSTEM"; //Username
　　logon.Password = "npullpwd"; //Password
　　logon.SystemNumber = 00; //System number
　　SAPLogonCtrl.Connection conn = (SAPLogonCtrl.Connection)logon.NewConnection();
　　if (conn.Logon(0, true))
　　{
　　SAPFunctionsOCX.SAPFunctionsClass func = new SAPFunctionsOCX.SAPFunctionsClass();
　　func.Connection = conn;
　　SAPFunctionsOCX.IFunction ifunc = (SAPFunctionsOCX.IFunction)func.Add("Z_RFC_PO_INF"); //Call Function module 'ENQUEUE_READ'
　　SAPFunctionsOCX.IParameter gclient = (SAPFunctionsOCX.IParameter)ifunc.get_Exports("L_EBELN"); //Get the import paremeter
　　gclient.Value = strPONO; //"4500111574"; //Set value for import paremeter
　　SAPFunctionsOCX.IParameter GUNAME = (SAPFunctionsOCX.IParameter)ifunc.get_Exports("L_EBELP");
　　GUNAME.Value = strPOITEM; //10
　　ifunc.Call();
　　SAPFunctionsOCX.IParameter Plant = (SAPFunctionsOCX.IParameter)ifunc.get_Imports("E_WERKS");
　　string plant = Plant._Value.ToString();
　　SAPFunctionsOCX.IParameter Sloc = (SAPFunctionsOCX.IParameter)ifunc.get_Imports("E_LGORT");
　　string sloc = Sloc._Value.ToString();
　　SAPFunctionsOCX.IParameter Qty = (SAPFunctionsOCX.IParameter)ifunc.get_Imports("E_MENGE");
　　string qty = Qty._Value.ToString();
　　conn.Logoff();
　　strPO = plant + "/" + sloc + "/" + qty;
　　}
　　}
　　catch (Exception ex)
　　{
　　strPO = ex.Message;
　　}
　　}
　　注意，在asp.net下使用，必须用线程的技术进行调用，否则出错
　　C# Code
　　System.Threading.Thread s = new System.Threading.Thread(new System.Threading.ThreadStart(trytoconnectSAP)); //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();
　　三、 使用Data Provider for mySAP Business Suite进行连接
　　这个组件时在Biztalk上使用的，编码比较简单，但是需要用SAP的权限或者让人在SAP中传入两个RFC，这两个RFC的作用是收集和整理RFC，具体可以参看“自述文件”
　　以下是代码片段
　　C# Code
　　public bool TryConnectSAPByProvider()
　　{
　　try
　　{
　　string strConn = System.Configuration.ConfigurationSettings.AppSettings["SAPConnstring"].ToString();
　　SAPConnection con = new SAPConnection(strConn);//SAP服务器连接参数设置，
　　con.Open();
　　SAPCommand cmd = new SAPCommand(con);
　　cmd.CommandText = "select * from Z_RFC_PO_INF where L_EBELN='9800031143' and L_EBELP='00010'";//执行远程RFC BAPI_CUSTOMER_GETLIST，执行RFC的参数传递过程参考下边的EXEC 语句的语法
　　//以下为RFC调用参数赋值并指定Input、Output类型
　　//SAPParameter param = new SAPParameter("@param", ParameterDirection.InputOutput);
　　//DataTable dt = new DataTable();
　　//dt.Columns.Add("SIGN");
　　//dt.Columns.Add("OPTION");
　　//dt.Columns.Add("LOW");
　　//dt.Columns.Add("HIGH");
　　//DataRow row = dt.NewRow();
　　//row["LOW"] = 1;
　　//row["HIGH"] = 1000;
　　//dt.Rows.Add(row);
　　//param.Value = dt;
　　//cmd.Parameters.Add(param);//执行结果放在SAPDataReade中
　　SAPDataReader dr = cmd.ExecuteReader(); //retrieving returned datareaders
　　return true;
　　}
　　catch (Exception ex)
　　{
　　return false;
　　}
　　附件下载:SAP .net connect