Fernandinha

Descobri que esse código está em C++, alguém por favor poderia me ajudar a converte-lo para C#? Obrigada, Fernanda

Olá pessoal, Coloquei o código abaixo em um protótipo em C#, porém o form design desaparece assim que eu insiro esse código. Gostaria de saber se há alguma coisa de errado com o código. Segue o mesmo abaixo: double InterpolFlatFwdVol(vector<double> vol_days, vector<double> vols,double day, int Number_of_days) { //output is vol for day int BiS_low_days; double days_high; double days_low; double DF_high; double DF_low; double VAR_low; double VAR_high; double rate_low; double rate_high; double interpol_flat_fwd_vol; int cont; Number_of_days=Number_of_days-1; BiS_low_days = BiSearch(vol_days, day, Number_of_days); if (BiSearch(vol_days, day, Number_of_days) == -1) { interpol_flat_fwd_vol = vols[0]; return interpol_flat_fwd_vol; } if (BiSearch(vol_days, day, Number_of_days) != -1) { if (BiSearch(vol_days, day, Number_of_days) == -2) { VAR_low = vols[Number_of_days - 1] * vols[Number_of_days - 1]; VAR_high = vols[Number_of_days] * vols[Number_of_days]; days_low = vol_days[Number_of_days - 1]; days_high = vol_days[Number_of_days]; interpol_flat_fwd_vol = sqrt((VAR_high * days_high - VAR_low * days_low) / (days_high - days_low)); return interpol_flat_fwd_vol; } if (BiSearch(vol_days, day, Number_of_days) != -2) { days_low = vol_days[BiS_low_days]; VAR_low = vols[BiS_low_days] * vols[BiS_low_days]; days_high = vol_days[BiS_low_days + 1]; VAR_high = vols[BiS_low_days + 1] * vols[BiS_low_days + 1]; } } interpol_flat_fwd_vol = sqrt((VAR_low * days_low + (VAR_high * days_high - VAR_low * days_low) * (day - days_low) / (days_high - days_low)) / day); return interpol_flat_fwd_vol; } int BiSearch(vector <double> inArray,double inValue,int sizeArray) { int i; int low; int high; int BiSearch; if(inValue<inArray[0]){return -1;} if(inValue==inArray[0]){return -1;} if(inValue>inArray[sizeArray]){return -2;} if(inValue==inArray[sizeArray]){return sizeArray;} low=0; high=sizeArray; while((high-low)>1) { i=(int)(high+low)/2; if (inValue==inArray[i]){BiSearch=i;} if (inValue>=inArray[i]) low=i; else high=i; } BiSearch=low; return BiSearch; } No aguardo de uma ajuda. Obrigada, Fernanda Giannetti

Olá pessoal, Recebi um arquivo .xll e não consigo abri-lo, fiz a "importação" dele pelo menu Suplementos do Excel, porém gostaria de visualizar o conteúdo do arquivo .xll. Com qual programa devo abri-lo? No aguardo. Obrigada, Fernanda

Olá pessoal, Foi me passado uma apliacação em ASP e me falaram que eu tenho que fazer um arquivo de conexão de banco de dados SQL Server através de um arquivo .xml, porém eu nunca trabalhei com ASP nem com XML. Alguém poderia me dar um help de como eu estruturo esse arquivo. Segue algumas informações de exemplo: Servidor de banco de dados: SQLSQD\B Base de dados: DBJJ Usuário: TesteUser Senha: UserID Aguardo uma ajudinha. Desde já muito obrigada, Fernanda

Bom dia pessoal!!! Tenho que realizar uma migração do banco de dados SQL 2000 para o SQL 2008 com uma aplicação em ASP. Gostaria de saber se posso realizar a migração das tabelas e conteúdo através do DTS? E as procedures seria apenas copiar, colar e executar??? Lógico que se der algum erro irei verificar o porque. E na aplicação terei que ver apenas as conexões que ela faz com o banco? No aguardo. Muito obrigada. Fernanda

Primeiramente, muito obrigada pela sua atenção. Por exemplo, se eu colocar essa linha (Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;User Id=admin;Password=;) dentro do código VB, no evento de cadastro da tela, é claro que com as devidas alterações, eu já consigo salvar as informações no banco? Grata, Fernanda

Olá!!! você já tentou atualizar o Object Explorer. Dá um botão direito no Database e escolha a opção Refresh.

Olá pessoal, tudo bem? Estou montando um sistema utilizando o Visual Basic pelo Word e gostaria de realizar a conexão com um banco de dados que já tenho em Access. Mas não tenho a menor idéia de como fazer a conexão em linha de código ou por algum assistente. Alguém poderia me dar um help, por favor?!?!?!? Muito obrigada, Fernanda

Olá pessoal, tudo bem? Estou montando um sistema utilizando o Visual Basic pelo Word e gostaria de realizar a conexão com um banco de dados que já tenho em Access. Mas não tenho a menor idéia de como fazer a conexão em linha de código ou por algum assistente. Alguém poderia me dar um help, por favor?!?!?!? Muito obrigada, Fernanda

