kuroi

então gabriel, provavelmente, o formato da data do windows dele esta diferente, por isso esse problema. um jeito de resolver é, nas strings sql, sempre salvar a data com o formato "YYYY-MM-DD" e quando for pra mostrar as datas na tela, sempre passe um formato, por exemplo "DD/MM/YYYY" (use a funcao Format()).

pra mim chama jogo da velha mesmo.

opa, mas as funcoes funcionam quando você roda o programa no design (com F5)??

depende de como esta o seu codigo. tenta, antes de adicionar o texto, setar a propriedade SelStart da RichTextBox = 0. ou senao, adicione o texto tipo assim: RichTextBox1.Text = texto & vbCrLf & RichTextBox1.Text veja se é isso q você quer, qualquer coisa poste.

uberaba uber alles?? so toma cuidado q podem te acusar de nazismo.

seria tipo isso?? Agrupamentos.rsComissao.Filter = "DataPagamento>= '" & Datainicial & "' and DataPagamento <= '" & Datafinal & "' And Vendedor = '" & Vendedor & "'"

valeu por avisar, vo me lembrar de baxar o ff3 só no dia seguinte.

você não esta conseguindo fazer o clique do botao?? se for isso, primeiro você deve preencher a propriedade Key de cada botao (cada um tem q ter um Key diferente). ai você adiciona uma sub assim: Private Sub NomeDaSuaToolBar_ButtonClick(ByVal Button As MSComctlLib.Button) Select Case Button.Key Case "key1" - Clicou no botao em q o Key esta preenchido com "key1" - Case "key2" - Clicou no botao em q o Key esta preenchido com "key2" - ... ... Case "kuroi" - Clicou no botao em q o Key esta preenchido com "kuroi" - End Select End Sub[/code] veja se entende ai, qualquer coisa poste.

opa, foi mal eu não ter visto seu tópico antes. caso você ainda não tenha resolvido, você pode fazer uma coisa tipo assim: INSERT INTO wk101operadorSla (nome,status) SELECT nome, 'qualquer coisa aqui' As Status FROM tab WHERE @nome LIKE '%,' + nome + ',%'[/code] o status não tem na tabela, então de onde vem o dado q você deve gravar??

nossa não entendi nd, tenta explicar melhor...

julie, não entendi. como assim validar botoes?? você quer dizer validar o formulario?? a partir do clique no botao, seria isso?? o q é a barra de menu, é a toolbar?? o q exatamente você não esta conseguindo fazer??

não tem o Crystal por aqui no pc pra eu olhar, então não lembro direito os atalhos, mas se você clicar com o botao direito no subreport, uma das opcoes deve ser SubReport Properties, ou Format SubReport. procura la, q uma das opcoes deve abrir uma janelinha, onde você deve ter, em uma das abas, a opcao Supress. se você selecionar a opcao Supress, ele esconde o subreport. mas se você olhar do lado, tem um botaozinho q leva ao editor de formulas. nele, você pode incluir uma condicao q se for verdadeira, vai suprimir o SubReport (caso a expressao retorne True, o SubReport não aparece). ai então, é só você por uma formula pra ver se a sua tabela tem dados. normalmente um IsNull() em qualquer campo volta sempre True quando a tabela esta vazia. você tb pode mandar suprimir a Section (guia Details onde se encontra o SubReport) em do SubReport da mesma forma, se for melhor pra você.

se não me engano é uma coisa tipo assim: CREATE PROCEDURE [Nome] (@Vet As Varchar(50), @CC As Varchar(50)) As Select * From TAB Where X = @Vet and CC = @CC If @@ROWCOUNT = 0 Begin - Faca aqui o Insert - End Else Begin - Faca aqui o Update - End GO[/code]

veja esse tópico aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=108732

poste o codigo e aponte qual a linha em q o erro ocorre.

