Ir para conteúdo
Fórum Script Brasil

kuroi

Membros
  • Total de itens

    7.184
  • Registro em

  • Última visita

Tudo que kuroi postou

  1. kuroi

    Campo Data

    Mask1.Text = Format(rs!Data, "DD/MM/YYYY")
  2. kuroi

    Hexadecimal

    acho q você se refere a esse codigo do graymalkin, certo?? http://scriptbrasil.com.br/forum/index.php?showtopic=45026 bom, o contrario do Hex, seria tipo mais ou menos assim: Val "&HFF" exemplo, você tem o valor "FF" numa variavel string (igual a 255 em decimal). ai você fazendo assim: hex = "FF" x = Val("&H" & hex)[/code] x vai ter o valor 255. agora sabendo disso é so você adaptar. tipo, você vai ter separar o valor de cada caracter e converter usando o val "&H"
  3. kuroi

    Ajuda Em Select

    acho q é isso q você quer: Select COD, NOME, MUNICIPIO, PORTE, HISTORICO.ANALISE From PROJETOS INNER JOIN (HISTORICO INNER JOIN (Select COD_PROJETO, Max(COD_HISTORICO) As Maior From HISTORICO Group By COD_PROJETO) As HMAX ON HISTORICO.COD_PROJETO = HMAX.COD_PROJETO And HISTORICO.COD_HISTORICO = HMAX.Maior) ON PROJETOS.COD = HISTORICO.COD_PROJETO
  4. kuroi

    Fórmulas No Crystal

    não conheco apostilas do crystal já q nunca utilizei nenhuma, então não tenho nenhuma pra te indicar. agora quanto as formulas, não tem segredo nenhum, você pode usar a Basic Syntax q é semelhante ao visual basic, td o q você tem q fazer é atribuir um valor à variavel Formula. exemplo, se você tem um campo formula, você pode fazer assim: Formula = InStr({Tabela.Campo1}, 0, 2) & Left({Tabela.Campo2}, 5) você pode usar a Crystal Syntax q é muito parecido com a diferenca q você não precisar atribuir o valor pra variavel Formula, é so passa-lo q ele é retornado pra formula. exemplo, essa formula em Basic Syntax: If {Tabela.Campo} = 1 Then Formula = "um" ElseIf {Tabela.Campo} = 2 Then Formula = "dois" Else Formula = "outro" End If[/code] em Crystal Syntax, ficaria assim: [code]If {Tabela.Campo} = 1 Then "um" Else If {Tabela.Campo} = 2 Then "dois" Else "outro" e dentro da formula você pode declarar variavies normalmente e atribuir valores pra ela. por exemplo: Dim x as String If {Tabela.Campo} = 1 Then x = "um" ElseIf {Tabela.Campo} = 2 Then x = "dois" Else x = "outro" End If Formula = x[/code] e você pode usar rotinas de repeticao como For e While e etc. e td isso vale pra qualquer tipo de formula q você for usar no Crystal, desde campos Formulas, ate formulas de selecao, formulas de formatacao de secoes e texto. so q dependendo da formula o tipo de dado a ser retornado varia. exemplo, em formula de selecao (Record Selection Formula) você deve voltar True ou False obrigatoriamente. é mais ou menos isso q se tem pra falar sobre formulas no Crystal, veja ai e as duvidas q você tiver, pergunte. agora quanto a esse seu codigo, não tem muito o q falar, o := simplesmente é atribuicao de valor pra variavel em Crystal Syntax (apesar de, acredito, não ser necessario os dois pontos). fora isso, ele declara variaveis, usa comandos q tdo mundo conhece como if, for, etc. se você tem o minimo conhecimento de programacao, acredito q não tera dificuldade pra entender, talvez você possa ter alguma dificuldade pra entender exatamente como funcionam os campos formula, nesse caso olha a explicacao q eu passei, e tenta trabalahar você mesmo com formulas, q ai as coisas devem entrar na sua cabeca, qualquer duvida q tiver pergunte ai. alias, acredito q tdo isso q eu falei acima você deva encontrar muito melhor explicado em qualquer apostila ou livro q tenha por ai. talvez você esteja com alguma duvida ou dificuldade especifica, nesse caso explique melhor o q você não entende.
  5. nessas horas o unico lugar onde você deveria realmente pesquisar era o codigo fonte da pagina. e como você pode ver, eles fazem: .fundo_home { background-attachment: fixed; background-image: url(estrutura/fundos/fundo_home.jpg); background-repeat: no-repeat; background-position: center top; }[/code] acredito q o q falta no seu é background-attachment: fixed;
  6. kuroi

    Ordenação De Valores

    o q acontece é q ele muda de equipe cada vez q as equipes mudam de lugar. porque tipo, cada vez q ele abre o MenuEquipe, ele passa por essa linha: If m = 0 Then xJogador.equipe = xEquipe(0).nome lblNomeEquipe.Caption = "MCLAREN"[/code] nem vi o q é esse m, mas selecionei McLaren e ele ficou igual a 0 pra mim. beleza, so q assim q a corrida acaba, a McLaren não é mais a equipe 0, a equipe 0 na verdade é a ultima colocada.
  7. tipo, sei q a propriedade CursorLocation define a localizacao do cursor (ponteiro do registro - o q indica qual o registro atual). o padrão (quando você não seta nd) é ele abrir a conexao com o cursor no servidor (o seu provider OLE DB). e o provider pode ter restricoes por isso não deixa dar o MovePrevious e o MoveLast. agora setando o cursor no cliente, não sei exatamente como funciona mas resolve o problema. mais informacoes aqui: http://msdn2.microsoft.com/en-us/library/ms677542.aspx
  8. kuroi

    Fórmulas No Crystal

    só pra avisar, apaguei o seu post no otro tópico. primeiro porque o outro tópico é sobre apostilas e não sobre duvidas. e depois, você já postou nesse tópico aqui. e postar duas vezes a mesma pergunta é muito ruim pra quem for ler, pra quem for responder, e mtas vezes pra você mesmo. depois um cara responde nesse tópico, otro cara responde otra coisa no otro e fica td confuso. beleza?? respondendo a pergunta, você não precisa usar formula pra formatar data. e se por um acaso tiver q fazer isso, não existe funcao no crystal q formate direto a data ou qualquer outro tipo de valores pra você, você teria q converter pra string e montar a mascara na mao, usando as funcoes de datas (Day(), Month(), Year(), etc) e as funcoes de manipulacao de string (InStr(), Replace(), Len(), Left(), Right(), etc). pra você formatar uma data, simplesmente adicione-a no relatorio, clique com o botao direito nela, na janelinha q aparecer clique em Format Field. se o campo for realmente do tipo data, vai ter, na janela q abrir, uma aba Date / Time (se o campo for numerico, a aba vai se chamar Number). la você tem varias opcoes de formatos já definidos, mas pode clicar em Customize pra poder montar certinho a data como você quer usando as opcoes q o Crystal da.
  9. é, no codigo acima, eu passei o command, mas era pra ser o connection. faca assim: cnnProjetos.CursorLocation = adUseClient antes do cnnProjetos.Open
  10. mas esse codigo não vai fazer nd se você não chamar a funcao. acho q tem q ser essa daqui: Sub RenderTableConstraints(strTableName, conexao) ai você passa, me parece, o nome da tabela e o objeto conexao. mas não sei não, você ta usando bd access, não?? acho q esse codigo deve ser só pra sql.
  11. sim, a sua pagina tem varias funcoes declaradas, mas nada é executado, a não ser a abertura e o fechamento da conexao. o q você queria q aparecesse??
  12. isso é da sua conexao. posta como ta o codigo onde você abre ela. mas acho q você deveria adicionar a seguinte linha antes de abri-la: cnncomando.CursorLocation = adUseClient
  13. kuroi

    Tableless E Php

    esses dois sites tem informacoes e tutoriais sobre o assunto: http://www.maujor.com/ http://www.tableless.com.br mas um esquema q ajuda é estudar codigos fontes (HTML e CSS) de otros sites. esses dois q eu passei tb são bons exemplos
  14. eles não usam duas imagens, usam uma só, q é essa daqui: http://www.privilegenet.com.br/estrutura/f.../fundo_home.jpg
  15. kuroi

    Ordenação De Valores

    o q aconteceu é q eu to doente da cabeca, só isso. mas eu tava vendo aqui, o q acontece é q você soma os pontos antes da corrida comecar. tipo, você pos pra somar no click do OK, e so depois de somar você habilita o timer. tipo, logo apos o clique você define o ai de cada piloto, ordena o vetor, soma os pontos e ai você habilita o timer q ordena de novo pra cada volta. e assim q o timer para a corrida simplesmente acaba e os pontos não são somados. você ta somando os pontos pela colocacao inicial da primera volta. por isso se a corrida acabar com uma classificacao diferente da primera volta (e provavelmente vai acabar) a pontuacao não vai bater com a colocacao. você devia somar os pontos só depois q o tempo chegar em 70. e uma dica, uma coisa q enche um poco o saco pra mexer no seu programa é q os forms não aparecem na barra do windows. ai se eu ponho o foco em otra janela, eu não consigo encontrar o seu programa com o mouse, tenho q usar o Alt + TAB ou minimizar todas as janelas q tiverem na frente. não sei se por algum motivo, você fez isso de proposito, mas se quiser corrigir é so mudar a propriedade ShowInTaskBar de cada Form pra True.
  16. kuroi

    Fórmulas No Crystal

    cara tem um tópico pendurado só pra apostilas: http://scriptbrasil.com.br/forum/index.php?showtopic=86681 mas explica melhor esse seu problema com as formulas pra ver se a gente aqui consegue ajudar
  17. hum, acho q se eu entendi direito, o q você quer seria tipo isso: Select id_relacionamento, produto1.*, produto2.* from tab_relacionameto INNER JOIN tab_produto As produto1 ON tab_relacionameto.id_produto1 = produto1.id_produto INNER JOIN tab_produto As produto2 ON tab_relacionameto.id_produto2 = produto2.id_produto
  18. a funcao FileLen() retorna o tamanho do arquivo em bytes.
  19. não entendi, explica melhor. o q ele mostra e o q devia mostrar?? o q é o banco quente?? ele aponta pro banco no local correto?? tipo se você puser Database -> Set Location, pra onde ele aponta?? talvez funcione só no vb, porque tavlez você passe o endereco correto via código, ou talvez o seu report aponte apenas pra uma estrutura e os dados sejam preenchidos via codigo, passando o recordset.
  20. faca um novo banco de dados no access, crie as tabelas e etc. pra fazer a conexao, insercao e etc no banco de dados, da uma olhada nos exemplos q tem em http://www.macoratti.net e qualquer duvida posta aqui. mas posta na secao principal e não em Tutorias e Dicas, essa secao é so pra postar Tutoriais e Dicas.
  21. kuroi

    Ordenação De Valores

    opa recebi sim. mas é q aqui ta foda pra eu ver. to dando uma descansada do forum (e de otras coisas tb). explicacoes aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=107122 aqui ta foda, quase morro pra ir na escola. mas ta passando, aguenta um poco q logo eu vejo la. mas otras duvidas e problemas q você for tendo, pode ir postando ai (talvez melhor em novos topicos) q ai a mulecada vai ajudando como puderem.
  22. a data tinha q tar entre aspas, não?? aux5 = (DateDiff("s", "01/01/1970", Now)) isso levando em conta q o ponto do final tb não faca parte do seu codigo.
  23. essa div acho q teria q ficar no seu codigo html, logo depois da div topo. tipo assim: <div id="topo"></div> <div id="direita"></div> <div id="conteudo"></div> <div id="base"></div>[/code] se não resolver, tenta diminuir o tamanho das divs em alguns pixels, e se não resolver, então tenta dividir a esquerda e a direita e duas divs. tipo assim: [code]<div id="esquerda"> <div id="topo"></div> <div id="conteudo"></div> <div id="base"></div> </div> <div id="direita"></div>
  24. você tem um recordset vinculado ao grid não?? é so pegar o codigo pelo recordset e não pelo grid. tipo assim: rs!Codigo
×
×
  • Criar Novo...