kuroi
Membros-
Total de itens
7.184 -
Registro em
-
Última visita
Tudo que kuroi postou
-
hum... é, parece q filter não funciona em firefox de jeito nenhum, é exclusividade do ie.
-
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.
-
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.
-
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]
-
olha http://scriptbrasil.com.br/forum/index.php...st&p=338464
-
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.
-
tenta assim ó: font-weight: bold; font-size: 25px; font-family: Verdana;
-
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]
-
[resolvido] Como Bloquear O Link Por Javascript
pergunta respondeu ao kuroi de kuroi em Ajax, JavaScript, XML, DOM
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> -
é 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??
-
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.
-
acho q você tem q fazer um while
-
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??
-
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]
-
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??
-
Auto-incremento Sem Ter Um Campo Auto-incremento
pergunta respondeu ao Gabriel Cabral de kuroi em Visual Basic
qual das opcoes do graymalkin você tentou e qual o problema q você teve?? -
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??
-
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.
-
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.
-
Sugestão Aos Moderadores Do Fórum
tópico respondeu ao Norivan Oliveira de kuroi em Sugestões e Críticas
isso. ou um select. espaco é o ultimo dos problemas. -
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??
-
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.
-
é como eu falei: Do While Not rs.EOF Text1.Text = Text1.Text & rs!id & " " & rs!verso & " " & rs!texto & vbCRLF rs.MoveNext Loop[/code]
-
aqui:
-
sim, nesse link q eu te passei tem varios exemplos, e acredito q todos eles devem funcionar em VBA.