Ir para conteúdo
Fórum Script Brasil

Graymalkin

Veteranos
  • Total de itens

    8.257
  • Registro em

  • Última visita

Tudo que Graymalkin postou

  1. Você não deu nenhum valor a "descontarhora" e "descontarminuto", então ambas são 0. E você sabe que qualquer coisa menos zero é igual a própria coisa... :P Abraços, Graymalkin
  2. Movi seu tópico para Tutoriais e Dicas de C/C++. A propósito, você fez um ótimo tutorial! :D Abraços, Graymalkin
  3. E se você colocar a GridView na página master deixando ela como invisível (Visible = False)? Já tentou isso? Não uso ASP.NET, mas quando uso é só com code-behind, então eu não teria esse problema, já que bastaria criar a GridView em tempo de execução. Abraços, Graymalkin
  4. Graymalkin

    Xml

    Fiz um exemplo de como ler o nó "cabecalho" do seu XML: Dim x As New DOMDocument Dim mensagemTISS As IXMLDOMNode Dim cabeçalho As IXMLDOMNode Dim idTransação As IXMLDOMNode Dim origem As IXMLDOMNode Dim destino As IXMLDOMNode Dim versãoPadrão As IXMLDOMNode Dim dado As IXMLDOMNode If x.Load(App.Path & "\teste.xml") Then Debug.Print "ok" Set mensagemTISS = x.selectSingleNode("ans:mensagemTISS") Set cabeçalho = mensagemTISS.selectSingleNode("ans:cabecalho") Set idTransação = cabeçalho.selectSingleNode("ans:identificacaoTransacao") Debug.Print "Identificação da Transação" For Each dado In idTransação.childNodes Debug.Print " -> " & Replace(dado.nodeName, "ans:", "") & " = " & dado.nodeTypedValue Next dado Set origem = cabeçalho.selectSingleNode("ans:origem") Debug.Print "Origem" For Each dado In origem.childNodes If dado.hasChildNodes Then For Each dado2 In dado.childNodes Debug.Print " -> " & Replace(dado2.nodeName, "ans:", "") & " = " & dado2.nodeTypedValue Next dado2 End If Next dado Set destino = cabeçalho.selectSingleNode("ans:destino") Debug.Print "Destino" For Each dado In destino.childNodes Debug.Print " -> " & Replace(dado.nodeName, "ans:", "") & " = " & dado.nodeTypedValue Next dado Set versãoPadrão = cabeçalho.selectSingleNode("ans:versaoPadrao") Debug.Print "Versão Padrão: " & versãoPadrão.nodeTypedValue End If Acredito que pelo exemplo acima você consiga ler o restante do arquivo. Abraços, Graymalkin
  5. Graymalkin

    Vba No Excel...

    De fato, esqueceram de colocar isso para ser gravado. Mas, você pode resolver o caso assim: Dim c As Comment Set c = Range("A1").AddComment("teste") c.Visible = False c.Text "teste" c.Shape.TextFrame.Characters.Font.Bold = True Range("A1").Select Certo? ;) Graymalkin
  6. Não sei se vai te ajudar, mas dê uma olhada no WinPcap: http://www.winpcap.org/ Abraços, Graymalkin
  7. Se for uma impressora ligada na porta LPT1 você pode tentar fazer: n = freefile() open "lpt1:" for output as #n ? #n, variável close #n Do contrário, só mesmo usando o método PrintOut para imprimir o documento. Abraços, Graymalkin
  8. Meio contraditório isso, não? Tá certo que você pode passar os dados via IP em uma rede local (de um computador para outro), mas o mesmo pode ser via Internet sem mudar nada (já que a Internet é como uma rede local beeeeem grande). Ah, e também lembrando que IP significa "Internet Protocol". De qualquer maneira, você queria fazer essa criptografia em uma transmissão ao vivo? Como durante uma conversa telefônica? Abraços, Graymalkin
  9. É porque curses é uma biblioteca para controle do terminal independente de Python. O que o módulo curses de Python faz é usar esta biblioteca quando a mesma está disponível. Esta biblioteca foi originalmente criada para o BSD e portada para outras plataformas (atualmente sob o nome de ncurses). Segundo http://www.amk.ca/python/howto/curses/ ainda não foi feito um port para a plataforma Windows. Abraços, Graymalkin
  10. Graymalkin

    Access

    SQL Server, PostgreSQL e MySQL são SGBDs. Access não, este é um banco local baseado em um arquivo. Se me lembro bem, na época que fiz uns testes com JSP eu tive o mesmo problema, mas posso estar equivocado já que faz muito tempo. Bom, defeito ou não eu acho que o comportamento dele está correto. Imagine o problema de você remover uma tabela ou um campo enquanto o caboclo está inserindo ou editando um registro? Em um SGBD, como o PostgreSQL, isso não é problema uma vez que todas as operações são enviadas para o servidor e este é o responsável por realizá-las nas devidas formas. Não se tem este tipo de gerenciamento no Access. Abraços, Graymalkin
  11. Graymalkin

    Access

    Mas esse é o comportamento esperado. Fazendo uma analogia: como você quer que alguém leia um livro ao mesmo que outra pessoa pode estar arrancando páginas do mesmo? Você só deve abrir o BD no Access quando for fazer modificações nele, e durante este tempo qualquer acesso ao BD tem de ser bloqueado. Você precisa abrir o BD constantemente? Abraços, Graymalkin
  12. Muda o cursor do mouse para a ampulheta. Abraços, Graymalkin
  13. Graymalkin

    Access

    http://scriptbrasil.com.br/forum/index.php?showtopic=100186 Graymalkin
  14. Graymalkin

    Access

    Experimente abrir como somente-leitura no Access, talvez dê certo. Abraços, Graymalkin
  15. O que este código deveria fazer e em qual linha ocorre o problema? Graymalkin
  16. Graymalkin

    Tempo De Login

    Use uma tabela de banco de dados para guardar a hora do login e do logout de cada usuário. E, com estas informações você também pode obter quem está logado atualmente. Abraços, Graymalkin
  17. Graymalkin

    Access

    Ah, eu não tinha entendido que você estava com o *Access* aberto usando o BD. Então o erro é normal sim. O próprio Access abre o arquivo como exclusivo para que você possa fazer alterações na estrutura do mesmo. Abraços, Graymalkin
  18. Graymalkin

    Combo Box

    Como assim "a resposta de outro"? Graymalkin
  19. Graymalkin

    Celula Recebe Foco

    Use o evento SelectionChange da planilha. Este evento tem um argumento (Target) que indica qual é a célula selecionada. Abraços, Graymalkin
  20. Graymalkin

    Access

    Como você faz para abrir o BD nos dois casos? Provavelmente um deles está querendo (ou está abrindo) o BD em modo exclusivo. Abraços, Graymalkin
  21. Você pelo menos *tentou* utilizá-la? Não há nada de especial ou misterioso nesta função: tempo = "05:00" descontar = 30 tempo2 = TimeSerial(Hour(tempo), Minute(tempo) - descontar, 0) Debug.Print Format(tempo2, "hh:mm") Graymalkin
  22. Está bastante confuso o código (falta a identação e o uso da tag CODE), mas acho que o que precisa é guardar o valor subtraído no mesmo objeto que você vai subtrair no final. Abraços, Graymalkin
  23. Strings em C são arrays de char, por isso você não vai ter as facilidades que vemos em outras linguagens que possuem este tipo como padrão. No caso, você pode fazer: char nome[20] = "Joao Felipe"; Ou: char nome[20]; strcpy(nome, "Joao Felipe"); Certo? ;) Graymalkin
  24. Use a função TimeSerial(). Abraços, Graymalkin
  25. Movi para a sub-sala correta (Crystal Reports). Agora, seria interessante informar qual a versão do Crystal, qual o BD e a linha do erro. Abraços, Graymalkin
×
×
  • Criar Novo...