Olá, boa noite. Estou aprendendo C# e gostaria de saber o que significa e quando posso usar o símbolo += Eis abaixo um exemplo de código que tem esse símbolo. private void copyOne(char current) { switch (current) { case '<' : target.Text += "&lt;"; break; case '>' : target.Text += "&gt;"; break; case '&' : target.Text += "&amp;"; break; case '\"' : target.Text += """; break; case '\'' : target.Text += "'"; break; default: if (current < 127) target.Text += current; else { target.Text += "&#"; string code = ((int)current).ToString(); target.Text += code; target.Text += ";"; } break; } } Aguardo ajuda. Muito obrigada. Fernanda

Bom dia pessoal. Estou com um problema para converter um campo no SQL Server 2005. O campo tem o valor de 09012909012, onde o mesmo representa AAMMDDHHMM e o mesmo é do tipo char(11). Gostaria de converter esse campo para pegar os 40 últimos dias, para isso teria que convertê-lo em data. O select que eu queria fazer para isso acontecer seria mais ou menos assim, embora o mesmo não está correto porque deu erro. SELECT * FROM TabelaA WHERE DT_HH_ATUALIZACAO = (CONVERT (DATETIME, DT_HH_ATUALIZACAO,120)-40) Mas na hora da execução o seguinte erro é exibido: Msg 241, Level 16, State 1, Line 2 Conversion failed when converting datetime from character string. Alguém poderia me ajudar por favor??? Desde já muito obrigada. Fernanda

Olá pessoal, descobri uma forma mais rápida de fazer, mas pelo VB6, já que o arquivo não tem delimitação, então irei postar, porque ontem foi uma dúvida minha, amanhã poderá ser de uma outra pessoa. Segue... Do While Not EOF(1) Line Input #1, texto texto = Replace(texto, "'", " ") "Insert into TABELA (campo1, campo2) values ('" & Mid(texto, 1, 5) & "', '" & Mid(texto, 6, 8) & "')" CONT = CONT + 1 DoEvents Loop Esse só foi um exemplo para quem quiser utilizar. Valeu!!!

Olá pessoal, estou com um problema, estou montando um DTS no SQL 2005 onde terei que importar um arquivo txt para uma tabela na minha base de dados, porém esse arquivo txt não tem delimitador algum e quando eu clico em Preview aparece o arquivo inteiro em uma única coluna. Alguém poderia me ajudar, por favor??? Desde já, muito obrigada. Fernanda

Olá pessoal. Estou com um problema, ao realizar a importação de um arquivo .txt pelo Tasks > Import Data no SQL Server 2005 está ocorrendo um erro que não deixa a importação ser encerrada, eu não entendi o erro que apareceu, alguém poderia me ajudar, por favor. Segue abaixo o que apareceu escrito na tela de erro. - Copying to [sCDCF].[dbo].[ac_0902] (Error) Messages Error 0xc02020a1: Data Flow Task: Data conversion failed. The data conversion for column "NOME" returned status value 4 and status text "Text was truncated or one or more characters had no match in the target code page.". (SQL Server Import and Export Wizard) Error 0xc020902a: Data Flow Task: The "output column "NOME" (37)" failed because truncation occurred, and the truncation row disposition on "output column "NOME" (37)" specifies failure on truncation. A truncation error occurred on the specified object of the specified component. (SQL Server Import and Export Wizard) Error 0xc0202092: Data Flow Task: An error occurred while processing file "D:\ac_0902.txt" on data row 14581. (SQL Server Import and Export Wizard) Error 0xc0047038: Data Flow Task: The PrimeOutput method on component "Source - ac_0902_txt" (1) returned error code 0xC0202092. The component returned a failure code when the pipeline engine called PrimeOutput(). The meaning of the failure code is defined by the component, but the error is fatal and the pipeline stopped executing. (SQL Server Import and Export Wizard) Error 0xc0047021: Data Flow Task: Thread "SourceThread0" has exited with error code 0xC0047038. (SQL Server Import and Export Wizard) Error 0xc0047039: Data Flow Task: Thread "WorkThread0" received a shutdown signal and is terminating. The user requested a shutdown, or an error in another thread is causing the pipeline to shutdown. (SQL Server Import and Export Wizard) Error 0xc0047021: Data Flow Task: Thread "WorkThread0" has exited with error code 0xC0047039. (SQL Server Import and Export Wizard) Desde já muito obrigada, Fernanda

Bom dia pessoal, Gostaria de saber como eu faço para verificar qual usuário deu um drop table no SQL Server 2005. Muito obrigada pela ajuda. Fernanda

Oi, coloquei CR1.PrintFileType = crptExcel50Tab, mas o arquivo não abre, será que pode ser porque eu estou usando o office 2007? Desde já muito obrigada.