fly, qual o componente você esta usando no visual basic (Crystal Reports Control, etc)?? então, a opcao mais facil seria você editar o selection formula atraves do visual basic. a outra opcao seria você passar os dados de um recordset, como é explicado nesse post: http://scriptbrasil.com.br/forum/index.php...st&p=477615 pra editar o selection formula, depende do componente q você esta utilizando no visual basic pra acessar o crystal. caso você esteja usando o Crystal Reports ActiveX Design Run Time Library, leia esse tópico para informacoes: http://scriptbrasil.com.br/forum/index.php...st&p=448803 caso você esteja usando o Crystal Reports Control, não lembro o codigo de cabeca, mas no forum deve ter algum tópico de exemplo, faca uma busca (note q a gente tem um subforum, exclusivo pra Crystal Reports). na selection formula, você deve passar uma formula na sintaxe do crystal q satisfaca o filtro. veja se entende ai, qualquer coisa poste.

a duas coisas. primeiro, q se resposta não for igual a "S" ele nem entra no while. antes do while você teria q adicionar a linha resposta = "S" e a segunda coisa, é q o codigo q eu passei não é simplesmente do while resposta = "s", você esqueceu o UCase() então declare resposta como Integer. e no lugar onde você escreveria resposta = "S" (de acordo com a resposta q dei acima), escreva resposta = vbYes ai você abriria o while com: Do While resposta = vbYes e você faria a MsgBox() da forma como o macedo mostrou no tópico acima. acho q o codigo esta bem simples de entender, mas qualquer duvida, pergunte. e macedo, note tb tem erros no seu codigo, tipo, você esta fechando o loop com o if ainda aberto.

bom... você pode adicionar duas vezes cada campo. como se você fizesse dois relatorios, um ao lado do outro, não serve?? se você quiser deixar mais "certo" (já q daria muito trabalho sempre ter q alterar dois relatorios, caso for necessario), pode tentar com um subreport. você cria um rpt com o relatorio q você quer. ai você adiciona ele duas vezes num segundo .rpt. se você quiser alterar, você altera o original, abre o .rpt com os dois subs, apaga os dois subs e adiciona novamente a partir do .rpt com o modelo.

sim, fazer formulas baseadas em campos numericos é um saco no crystal, porque ele sempre poe a mascara. se você, na formula, fizer um replace (antes de concatenar) nesse numero, trocando '.' por '', deve funcionar.

o Distinct Count serve pra contar qtos registro diferente existem num campo da tabela. exemplo, imagine uma tabela com o campo nome, com esse 5 registros: Nome ---------------- kuroi kuroi xxx xxx yyy[/code] um Count() nesse campo, retornaria 5, pois existem 5 registros. mas note q alguns nomes se repetem, e existem apenas 3 nome diferentes no campo. por isso o DistinctCount() retornaria 3, entendeu??

cara, já apareceu bastante gente no forum reclamando sobre esse erro. faca uma busca q você deve encontrar varios topicos sobre o assunto, e em algum alguém deve passar alguma solucao. caso não encontre nd, então poste aqui de novo.

vitor, no crystal você tem duas tabelas, certo?? você não pode fazer o relacionamento das duas no proprio rpt, em vez de fazer por codigo?? outra opcao, seria você usar apenas 1 dataset e carregar ele com uma consulta de join entre as duas tabelas (e, no caso usar uma unica tabela no crystal).

fly, quando for postar codigos, lembra sempre de por o codigo dentro da tag CODE, beleza?? assim fica mais facil de entender, tipo ele não vai perder a tabulacao, entende?? mas, então, nesse seu codigo ai, ele não esta salvando. imagino q ele grave na sub GravarDados, não?? muito provavelmente o erro deve estar ai, se não conseguir encontrar, pode o codigo dela pra gente ver se descobre.

tenta então instalar o vb de novo, pode ter sido erro na instalacao, ou a biblioteca pode ter sido removida. tente instalar de novo. se não funcionar, tente descobrir qual é a ocx e veja se encontra pra baixar por ai.

faca uma busca no forum mesmo ou no google pelo controle Common Dialog. como assim dividir com %?? se você quer achar a porcentagem de qualquer coisa, tem q fazer o calculo na mao. exemplo se você quer achar 25% de x, faca a conta: resultado = (25 * x) / 100