Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- private void btnver_Click(object sender, EventArgs e)
- {
- SAPbobsCOM.Company oCompany = new SAPbobsCOM.Company();
- try
- {
- oCompany.DbServerType = SAPbobsCOM.BoDataServerTypes.dst_MSSQL2005;
- oCompany.DbUserName = "sa";
- oCompany.DbPassword = "abcd1234";
- oCompany.Server = "180.168.1.5";
- oCompany.CompanyDB = (cmbSociedad.SelectedItem as ComboboxItem).Value.ToString();
- oCompany.UserName = txtUsuario.Text;
- oCompany.Password = txtPassword.Text;
- oCompany.UseTrusted = false;
- oCompany.language = SAPbobsCOM.BoSuppLangs.ln_Spanish;
- int ret = oCompany.Connect();
- string errMsg = oCompany.GetLastErrorDescription();
- int ErrNo = oCompany.GetLastErrorCode();
- if (ErrNo != 0)
- {
- oCompany.Disconnect();
- lblResultado.Text = errMsg;
- }
- else
- {
- Payments _pay = (Payments)oCompany.GetBusinessObject(BoObjectTypes.oIncomingPayments);
- Recordset _oRecordSet = (Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
- _oRecordSet.DoQuery("select * from [PGN_PROD].[dbo].[ORCT] Where DocDate = '19/06/2018' order by DocDate desc");
- int cantidad = _oRecordSet.RecordCount;
- string docnum = _oRecordSet.Fields.Item("DocNum").Value.ToString();
- string canceled = _oRecordSet.Fields.Item("Canceled").Value.ToString();
- string docdate = _oRecordSet.Fields.Item("DocDate").Value.ToString();
- string resul = "1 - " + docnum + " - " + canceled + " - " + docdate + Environment.NewLine; ;
- for (int i = 1; i < cantidad; i++)
- {
- _oRecordSet.MoveNext();
- docnum = _oRecordSet.Fields.Item("DocNum").Value.ToString();
- canceled = _oRecordSet.Fields.Item("Canceled").Value.ToString();
- docdate = _oRecordSet.Fields.Item("DocDate").Value.ToString();
- resul += (i + 1) + " - " + docnum + " - " + canceled + " - " + docdate + Environment.NewLine;
- }
- rtdocumentos.Text = resul;
- lblResultado.Text = "Succes connected";
- oCompany.Disconnect();
- }
- }
- catch (Exception ex)
- {
- oCompany.Disconnect();
- throw ex;
- }
- }
Add Comment
Please, Sign In to add comment