Bom dia pessoal!!! Feliz 2009!!! Estou com uma dúvida, dentro de um sistema desenvolvido em VB6 tem um evento de um botão que ao final gera um relatório em Crystal Reports, porém agora tenho que exportar esse relatório para Excel, consegui exportar porém o arquivo é salvo somente na coluna A do excel. Alguém poderia de ajudar, por favor. CR1.Reset CR1.Connect = cn CR1.Destination = crptToFile CR1.PrintFileType = crptText arquivo = "Desligue_" & Day(Now()) & Month(Now()) & Year(Now()) & ".xls" CR1.PrintFileName = "D:\Relatorios\" & arquivo CR1.ReportFileName = App.Path & "\relatorios\Reldesligues.rpt" CR1.SQLQuery = "SELECT * FROM scdcf.dbo.reldesligue order by FERRAMENTA, nome_cliente" CR1.WindowState = crptMaximized CR1.Action = 1 Muito obrigada, Fernanda =D

Deu certo. Muitissimo obrigada. =D

Olá pessoal, estou com um problema. Estou dando um select porém os dados continuam retornando duplicados, pois a data está diferente, estou tentando pegar a maior data para os casos repetidos, mas não está dando certo. Alguém poderia me dar uma força, por favor???? Segue o select... SELECT DISTINCT A.CPF, A.NOME_CLIENTE, A.TERMINAL, B.VALOR, A.QTD_CONTAS_ABERTO, A.ENDERECO, A.NUMERO_END, A.COMPLEMENTO, max(B.data) From LOG_REGISTROS_ACAO As B, CASOS As a where month(B.data) = '12' and year(B.data) = '2008' and month(B.data_acao) = '12' and year(B.data_acao) = '2008' and B.acao = 'CANCELAMENTO' and B.NUM_PROCESSO = A.NUM_PROCESSO ORDER BY A.CPF, A.NOME_CLIENTE

Boa tarde. Como faço para liberar espaço no arquivo de log do SQL? Existe algum comando? Grata, Fernanda

Consegui... segue o código caso seja dúvida de alguma outra pessoa... enviarSql "CREATE TABLE TSelecaoAcaoTipo (TipoConclusao VARCHAR(20), AcaoEfetuada VARCHAR (20))" enviarSql "INSERT INTO TSelecaoAcaoTipo(TipoConclusao, AcaoEfetuada) values ('" & tipo_conclusao & "', '" & Desligue & "')" Obrigada, Fernanda

Eu coloquei esse # para identificar que a tabela é temporária, igual faço no SQL, não é desta forma? O banco é SQL. Eu testei dando um select logo mais abaixo do código e dá que a tabela não existe, que a tabela é inválida. Obrigada.

Boa tarde, Estou desenvolvendo em VB6 e gostaria de saber se a linha de comando que fiz está correta. Gostaria de criar uma tabela temporária para armazenar dados em tempo de execução. Segue o comando, observando que o "enviarSql" é uma função que é chamada para insert, delete e update no sistema que estou alterando. enviarSql "CREATE TABLE #SelecaoAcaoTipo (TipoConclusao VARCHAR(20), AcaoEfetuada VARCHAR (20))" & vbCrLf & _ "INSERT INTO #SelecaoAcaoTipo(TipoConclusao, AcaoEfetuada) values ('" & tipo_conclusao & "', '" & Desligue & "')" No aguardo de um help, rs Muito obrigada, Fernanda

Só para completar, em uma outra situação eu fiz a mesma linha de raciocínio e deu certo, o formulário foi preenchido direitinho. =(

Olá!!! Agora está aparecendo um erro ao executar o código, segue o código completo abaixo e o erro também, se vocês puderem me dar um help eu agradeço. =D Private Sub cmdRodarRoboNovo_Click() On Error GoTo TRATA_ERRO Dim xl As New Excel.Application Dim xlw As Excel.Workbook Dim NumLinha As Long NumLinha = 1 'Abrir o arquivo e as telas envolvidas frmCorrecaoCasosConsulta.Show Set xlw = xl.Workbooks.Open("c:\teste.xls") xlw.Application.Visible = True xlw.Sheets("Plan1").Select Do While Range("Plan1!A" & NumLinha).value <> "" frmCorrecaoCasosConsulta!txtNumCaso = Cells(NumLinha, 1) Call frmCorrecaoCasosConsulta.buscarConsulta 'Alteração dos campos frmCorrecaoCaso.chkApagarLog.value = 1 frmCorrecaoCaso.txtSolicitante.text = re_acesso frmCorrecaoCaso.cboStatus.AddItem "CONCLUÍDO" frmCorrecaoCaso.cboStatus.text = "CONCLUÍDO" frmCorrecaoCaso.cboTipo.AddItem "PERFIL" frmCorrecaoCaso.cboTipo.text = "PERFIL" frmCorrecaoCaso.txtJustificativa.text = "Corrigido" 'Salvar correção frmCorrecaoCaso.SalvarRoboCorrecaoMassiva NumLinha = NumLinha + 1 DoEvents Loop 'Fechar aquivo MsgBox "Correção realizadas com sucesso!", vbInformation, "Atenção" xlw.Close False Exit Sub TRATA_ERRO: MsgBox Err.Description End Sub Segue erro abaixo: BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual.