
kuroi
Membros-
Total de itens
7.184 -
Registro em
-
Última visita
Tudo que kuroi postou
-
se você usar o CRControl, então deve ser assim: cr1.ParameterFields(0) = "nome;valor;True" onde nome é o nome do seu parameters field, e valor é o valor.
-
o running total fields não vai enxergar mesmo. você não vai conseguir somar um campo q já faz soma. mas se eu entendi o q você quer, acho q você não precisa usar o running total fields. é so por o campo formula com o codigo q já esta ai no group footer q deve resolver. com a unica diferenca q se você quer fazer a soma pra cada grupo seria assim: Sum ({Lancamentos.VALOR}, {Lancamentos.NOME_DO_CAMPO_PELO_QUAL_VC_AGRUPOU})
-
mtas?? mas você so postou duas. é sim, se eu entendi, o melhor a fazer é usar um campo parametro, como explicado aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=137895
-
qual o codigo q esta dentro da formula??
-
frias, não sei se você já resolveu... mas como você ta apontando as tabelas?? você aponta direto pra elas e faz o link direto no crystal?? ou é alguma consulta ou procedure?? o q exatamente fazia essa procedure q você comentou e qual o probelma q ocorre quando você tenta utiliza-la?? de qualquer modo, o erro é q ele começa a gerar uma linha pra cada pagamento do vale, seria isso?? então acho q você teria q fazer um grupo e somar dentro dele, não é isso??
-
você diz q quer alterar o filtro?? no selecion formula, seria isso?? ai depende do componente q você usa. se for o CRControl, faca: CrystalReport1.ReplaceSelectionFormula " - ponha aqui a formula - " se for o CRAXDRT, faca: crRep.RecordSelectionFormula = " - ponha aqui a formula - "
-
geovane, você vai usar o visual basic?? se for, você pode seguir as instrucoes desse tópico aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=122749 ai la tem um exemplo pra exportar pra word. ai acho q você trocaria crEFTWordForWindows por crEFTPortableDocFormat para exporat pra pdf.
-
ue, sempre q eu instalo ele pede. mas é so digitar la o numero ue.
-
acho q você teria q somar os dois campos dentro de um campo formula e somar esse campo formula no running total field, não seria isso??
-
cara, isso ai acho q significa q você ta pondo um valor invalido em algum campo. por exemplo, você ta pondo texto em campo numerico. ou tentando por valor em campo auto-numeracao. ou ta tentando dexar em branco campo de preenchimento obrigatorio. ou esta passando um valor maior do q o aceito. ai você vai ter q identificar qual o campo e qual o problema.
-
Fazer uma ComboBox ter arquivos de um diretório
pergunta respondeu ao Boasfesta de kuroi em Visual Basic
o q acontece de errado?? não é pra escrever caminho, é pra por, entre aspa, o caminho do diretorio onde estao os arquivos q você quer listar. acho q é pra ser App.path & "\Contas" -
Fazer uma ComboBox ter arquivos de um diretório
pergunta respondeu ao Boasfesta de kuroi em Visual Basic
use a funcao dir: a = Dir(caminho) Do While a <> "" Combo1.AddItem a a = Dir Loop[/code] -
cara o numero do erro não diz nd, se você não falar qual a descricao fica dificil. mas olhando o seu codigo, acho q pode ser porque você não passa uma conexao ativa pro recordset. alias, você abre a conexao, mas em vez de associa-la ao recordset, você ta passando a connection string de novo. tenta abrir o rs assim: rs.Open "select * from clientes", Conex, adOpenDynamic, adLockOptimistic agora, como o fabin disse, acho melhor você fazer o insert por query do q por addnew.
-
isso, se você declarar a varaiavel ou objeto como public no module ele vale pra todos os formularios. agora se você so vai usar o recordset em um form, o melhor é declarar so no generals. hum o q é fieldsets?? então, esse codigo aqui q eu passei devia funcionar certinho, qual o problema q ta ocorrendo?? adicione a linha conexao.CursorLocation = adUseClient e troque a linha: rsSeleçao.Open "SELECT * FROM Cadastro ORDER bY CodCliente", conexao, adOpenForwardOnly, adLockReadOnly por: Set rsSeleçao = conexao.Open("SELECT * FROM Cadastro ORDER bY CodCliente") e veja se não resolve.
-
tenta instalar como esta e veja se não da problema nenhum. o melhor seria compilar no vista.
-
nanda, ta estranho, pelo q to vendo não teria porque ele excluir quando você clicar em não. sera q a exclusao não acontece em alguma parte do codigo depois disso??
-
nanda, seria so isso q você quer saber?? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click txtCredito.Text = txtCredito.Text + valor End Sub[/code]
-
porque você não quer usar Mid()??
-
então compara o valor do campo pelo qual esta agrupado pelo previous() desse mesmo campo. se for diferente, significa q mudou, ai você zera.
-
acho q no Running Total Fields tem uma opcao Reset After ou qualquer coisa assim. ai você poe pra resetar a cada mudancao nesse grupo.
-
Inserir checkbon na sessão detail no crystal
pergunta respondeu ao Tiago_BB de kuroi em Crystal Reports
não, ponha as imagens no details e faca como eu expliquei e veja se não da certo. -
tenta isso. cria um campo formula chamado por exemplo, soma. dentro da formula dele ponha debito - credito. crie um campo running total fields, chamado por exemplo, total, e mande fazer um sum() da formula soma criada anteriormente. cria um segundo campo formula q seja a soma do campo total criado acima com o saldo q esta no header. e ponha ele pra ser mostrado na coluna de valor e veja se não funciona.
-
Inserir checkbon na sessão detail no crystal
pergunta respondeu ao Tiago_BB de kuroi em Crystal Reports
hum, mas da pra adicionar um checkbox no crystal?? tipo pro usuario clicar?? ou você quer so mostar o check box?? se for isso, você pode adicionar no details duas figuras. uma do checkbox checado e otra dele deschecado, uma sobreposta a outra. ai você clicando com o botao direito na figura e depois em Format Graphic, selecione a opcao Supress e clique no botao a direita para adicionar a formula (a figura sera suprimida de acordo com o resultado da formula) no checkbox desmarcado insira esse codigo: Not IsNull({Tabela.Campo}) //quando não estiver nulo, a imagem não sera mostrada e no checkbox marcado ponha esse: If IsNull({Tabela.Campo}) Then True Else {Tabela.Campo} <> 'N' //quando for diferente de N a imagem não sera mostrada[/code] -
tem alguma dll faltando. se você entrar em menu Project -> References veja se não tem nenhuma opcao checada q ele aponta como MISSING. chece tb em menu Project -> Components
-
Fazer o visual basic ler Arquivos externos .txt ou .ini
pergunta respondeu ao Boasfesta de kuroi em Visual Basic
como você pode ver no link q passei é so o usar o dir: If Dir("Modificaçoes\Scripts\Scripts.ini") = "" then MsgBox "Scripts.ini não existe ou foi excluido!", 16, "Erro" End if[/code] quanto a ler os dados do arquivo, use o link do jonathan