示例#1
0
        private void toolStripBtnExcel_Click(object sender, EventArgs e)
        {
            SaveFileDialog saveDialog = new SaveFileDialog();

            saveDialog.DefaultExt       = "xls";
            saveDialog.Filter           = "Microsoft Excel (.xls)|*.xls|Todos Arquivos (*.*)|*.*";
            saveDialog.AddExtension     = true;
            saveDialog.RestoreDirectory = true;
            saveDialog.Title            = "Onde você deseja salvar o arquivos?";
            saveDialog.InitialDirectory = @"C:/";
            if (saveDialog.ShowDialog() == DialogResult.OK)
            {
                ExportaExcel.ExportaParaExcel((DataTable)dgvLista.DataSource, saveDialog.FileName, true);
            }
        }
示例#2
0
        private void button1_Click(object sender, EventArgs e)
        {
            //try
            //{

            if (ValidaGerarPlanilha())
            {
                WaitWindow.Begin("Aguarde!! Gerando pesquisa...");

                string sql = BuscaExtratorDadosComandoSQL(txtComando.Text, this.Sistema);

                List <OracleParameter> lParametros = AplicarFiltrosRetornarParametros(ref sql);

                DataTable dt = ExtratorDadosExecutarComando(sql, lParametros, this.Sistema);

                ExportaExcel.ExportaParaExcel(dt, null, true, false, txtComando.Text, txtComandoDesc.Text, null);

                WaitWindow.End();

                comandoExecutado = true;    //Variavel do FormBasic para utilizar filtros anteriores
                if (comandoExecutado && atribuirFiltros)
                {
                    ExecutarSQL("DELETE FROM HU.EXTRATOR_DADOS_USUARIO_FILTROS WHERE USUARIO = USER AND COMANDO = " + txtComando.Text);
                    string filtro = "";
                    for (int i = 0; i < dgvFiltros.Rows.Count; i++)
                    {
                        if (!filtro.Contains(dgvFiltros.Rows[i].Cells["colFiltro"].Value.ToString()))
                        {
                            filtro += dgvFiltros.Rows[i].Cells["colFiltro"].Value.ToString() + " ";
                            CriarAlterarArquivoRelatorioFiltrosAnteriores(this.Sistema, int.Parse(txtComando.Text), dgvFiltros.Rows[i].Cells["colFiltro"].Value.ToString(), 2);
                        }
                    }
                }
            }
            //}
            //catch (Exception ex)
            //{
            //    WaitWindow.End();
            //    //throw ex; comentado e substituído em 13/08/2015
            //    MessageBox.Show(this, "Falha ao realizar pesquisa.\nMotivo:" + ex.Message + (ex.InnerException != null ? "\n\nDetalhes do Erro: " + ex.InnerException.Message : ""), "Atenção", MessageBoxButtons.OK, MessageBoxIcon.Error);
            //}
        }