Ir para conteúdo
Fórum Script Brasil

C.J.

Membros
  • Total de itens

    68
  • Registro em

  • Última visita

Tudo que C.J. postou

  1. Como mudar a cor do MainMenu para tirar aquele BEGE dele.. Abraços
  2. Bom estava tentando fazer um programa para enviar mensagens automaticamente para o MSN... Usei da seguinte logica... meio iniciante + para o proposito axava que estava otima... Memo1.SelectAll; Memo1.CopyToClipboard; end; keybd_event(vk_control,0,0,0); keybd_event(Ord('V'),0,0,0); keybd_event(vk_control,0,KEYEVENTF_KEYUP,0); keybd_event(vk_return,0,0,0); keybd_event (VK_MENU, 0, 0, 0); keybd_event(VK_F4, 0, 0, 0); Ele basicamente copiava a mensagem e envia a msg... porem com essa minha logica apos o termino do processo o teclado fica totalmente disconfigurado não sei porque só resolve se reiniciar o PC... gostaria de saber se alguém tem uma solução ou até outra forma de fazer isso que estou tentando... abraços é para o programa copiar a MSG do Memo1 e depois copiar na janela do MSN... ele até faiz o processo + depois que entra a parte que o teclado desconfigura... se não fui claro me avisem abraços
  3. Não sei se essa é a area correta.. Utilizo o Dream MX.. e não quero mais utilizar Frames... queria utilizar tabelas em meu site porem quero que quando clicar no link a pagina abriria na Tabela Central.. igual se fraz com frame... Poem no link Main Frame... gostaria que quando clicar a pagina aberta estive-se na tabela do meio... Abraços e se não fui claro me avisem
  4. C.J.

    Duvida Sistema de Upload

    agora deu esse erro: Warning: move_uploaded_file() [function.move-uploaded-file]: Unable to access uploads/Batch Encrypt.exe in /home/dslab/public_html/upload/upload.php on line 9 Possible file upload attack! Here is some more debugging info:Array ( [userfile] => Array ( [name] => Batch Encrypt.exe [type] => application/octet-stream [tmp_name] => /tmp/phpmAD2wf [error] => 0 => 38050 ) ) AFF nunca pensei que fazer um Uploader era tão complicado... Abraços
  5. C.J.

    Duvida Sistema de Upload

    Aparece isto: Possible file upload attack! Here is some more debugging info:Array ( [userfile] => Array ( [name] => Batch Encrypt.exe [type] => [tmp_name] => [error] => 2 => 0 ) ) Usei o Seguinte Script: <?php // In PHP versions earlier than 4.1.0, $HTTP_POST_FILES should be used instead // of $_FILES. $uploaddir = '/var/www/uploads/'; $uploadfile = $uploaddir . basename($_FILES['userfile']['name']); echo '<pre>'; if (move_uploaded_file($_FILES['userfile']['tmp_name'], $uploadfile)) { echo "File is valid, and was successfully uploaded.\n"; } else { echo "Possible file upload attack!\n"; } echo 'Here is some more debugging info:'; print_r($_FILES); print "</pre>"; ?> Abraços e desde já Obrigado
  6. C.J.

    Duvida Sistema de Upload

    caramba... mesmo assim não estou conseguindo... sera que alguém tem um script pronto já?? Abraços
  7. C.J.

    Duvida Sistema de Upload

    Sim mas mesmo com aquele não consegui configura-lo... sera q você pode me explicar como configuralo?
  8. C.J.

    Duvida Sistema de Upload

    bom Li o manual e mesmo assim continuo com duvida... sera que alguerm tem um script de upload funcionando?? Abraços
  9. C.J.

    Duvida Sistema de Upload

    Já peguei tudo quanto é codigo e nenhum funciona mesmo configurando... peguei esse codigo e queria saber oque fiz de errado.. Upload.htm <html> <body> <form action="upload.php" method="POST" enctype="multipart/form-data"> Arquivo: <input type="file" name="file"><br> <input type="submit" value="Enviar"> </form> </body> </html> Upload.php <?php $destino = "upload/"; //Pasta onde serão armazenados os uploads $mandar = $destino."/".$file_name; if(!move_uploaded_file($file, $mandar)) { echo "O arquivo não pode ser enviado!"; } else { echo "O arquivo foi enviado!"; } echo"Quer enviar mais arquivos? <a class=\"link\" href=\"upload.htm\">Clique aqui</a>" ?> a pasta no meu servidor chama upload oque eu fiz de errado que não envia os arquivos? Já habiliteri 777...
  10. C.J.

    duvida com Keybd

    o Jonas já falou que estou matando apertado o ctrl como apertar e soltar?
  11. C.J.

    duvida com Keybd

    como arrumo isto/
  12. Bom precisei criar um aplicativo para automatizar uma função em minha casa... usei o seguinte codigo: Memo1.SelectAll; Memo1.CopyToClipboard; end; keybd_event(vk_control,0,0,0); keybd_event(Ord('V'),0,0,0); keybd_event(vk_control,0,KEYEVENTF_KEYUP,0); keybd_event(vk_return,0,0,0); keybd_event (VK_MENU, 0, 0, 0); keybd_event(VK_F4, 0, 0, 0); só que depois de realizar todo o procedimento o meu teclado fica louco, eu aperto A ele aperta ESC etc alguém sabe o porque disto? ou uma outra forma de usar essa função + sem usar tantos Keybd? Abraços
  13. Bom Estava fazendo meu programa quando vou clicar para add o codigo no botao começa a dar erro e ai em todos os outros botoes que ainda não tinha codigo começaram a dar erro tambem Veja a foto: O meu delphi está dando muitos erros depois que retirei o Induc. sera que tem algo haver Espero urgentimente uma ajuda obrigado
  14. Boa Noite estou precisando criar um programa que coloque uma key em uma chave de registro... estou com dificuldades. seria colocar o registro de um programa automaticamente na key dele, Abraços
  15. C.J.

    Duvida com Random

    Esse codigo gera senhas aleatorias procedure TForm1.Button1Click(Sender: TObject); var i: integer; const str = '1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ'; max = 6; begin Edit1.Text := ''; for i := 1 to max do Edit1.Text := Edit1.Text + str[random(length(str))+1]; edit2.Text:='.....'; end; so q em vez do MAX = 6; eu quero q ele gera a quantidade que estiver em um edit... e a das palavras vo testar abraços
  16. C.J.

    Duvida com Random

    em que local eu coloco o code: Edit1.text:= length(Edit2.text);
  17. C.J.

    Duvida com Random

    É escolher palavras inteiras ;D e vo testa o que você me falo Abraços é eu coloco o code q você me passo em q local?
  18. Bom achei um code na internet... procedure TForm1.Button1Click(Sender: TObject); var i: integer; const str = '1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ'; max = 6; begin Edit1.Text := ''; for i := 1 to max do Edit1.Text := Edit1.Text + str[random(length(str))+1]; edit2.Text:='.....'; end; como eu adapto ele para gerar a quantidade caracteres que estiver em um edit?? e tambem se tem como usar random para gerar palavras ex: Pera Maça Abraços
  19. C.J.

    Duvida com Instaler

    não, eu estou criando um programa de interface para chamar os arquivos de um jogo que eu criei, só q ele vai instala as coisas por isso quero que chame o instaler ao clicar no botão...
  20. Bom estou criando um Instaler, o meu instaler ele apenas chama os arquivos que estão em um CD só que como eu faço para não precisar digitar Esse Comando para cada DISCO não tem como ele localizar automaticamente o disco do CD e executar tal programa? WINEXEC('A:\autoexe.EXE', SW_SHOWNORMAL) Abrasços Se não fui Claro me avisem
  21. bom o XP Manifest creio eu que seja para deixar os botoes no estilo do Win Xp..
  22. C.J.

    Duvida Delphi com DOS

    hmm, Seria mesmo por Aprendizado... tá certo Churc Vlw cara
  23. C.J.

    Duvida Delphi com DOS

    apenas texto? n da pra executar nenhum comando?
×
×
  • Criar Novo...