Ir para conteúdo
Fórum Script Brasil

kuroi

Membros
  • Total de itens

    7.184
  • Registro em

  • Última visita

Tudo que kuroi postou

  1. hum... é, parece q filter não funciona em firefox de jeito nenhum, é exclusividade do ie.
  2. kuroi

    Loop Infinito

    mas, se compilador em questão for C++ e não C, acho que não vai dar - parece que não existe a função no C++ -> Ref. post em DaniWeb existe sim. mas eu tava vendo... usando o getch(), ele vai parar a execucao e esperar pela resposta do teclado não?? ou seja, não vai servir, porque a execucao não pode parar a não ser q eu tecle alguma coisa.
  3. kuroi

    Ordenação De Valores

    aqui: If (nMotor(j) + 1) > 7 Then xEquipe(j).Motor = xMotor(7).nome xEquipe(j).finanças = xEquipe(j).finanças - xMotor(7).custo nMotor(j) = 7[/code] em vez de já trocar o motor, ponha o h = 3, assim ele vai la pra baixo e compra o melhor. alias, nas linhas debaixo: [code]ElseIf (nMotor(j) + b) = nMotor(j) Then xEquipe(j).Motor = xMotor(7).nome xEquipe(j).finanças = xEquipe(j).finanças - xMotor(7).custo nMotor(j) = 7 ElseIf (nMotor(j) - c) = nMotor(j) Then xEquipe(j).Motor = xMotor(0).nome xEquipe(j).finanças = xEquipe(j).finanças - xMotor(0).custo nMotor(j) = 0 ElseIf (nMotor(j) - 1) < 0 Then xEquipe(j).Motor = xMotor(0).nome xEquipe(j).finanças = xEquipe(j).finanças - xMotor(0).custo nMotor(j) = 0 End If você já ta comprando o motor. mas ai ele vai passar embaixo onde ele checa o h e, dependendo, vai comprar de novo. então, ai ou você zera o h depois de comprar, ou você apaga o codigo q compra e passa algum valor pro h pra comprar la embaxo.
  4. o codigo todo tem q ser assim: Private Sub MDIForm_Load() SQL = "Select * From Tabela" Set rs = cn.Execute(SQL) If DateSerial(rs!Ano, rs!Mes, 1) < DateSerial(Year(Date), Month(Date), 1) Then SQL = "Update Clientes Set Cli_TempoDisp = '" & 05:00 & "'" cn.Execute SQL SQL = "Update Tabela Set Ano = " & Year(Date) & ", Mes = " & Month(Date) cn.Execute SQL End If End Sub[/code]
  5. kuroi

    Case

    olha http://scriptbrasil.com.br/forum/index.php...st&p=338464
  6. kuroi

    Procedure Ou Trigger

    cara o int guarda valores bem altos, acho q mais de 2 bilhoes, mas se for pouco pra você, pode por outros tipos, como bigint, etc. da uma olhada aqui: http://dev.mysql.com/doc/refman/5.0/en/numeric-types.html quanto ao hexadecimal, na verdade, decimal ou hexadecimal são so formas de mostrar. na verdade o q ele guarda na tabela são valores. se você usa alguma linguagem, você pode muito bem converter o valor guardado pra hexadecimal na hora de mostrar.
  7. tenta assim ó: font-weight: bold; font-size: 25px; font-family: Verdana;
  8. SQL = "Update Clientes Set Cli_TempoDisp = '" & 05:00 & "'" cn.Execute SQL SQL = "Update Tabela Set Ano = " & Year(Date) & ", Mes = " & Month(Date) cn.Execute SQL[/code]
  9. opa, valeu. mas acabei de descobrir aqui um jeito mais facil, na verdade era bem simples, era so por return false, ai ele não segue o link: <a href="http://www.pagina.com?act=editar" onclick="ExibeForm(); return false;">Editar</a>
  10. é o seguinte, tenho um link qualquer (tag <a>). quero adicionar uma funcao javascript no onclick desse link. mas não quero q ele siga o link, ponho o href apenas pro caso de ele estar com o javascript habilitado. tipo, tenho um form de alteracao de registro q esta oculto (display: none). quando ele clicar no link quero q ele exiba esse form mas SEM SEGUIR O LINK, sem carregar a pagina. agora, caso o javascript esteja desabilitado ai sim ele vai seguir o link e, passando a querystring, eu vo saber q ele ta querendo editar e então ai eu mostro o form. tipo assim: <a href="http://www.pagina.com?act=editar" onclick="ExibeForm();">Editar</a> entenderam?? na verdade esse link nem era pra ter, mas é so pro caso de ele desabilitar o javascript. tem como fazer??
  11. kuroi

    Preciso De Ajuda

    não entendi nd. mas acho q você ta tentando salvar dois campos chamados Nome, não?? mas não pode, dois campos diferentes não podem ter o mesmo nome.
  12. kuroi

    Ordenação De Valores

    ou pra facilitar você podia fazer uma sub q comprasse o motor por exemplo, só passando como parametro o numero da equipe e o motor. o peneu tem aquele mesmo problema do If q tinha no motor, você já arrumou?? e esse problema continua?? quanto ao problema da equipe não comprar o motor, isso não aconteceu aqui pra mim, mas acho q isso acontece quando for pra equipe comprar o pior motor. olha: If h(j) = 1 Then ... ... If (nMotor(j) - 6) < 0 Then h(j) = 0 ElseIf xEquipe(j).finanças > xMotor(nMotor(j) - 6).custo Then xEquipe(j).Motor = xMotor(nMotor(j) - 6).nome xEquipe(j).finanças = xEquipe(j).finanças - xMotor(nMotor(j) - 6).custo nMotor(j) = nMotor(j) - 6 Else h(j) = 2 ' <-- ESSE DAQUI!!! End If ... ... ElseIf h(j) = 2 Then xEquipe(j).Motor = xMotor(0).nome xEquipe(j).finanças = xEquipe(j).finanças - xMotor(0).custo nMotor(j) = 0 ElseIf h(j) = 3 Then xEquipe(j).Motor = xMotor(7).nome xEquipe(j).finanças = xMotor(7).custo nMotor(j) = 7 End If[/code] você passa o valor 2 pro h, acredito q na intencao de ele ir pro ElseIf h(j) = 2 Then. mas na verdade, se ele entrou no primeiro if, ele vai ignorar esse elseif não importa o q aconteca dentro dele. por isso, em vez de por h(j) = 2, copia o q ta no elseif e cola la. outra coisa: [code]c = nMotor(j) - 0 pra q serve esse - 0??
  13. você não pode criar uma tabela nova no seu banco so pra guardar o mes da ultima atualizacao?? ai seriam dois campos, um pra guardar o mes e outro o ano. depois de criar, adicione um registro na mao mesmo (ela sempre vai ter so um registro) q seja anterior ao mes atual. ai assim q o programa abrisse você faria um teste: sql = "Select * From Tabela" Set rs = cn.Execute(sql) If DateSerial(rs!Ano, rs!Mes, 1) < DateSerial(Year(Date), Month(Date), 1) Then - AQUI você FAZ A ATUALIZACAO Q você PRECISA - sql = "Update Tabela Set Ano = " & Year(Date) & ", Mes = " & Month(Date) cn.Execute sql End If[/code]
  14. opa, nova duvida... essa eu pensei, pensei e não cheguei a nenhuma conclusao, nem durmo mais a noite. tipo... como o forum sabe quais os topicos q eu já li e quais os q eu não li?? seria tipo numa tabela q ele guarde o id do usuario e o id do tópico. ai no caso ele guardaria todos os posts q eu ainda não li?? ou seria todos os q eu já li?? ou guarda os dois, so q com o um campo q indifica se foi lido o não lido?? porque por exemplo, se cada vez q alguém postar um novo tópico, ele vai la e inclui nessa tabela um registro pra cada usuario pra apontar q cada um ainda não leu. mas isso não levaria muito tempo?? tipo são 26 mil membros ou se cada vez eu lesse um tópico, ele gravaria no banco q eu já li. mas ai a tabela vai ficar gigante, seriam o numero de topicos vezes o numero de usuarios. sei la, tipo todas as solucoes q eu pensei me parecem q ficariam muito pesadas. alguém sabe como isso é feito??
  15. qual das opcoes do graymalkin você tentou e qual o problema q você teve??
  16. kuroi

    Ordenação De Valores

    guenta ai q já olho. aqui, você tem q fechar o if: If (nMotor(j) + 1) > 7 Then h(j) = 3 ElseIf (nMotor(j) + b) = nMotor(j) Then h(j) = 3 ElseIf (nMotor(j) - c) = nMotor(j) Then h(j) = 2 ElseIf (nMotor(j) - 1) < 0 Then h(j) = 2 End If[/code] porque aqui é onde você seta o h(). embaixo é onde você testa o h(), não é pra testar no mesmo If, é um If separado. otra coisa, la embaxo você fez: [code]ElseIf h(j) = 3 Then xEquipe(j).Motor = xMotor(7).nome xEquipe(j).finanças = xMotor(7).custo nMotor(j) = 7 End If acho q o certo seria: ElseIf h(j) = 3 Then xEquipe(j).Motor = xMotor(7).nome xEquipe(j).finanças = xEquipe(j).finanças - xMotor(7).custo nMotor(j) = 7 End If[/code] não?? otra coisa... porque os caras são obrigados a comprar otro motor quando acaba a temporada?? se o cara já tem um motor ele pode usa-lo, não pode?? e se eu já tenho o melhor motor, pra q eu vou comprar outro?? alem do mais... você já pensou no q vai fazer se a equipe não tiver dinhero pra comprar nenhum motor??
  17. kuroi

    Imagem Trasparente

    não entendi... como assim?? pra mim aqui funciona em firefox, ie6, lembro q desda epoca do ie5 o hover já funcionava. o q você quis dizer exatamente?? por exemplo, o hover no site q ele passou funcionou certinho no ie6, alias assim como funciona o hover q é usado umas 100 vezes por pagina aqui mesmo no forum, assim como esse codigo q você passou deve funcionar.
  18. kuroi

    Imagem Trasparente

    acho q o esquema é usar duas imagens, uma delas normal, e a otra trasparente. ai quando passar o mouse por cima você troca elas. pode fazer com css. acho q deve funcionar assim: #seu_objeto { background: url(imagem1.gif) no-repeat; } #seu_objeto:hover { background: url(imagem2.gif) no-repeat; }[/code] apesar de q da pra fazer tb com javascript. no caso desse exemplo q você passou, o cara usa uma imagem só e muda a posicao dela. exemplo: http://www.kinghost.com.br/img/logos_win2003.png de uma olhada no css dele pra ver como ele faz.
  19. isso. ou um select. espaco é o ultimo dos problemas.
  20. o esquema é listar todas as funcoes do site, dividido por area, secoes, etc, tudo bunitinho, de preferencia com imagens e pôr uma explicacao de como funciona cada coisa. e sim, é na documentacao q você ensina a atualizar e etc. agora essa parte de cor não sei, la onde eu trabalhava pelo menos a gente não costumava fazer documentacao pra layout. se eles pedirem, de uma detalhada então. ou se você sabe q eles serao exigentes nessa parte, então talvez seja bom incluir. o q é typografia??
  21. sim você pode gravar em .doc ou em .rtf (documento do WordPad), mas ai você teria q saber como é a estrutura por tras do texto, ou usar algum componente q escreva pra você nesses formatos.
  22. é como eu falei: Do While Not rs.EOF Text1.Text = Text1.Text & rs!id & " " & rs!verso & " " & rs!texto & vbCRLF rs.MoveNext Loop[/code]
  23. sim, nesse link q eu te passei tem varios exemplos, e acredito q todos eles devem funcionar em VBA.
×
×
  • Criar Novo...