Jump to content

JDSCaram

Administradores (Adm)
  • Content count

    192
  • Joined

  • Last visited

  • Days Won

    28

JDSCaram last won the day on March 19

JDSCaram had the most liked content!

Community Reputation

67 Bom

About JDSCaram

  • Rank
    Administrador
  • Birthday 03/10/1992

Profile Information

  • Gender
    Male
  • Location
    C:\Windows\

Contact Methods

  • Website URL
    http://www.autoitbrasil.com
  1. Acho uma alternativa para proteção de jogos, é scan, continuo para verificar softwares invasores, e fecha o jogo, como o @brenner citou acima. Mas uma bom código escrito usando técnicas de segurança certamente ajudara. Como diz uma professor de Eng. Software: "Não existe nada seguro nesse mundo, tudo a brechas, resta você achá-las, e dificultar o acesso."
  2. Algorítimo de Sorteio e Strings

    Gostei :D, musica tambem
  3. cor botoes em autoit

    Olá Smurf, procure no help GuiCtrlSetBkColor Atribua abaixo do codigo do seu button por exemplo o GUICtrlSetBkColor(-1, 0xFF00FF) #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 341, 165, 192, 124) $Button1 = GUICtrlCreateButton("Button1", 40, 40, 267, 89) GUICtrlSetBkColor(-1, 0xFF00FF); Defina a cor desejada GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Tabela de cores : http://www.ufpa.br/dicas/htm/htm-cor2.htm
  4. Tudo bem :D E que me parece que pelo vi o IniWriteSection da pra trabalha com apenas 1 array bidimen... como tava usando na verdade Foi oque tentei, mais não sei onde tava pecando, se era na declaração ou no uso mesmo
  5. proteção para Raios - RINDAT

    Otima ideia, gostei :like_icon: :autoit: Sua regiao é constantemente atingida por raios que coisa hein :S A imagem mostra
  6. Não sei se intendi muito bem meu amigo, mais fiz assim Está dando certo em partes, se voce testar vai ver, antes ele não atribuia o valor e não escrevia no arquivo .ini os valores de cada variavel Agora ele ta dando certo porem ta retornando ao contrario dentro do arquivo .ini Local $sConecta,$sHost="",$sUser="",$sPass="",$sDB="",$iPorta="" Global $sIni = @ScriptDir & "\config.ini", $sSetor = "Configuracao" Global $aArray [5][2] = [[$sHost,"Host"],[$sUser,"Usuario"],[$sPass,"Pass"],[$sDB,"Database"],[$iPorta,"Porta"]] ; Antes Global $aArray [5][2] = [["Host",$sHost],["Usuario",$sUser],["Senha",$sPass],["Database",$sDB],["Porta",$iPorta]] Global $aLoop [5] = ["Host","Usuario","Password","Database","Porta"] if not FileExists($sIni) Then For $i = 0 to 4 if $aArray[$i][0]= "" Then $aArray [$i][0] = InputBox("Campo não pode ser nulo!", 'Digite um valor para o campo "' & $aLoop[$i] & '": ') EndIf Next IniWriteSection($sIni,$sSetor,$aArray,0) Else $sLerINI = IniReadSection($sIni,$sSetor) $sDividirString = StringSplit($sLerINI,"=") For $i = 1 to $sLerINI [0][0] MsgBox(0,"",$sLerINI[$i][1] ) Next endif ---- Edit Consegui, estava pecando por que estava usando o IniWriteSection, e tambem acho que não estava trabalhando certo com array [][]. tava me perdeno acho Agora consegui oque queria, apenas mudei para IniWrite e chamei cada array lobal $sConecta,$sHost="",$sUser="",$sPass="",$sDB="",$iPorta="" Global $sIni = @ScriptDir & "\config.ini", $sSetor = "Configuracao" ;~ Global $aArray [5][2] = [[$sHost,"Host"],[$sUser,"Usuario"],[$sPass,"Pass"],[$sDB,"Database"],[$iPorta,"Porta"]] Local $aArray [5] = [$sHost,$sUser,$sPass,$sDB,$iPorta] Global $aLoop [5] = ["Host ","Usuario ","Password ","Database ","Porta "] if not FileExists($sIni) Then For $i = 0 to 4 if $aArray[$i] = "" Then $aArray [$i] = InputBox("Campo não pode ser nulo!", 'Digite um valor para o campo "' & $aLoop[$i] & '": ') EndIf IniWrite($sIni,$sSetor,$aLoop[$i],$aArray[$i]) Next Else $sLerINI = IniReadSection($sIni,$sSetor) $sDividirString = StringSplit($sLerINI,"=") For $i = 1 to $sLerINI [0][0] if $sLerINI = 1 Then $aArray [$i] = $sLerINI[$i][1] EndIf Next
  7. Olhando aqui por cima, ja vi oque tinha errado eu tinha feito mais ou menos dessa forma porem do jeito que fiz não funcionava Tinha feito assim     For $i = 1 to 4 if $aArray[$i]= "" Then      for $i = 0 to $aArray [4] $aArray [$i] = InputBox("", "Digite um valor para o "&$array[$i]) EndIf Next       Edit - Meu codigo onde estou , porem do jeito que ta, as variaveis não estão recebendo os valores do inputbox, pois não está atribuindo a cada variável, PQ QUANDO mando o IniWriteSection criar ele não acha nada alem do primeiro parametro do array   Local $sConecta,$sHost="",$sUser="",$sPass="",$sDB="",$iPorta="" Global $sIni = @ScriptDir & "\config.ini", $sSetor = "Configuracao" Global $aArray [5] = [$sHost,$sUser,$sPass,$sDB,$iPorta] Local $aConfig [5][2] = [["Host ",$sHost],["Usuario ",$sUser],["Senha ",$sPass],["Database ",$sDB],["Porta ",$iPorta]] Global $aLoop [5] = ["Host","Usuario","Password","Database","Porta"] if not FileExists($sIni) Then For $i = 0 to 4 if $aArray[$i]= "" Then $aArray [$i] = InputBox("Campo não pode ser nulo!", 'Digite um valor para o campo "' & $aLoop[$i] & '": ') EndIf Next IniWriteSection($sIni,$sSetor,$aConfig,0) Else $sLerINI = IniReadSection($sIni,$sSetor) $sDividirString = StringSplit($sLerINI,"=") For $i = 1 to $sLerINI [0][0] MsgBox(0,"",$sLerINI[$i][1] ) Next endif 
  8. ISN Autoit Studio (Similar ao Koda)

    Essa IDE, é a melhor, quando voce tem trabalho grande a se fazer, um projeto Ela facilita e muito, organiza bem, cria backups, temos arvore de projeto, podemos criar arquivos, INI , txt direto dela, sem falar no Form studio, , da pra faze muita coisa com ela Problema e que ela ainda continua sendo pesada, eu possuo um ucp i7+8gb, e ainda ela da umas travadas quando por exemplo vamos digitar algo, quando ele verifica a palavra que ta digitando, Tirando isso, esse projeto é excelente Eu utilizo ele quando preciso de projeto organizado A ferramenta grafica para crição de GUI (ISN Form Studio 2), é muito boa, me arrisco a dizer que é melhor que o KODA é um IDE excelente, só nao recomendo para quem não tem maquina muito rapida, por que senão nao rola, Mais por ser gratuita ainda, não podemos cobrar tanto néh pessoa, o desenvolvedor alemão , disse que muita coisa sera arrumada em relação a crash do programa.
  9. Olá amigos, estou começando um projeto E empaquei em porem, como verifico se uma variavel possui conteudo em branco, dentro de um array Tenho a seguinte $array   Global $aArray [5] = [$sHost,$sUser,$sPass,$sDB,$iPorta]   Preciso verificar se cada variavel esta em branco, se estiverem, precisar iniciar um loop, por exemplo com inputbox, para então atribuir valores a cada variavel dentro do array Muito obrigado a todos. Estou com projeto de fazer um programa controle de estoque/vendas, e vou utilizar MySQL como banco, mais ainda preciso criar para que assim que programa for aberto ele verifica, arquivo .INI se tive tudo okay entao ele prossegue, más senão estiver ele inicia o configurador, (mais isso e mais pra frente, te muito chao ainda heheh) Enfim problema que empaquei foi esse, acima, já vasculhei help mais não achei nada do genero , mais vo continuar procurando, as vezes acho algo que me ajuda, por que quem procura acha :D
  10. Player de Música com playlist

    Quando clica em alguma musica na lista, ele ta selecionando a pasta que está o executável.
  11. Peço desculpa esqueça oque disse, ignorância minha, não pensei direito estava me referindo se no caso o usuario usar algum programa que faz download da pagina (Ex: HTTrack), mais mesmo assim pensando aqui ele não terá acesso ao codigo fonte do php, voce tem razão Fiz o teste aqui e só ira retorna 01 ou 02, ( Ex: http://www.autoitbrasil.com/teste/login.php )   #include <Inet.au3>   $Dominio  = "autoitbrasil.com" ;~ coloca o dominio criado no freewebhostingarea.com   $SaveFile = "Config.dll" If FileExists($SaveFile) Then $Username = IniRead($SaveFile,"Cadastro","Username","") $Password = IniRead($SaveFile,"Cadastro","Password","") If $Username == "" Then $Username = "user1" If $Password == "" Then $Password = "123456" Else $Username = "user1" $Password = "123456" EndIf $Servidor  = _INetGetSource("http://"&$Dominio&"/teste/login.php?user=" &$Username& "&pass=" &$Password) If $Servidor = 01 Then IniWrite($SaveFile,"Cadastro","Username",$Username) IniWrite($SaveFile,"Cadastro","Password",$Password) ConsoleWrite("01 = Sucesso" & @LF & "02 = Falha" & @LF & "Resultado = " & $Servidor & @LF) Else IniWrite($SaveFile,"Cadastro","Username","") IniWrite($SaveFile,"Cadastro","Password","") ConsoleWrite("01 = Sucesso" & @LF & "02 = Falha" & @LF & "Resultado = " & $Servidor & @LF) EndIf   Más não impede de fazer conexao com banco tambem, caso tenha um WEBSITE o cliente cadastrado podera usar, seria uma forma bem segura, tambem podendo cancelar o serviço do usuario, caso necessite que o programa abra tendo apenas conexao com web http://www.autoitbrasil.com/index.php?/topic/13-login-para-programa/#entry85 mesmo principio que seu mais, utilizando mysql, porem a conexao não esta direta autoit + banco está pelo metodo _GET
  12. @Cleber Ferreira, dessa forma se o usuario de alguma forma conseguir o link http://www.site..com/login.php, ele tera todos os usuarios e senhas contido no codigo fonte do .php A forma mais segura seria ele fazer a consulta no banco mysql atraves do link, Se fizer dessa forma buscando o usuario e senha no banco de dados fica 100% seguro em comparação com forma que está buscando os os dados direto no login.php
  13. Tutorial Ler uma XML

    Meus parabens Alexandre, gostei muito, explicou bem oque estava apresentando na video tutorial E esse tipo de tutoriais que precisamos :D
  14. Menu em HTML (CSS)

    Opa, gostei, fica bem mais elegante Boa iniciativa
  15. já tentou usar o Sandboxies ? Com ele é possível executar o mesmo executável duas ou mais vezes, vi um rapaz usando em uma lan house a um tempão atras
×