Ir para conteúdo
Fórum Script Brasil

Ozi

Membros
  • Total de itens

    32
  • Registro em

  • Última visita

Tudo que Ozi postou

  1. Ozi

    Lig/desl Entrada Do Audio

    Ajudem aí por Favor, so preciso controlar o volume e ativar/desativar as entradas de Mic e Entrada Aux. do Controle de Volume do WINDOWS pelo VB alguém Sabe como fazer?
  2. Oi Gente, Gostaria de Saber como faço pra ligar e desligar as entradas de audio no mixer do windows via VB, me refiro as entradas de Linha, Mic da placa de Som... Se alguém souber me ajude por favor. Obrigado
  3. Olá Turma! To com o seguinte problema: Tenho um Form em html com um Botão Enviar e gostaria que ao clicar nesse botão uma pagina de confirmação fosse carregada. até aqui tudo bem! só que eu queria que essa pagina abrisse em uma janela popup. alguém pode postar um codigo que faça isso? Desculpem, sou iniciante... Abraços a todos!!!
  4. Ozi

    Arq.lng

    Olá Galera! É isso mesmo Greymalkin, Gostaria de Listar os nomes dos Arqs e baseado nos nomes eu inserir novos menus de acesso automaticamente a essas traduções de acordo com os arqs existentes. Vou dar uma procurada nessa função DIR() aqui no Forum, mas Valeu mesmo a força galera! Abraços do OZI.
  5. Ozi

    Arq.lng

    Ajuda aee pessoal!!!
  6. Ozi

    Arq.lng

    Olá Galera, To querendo colocar no meu prog aquela função de Escolha de Idioma onde o usuario escolhe no menu idiomas o seu favorito(Portugues, Ingles etc...) O problema é que eu já criei os arqs.lng contendo as traduções e que fica na pasta Idiomas do meu Aplicativo só que eu queria que O programa Detectasse esses arqs.lng e adcionasse (em runtime) os menus para os respectivos idiomas de acordo com os arqs. lng existentes na pasta Idiomas Tipo: se depois eu acrescenasse um arq. alemao.lng na pasta Idiomas o prog incluisse também um menu para o idioma 'alemão' Se alguém tiver um exemplo de como fazer isso eu ficarei muito agradecido. Abraços para a Galera.
  7. Ozi

    Fechar Um Exec. Externo

    Valeu Graymalkin! Obrigado pela força!!!
  8. Olá Galera, Tudo bem? Sei a função SHELL serve para abrir um EXE. Gostaria de saber se alguém sabe como em faço pra fechar atraves do meu prog um executavel que esteja aberto no PC, tipo: Pelo meu Prog eu fechar o Internet Explorer por exemplo! Agradeço a colaboração!!!
  9. Olá, Folks! estou meio sumido do forum, prq estou meio sem tempo. É o seguinte: Queria criar um progminha que toque WAV ou MP3, mas gostaria que nele eu podesse (criar e salvar playlists que pedessem ser carregados com as musicas q foram salvas nestes playlists), mas não sei como fazer isso. Se alguém poder ajudar postando um exemplo sobre os playlists, serei grato. Abraços de Ozi a todos to forum.
  10. alguém sb cm fazer pra detectar pression. de tecla usando api sem q o prog esteja com o foco(es 2º plano)? alg pde me dar uma força?
  11. Valeu a intenção guest, mas assim fica na mesma. neste caso o prog só detectaria o pressionamento da tecla "D" mas eu qria o seguinte: se o usuario presiona "a" o sistema avisa que ele pressionou "a" mas se ele pressiona "h" tb é avisado q pressiono "h" e assim com todas as teclas do Teclado. Obs. gostaria que esse cod. detectase o pressionamento mesmo sem q o prog esteja com o foco. você sabe como fazer isso? Abraços!!!
  12. Salve Galera! Seguinte, num post antigo perguntei sobre como detectar o pressionamento das teclas, o Greymalkin ate me deu a dica das APIs GetAsyncKeyState, GetKeyboardState ou GetKeyState. beleza, como não tenho experiencia com APIs até achei un ex. na net, mas o problema e que este exemplo só detecta a tecla ESC e eu queria q pegasse qualquer tcla que fosse pressionada e informasse ao usuario. abaixo o cod. que peguei na net: Se alguém souber como fazer a modificação eu agradeço. ------------------------------------------------------------------------ Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer Private Const VK_ESCAPE = &H1B Private Const VK_KEYDOWN As Long = -128 Private Const VK2_KEYDOWN As Long = -127 Dim continue As Boolean Private Sub Form_Load() Dim key As Long Me.Show continue = True Do While continue key = GetKeyState(VK_ESCAPE) If key = VK_KEYDOWN Or key = VK2_KEYDOWN Then If Not Me.Caption = "ESC is pressed" Then Me.Caption = "ESC is pressed" End If Else If Not Me.Caption = "ESC is not pressed" Then Me.Caption = "ESC is not pressed" End If End If DoEvents Loop End Sub
  13. Valeu colega! tópico encerrado! Obrigado. Abraçussss
  14. Aí cara, não consegui usar essa função Replace pra tirar as "/" da data. você pdria postar um ex? É q não tenho muita exp. em vb ainda Obrigado, Abração brother!
  15. Valeu! mas, só que eu precisava colocar em varData a data em que o exec. foi criado mas, sem as "/". tipo ao invés de 05/05/2005 fosse 05052005. como fazer isso? E o que faz essa linha? Debug.Print varNome, varTamanho, varData Até mais!!! Valeu a Força.
  16. Grande Greymalkin! Sempre socorrendo a galera. Hehehe! Valeu cara, mas você pode me dar um ex d como usar essa função? Tipo, eu qeria botar isso em variaveis pra eu usá depois, tipo assim: ------------------------------ dim varNome as string dim varTamanho as integer dim varData as Date varNome= App.Path & "nome do meu exe" varTamanho= FileLen(nome do meu exe) varData=FileDateTime(nome do meu exe) ------------------------------ Ve aí se funciona! Pode me dar um help em cima disso? é q eu to no trampo e só uso o vb em casa no fim de semana! hehehe Abraços brother!!!
  17. Help galera! Seguinte, Quero indicar um executavel pr meu prog e queria q ele pegasse o nome, o tamanho em kb e a data em que foi criado. alg sabe como fazer? Abraços!!! Ozi
  18. FALOU SENSHI! Agora deu Certo aqui. Abraços pra vc, pro Dhyeggo e pra todo mundo do forum. ;-)
  19. Ozi

    Fonte Do Windows

    você tinha razão quando disse q nca viu algo assim. o prblm era q a fonte tinha um none de arq. ex: minisystm.ttf mas no vb ela aparece como msystem, como eu procurava por minisystm, não achava nunca, hehehe. Mas valeu a força ae cara. um abração pro cë e todos do forum. ----Ozi----
  20. Dë uma ajudinha aí pessoal!!!
  21. Ozi

    Fonte Do Windows

    Olá Greymalkin, Abraços! Sim, Em qualquer editor de texto ou de imagem ela aparece, menos no vb. Quando eu seleciono o label e clico na propriedade font abre a tela de formatação da fonte como no word onde posso seleciotar tipo, tamanho e tipo mas o tipo que eu quero não aparece na lista. Se poder ajudar aí cara, eu agradeço.
  22. Ozi

    Fonte Do Windows

    Dá uma ajudinha aí pessoal!!!
  23. Olá pesuaw! sou novo aqí. Dá uma forcinha aí! Seguinte, no frame superior do meu Site coloquei um mecanismo de busca (Search) só q quando clico em ok, ao invés da busca abrir no frame principal ela abre no frade dos links à esquerda. aí vai o codigo que usei. se alguém souber modifique o codigo pra mim. per favore. <table border="0" width="100%" cellpadding="0" cellspacing="0"> <tr> <td width="100%"> <table border="0" cellpadding="0" cellspacing="0" width="100%" height="68"> <tr> <td width="21%" height="68"><img border="0" src="mylogo.jpg" align="left" width="162" height="68"></td> <td width="52%" height="68"> <p align="center"></td> <td width="27%" height="68"> <table border="0" width="222" height="7"> <tr> <td width="214" height="1"> <form name="search" id="search" target="main" method="get" action="http://search.MSN.com/results.asp"> <font face="arial" size="2"><strong>Procure <font color="#ff0000">Aqui:</font></strong></font><br> <input type="text" id="q" size="18" maxlength="251" name="q" vcard_name="SearchText"> <input type="submit" value="Search" name="B1"><input type="hidden" name="FORM" value="FRNT"><input type="hidden" name="un" value="doc"><input type="hidden" name="v" value="1">&nbsp; </form> </td> </tr> </table> ------------------------------------------------------------------ Abraços -----Ozi----- oziel2005@ig.com.br
  24. Ozi

    Fonte Do Windows

    Olá pessoal, é o seguinte: Tö fazendo uma agendinha com um estilo calculadora e queria usar uma fonte específica que baixei na net para informar hora e dta no painel. bem o problema é que eu instalei a fonte na pasta fonts do windows mas msmo assim não consigo aclá-la na propriedade font do textbox no vb. algem sabe porque? e se tem um jeito de eu usar essa fonte? se poder me ajudar postando um Ex. fico grato. Abraços a todos do Forum --- Ozi ---
  25. Olá Brother, tö postando de novo porque meu login não saiu da otra veiz! Aë colega, desculpe a falha. Só depois de ter um tempinho pra analizar melhor as coisas é q percebi o erro. troque a função <and> pela <or> dessa vez vai funcionar. eu testei em casa antes, só pra te passar. Ex. Private Sub txtExemplo_KeyPress(KeyAscii As Integer) If KeyAscii <= 48 or KeyAscii >= 57 Then KeyAscii = 0 End If End Sub me retorna se funcionar pra agente o tópico encerrar abraços --Ozi--
×
×
  • Criar Novo...