Ir para conteúdo
Fórum Script Brasil

raphael_suporte

Moderadores
  • Total de itens

    1.378
  • Registro em

  • Última visita

Tudo que raphael_suporte postou

  1. raphael_suporte

    load balance

    e a LED do seu WAN2 está acesa? se não tiver testa em outra porta para verificar se funciona e dependendo do resultado entra em contato com a NET, caso acenda retorne para a 2 e se a mesma não acender pode ser o aparelho.
  2. SÃO PAULO-SP x SANTOS-SP PALMEIRAS-SP BARUERI-SP CORITIBA-PR INTERNACIONAL-RS FLUMINENSE-RJ VITÓRIA-BA SPORT-PE CRUZEIRO-MG x CORINTHIANS-SP FLAMENGO-RJ
  3. raphael_suporte

    load balance

    Deividy, não entendi, como está a conexão da NET? quando esteve fora do ar seu aparelho foi reiniciado? há algum lugar que esteja configurado algum IP para distribuir? pois como é um IP dinâmico, após normalização, a NET pode ter liberado um novo IP, talvez tenha que reconfigurar.
  4. Na verdade existem, neste caso, 2 endereços IP'S. O Primeiro que é o interno, no caso já está diferente, pois não há como 2 maquinas terem o mesmo numero de IP, e outra é o Endereço gateway o que faz a conexão com a internet, esse IP é o que fica gravado no servidor em questão, e vem do seu provedor de internet ou seja não é fácil troca-lo e mesmo assim será o mesmo IP sempre, pois vocês devem usar o mesmo serviço na internet ( Ex: Velox)
  5. hum entendi, bom colocar as duas situações entre parênteses, pois como ele acha 1 verdadeiro ( a > 500) ele valida e calcula, e depois ele verifica se é maior que 1000, o que também acontece, quando você for utilizar 2 condições ou mais no mesmo "se" coloque entre parênteses se (a > 500 e a <= 1000) então . . .
  6. isso seria algo assim, vou colocar em portugal, caso esteja usando uma estrutura de linguagem é só adaptar. var estoque_medio : real Valor_min, valor_max : inteiro inicio escreva "entre com o valor minimo:" leia(Valor_min) escreva "Entre com o valor maximo:" leia(valor_max) estoque_medio = (valor_min+valor_max) /2 escreva "A media do estoque é: " & estoque_medio fim aqui estou apenas tentando te passar a lógica e estrutura do programa, caso esteja usando uma estrutura é só ir adaptando...
  7. seu código está informando maior ou igual a 1000, ou seja ele tem que calcular *10 e não por 5,por 5 apenas se for de 1001 para cima
  8. Cara, se ficou nervoso, despenso . Estou começando agora, desculpe se te irritei, prometo dar mais atenção na próxima vez . Nem fiquei não estou te explicando, desculpa se transmiti isso de forma errada, mas através de fórum não dá para entonar sua voz e por ela amena, as vezes o que está escrito e a forma como se lê, passa outra impressão do que se realmente quis dizer... Mas em relação a dúvida conseguiu entender?
  9. pensando eu como botão "pesquisar", seria da forma que te passei... se quero achar CAS, o valor CAT não é para ser exibido mesmo, pois não satisfaz minha busca. caso queira o CAT pesquisaria por este valor não pelo valor CAS
  10. não existe erro, basta prestar atenção na lógica, verifica melhor como você quer que funcione, pois do modo que você está pensando, não tem como, pelo menos que eu conheça não
  11. Edita o título, mas eu vou avisar o moderador da sessão para que feche também.
  12. se eles estão escritos na sua base da mesma forma, e só o nome é igual, e você talvez nã pode apagar agora no select que você usa para preencher a sua combo, use o GROUP BY CAMPO ( onde o campo deve ser o referente ao campo onde está o valor Maria, José)
  13. se tem eu não conheço, pois para carregar seu recordSet, você precisa de um select, caso você filtre pelo nome digitado, você terá apenas aqueles arquivos encontrados no select, caso não digite nada ou não use um filtro você terá todos os registros dentro do RecordSet, o EOF e BOF, é apenas para marcar o Final e o Inicio da pilha... não vai influenciar na continuação do arquivo. se você filtrar like 'CAS%' ele vai filtrar e ordernar tudo que encontrar começando com CAS, porem ao acabar ele não irá pular para CAT, pois o RecordSet já foi carregado com aquela pesquisa.
  14. mas isso não pode ocorrer, pois você está filtrando os nomes, se não for para serem filtrados remove toda a sintaxe do Where, deixando: Select * from TABELA order by nome
  15. cara verifica também sua configuração regional... no Windows... PS: Favor não abrir 2 tópicos para resolver o mesmo problema, aguarde até que alguém te responda... estou solicitando ao moderador desta sessão para juntar os tópicos.
  16. Coloque um order by no seu select. sSQL = "SELECT * FROM Estagiarios WHERE Nome LIKE '%" & dado & "%' order by nome"
  17. isso aconselho com o negando o eof...parecido com o preenchimento da combo.. porem analisando aqui, você teria um problema, pois ele iria preencher com todos os registros que ele achar, e deixar o último, você teria que fazer um controle de ir parando a cada registro, um controle tipo próximo, anterior mas o IF para preencher é esse: if not rs.eof then textbox1.text = rs("nome") textBox2.text = rs("tel") . . . end if algo assim agora como você faz a pesquisa?
  18. olha como você quer que o arquivo seja o primeiro e o último?? ( Begin Of File, End Of File), escolha apenas um junto com um loop para caso tenha mais de um arquivo.
  19. não entendi muito bem.. você tem um botão de pesquisa? e após concluir sua pesquisa que preencher sua Form?? se for isso é só colocar assim: textBox1.text = rs("nome_campo") textBox2.text = rs("nome_campo") textBox3.text = rs("nome_campo") textBox4.text = rs("nome_campo") textBox5.text = rs("nome_campo") . . . e por aí vai... é isso que você quer?
  20. é só pesquisar o valor digitado através do like.... "Select * from TABELA where NOME DO CAMPO like '%valor_digitado%'" o sinal de porcentagem serve como coringa, ou seja neste casou estou procurando tudo que contenha aquele valor, caso queira pesquisar o que está no inicio ficaria, like 'valor_digitado%' e só quando o valor tiver no final, like '%valor_digitado'.
  21. É quase isto. Tente assim:SELECT STRAIGHT_JOIN u.name FROM tb_user u INNER JOIN tb_connection t ON t.ID_user = u.ID INNER JOIN tb_adj a ON a.ID = t.ID_adj WHERE a.name IN ('sexy', 'rich'); já tentou da Forma como o Denis falou?
  22. como está o código? o IF tem que ser antes do comando gravar, poderia colocar o código aqui, apenas a parte do botão
  23. onde você está colocando esse código?? após inserir o código tente mudar de aba e voltar pois pode não está carregando as alterações
  24. raphael é o seguinte quando é clicado na cboCurso lista todos os cursos cadstrados ao invés de listar somente o de acordo com a faculdade escolhida.... sera que deve ser por falta da cboClear??? onde eu coloco essa cboClear?? e qual seria a cboClear??cboInstituiçao.clear ou cboCurso.clear?? vou mandar o codigo pra voce da uma olhada isso cboClear = nomeCombo.Clear você vai colocar onde está indicado no post anterior Private Sub cboInstituiçao_Click() Dim cnnComando As New ADODB.Command Dim codInst As Integer cboCurso.clear ' <------- limpa a combo antes de preencher With cnnComando .ActiveConnection = conexao .CommandType = adCmdText .CommandText = "SELECT * FROM Instituiçao WHERE Nome = '" & cboInstituiçao.Text & "'" Set rsSeleçao = .Execute End With codInst = rsSeleçao("codInst") If rsSeleçao.Status = 1 Then rsSeleçao.Close With cnnComando .ActiveConnection = conexao .CommandType = adCmdText .CommandText = "SELECT NomeCurso FROM Curso WHERE CodInst = codInst" Set rsSeleçao = .Execute End With With rsSeleçao Do While Not rsSeleçao.EOF If Not IsNull(rsSeleçao!NomeCurso) Then cboCurso.AddItem rsSeleçao!NomeCurso End If rsSeleçao.MoveNext Loop End With End Sub Private Sub Form_Load() Preenche_Combo_chefia Preenche_combo_turno Preenche_combo_instituiçao End Sub Private Sub Preenche_combo_turno() Dim cnnComando As New ADODB.Command With cnnComando .ActiveConnection = conexao .CommandType = adCmdText .CommandText = "SELECT Turno FROM Turno" Set rsSeleçao = .Execute End With With rsSeleçao Do While Not rsSeleçao.EOF If Not IsNull(rsSeleçao!Turno) Then cboTurno.AddItem rsSeleçao!Turno End If rsSeleçao.MoveNext Loop End With End Sub Private Sub Preenche_combo_instituiçao() Dim cnnComando As New ADODB.Command cboInstituicao.clear ' <------- limpa a combo antes de preencher With cnnComando .ActiveConnection = conexao .CommandType = adCmdText .CommandText = "SELECT Nome FROM Instituiçao" Set rsSeleçao = .Execute End With With rsSeleçao Do While Not rsSeleçao.EOF If Not IsNull(rsSeleçao!Nome) Then cboInstituiçao.AddItem rsSeleçao!Nome End If rsSeleçao.MoveNext Loop End With End Sub
  25. você tem algum objeto com o nome textBox2.text?? você vai alterar esses valores pelo nome dos seus objetos
×
×
  • Criar Novo...