UPload Dowload files with rgss!!!!! Ayuda criar una window!!!!!

    Compartilhe

    urbios
    Iniciante
    Iniciante

    Mensagens : 75
    Créditos : 21

    UPload Dowload files with rgss!!!!! Ayuda criar una window!!!!!

    Mensagem por urbios em Sab Ago 01, 2015 3:59 pm



    http://www.rpg-maker.fr/index.php?page=scripts&id=211 orignial link script




    Olá amigos, eu preciso saber com urgência. e eu posso usar este código de script. Meu problema é que eu tenho que projetar um wiindow. i exibir arquivos de downloads. mas o script só vem com nenhuma janela. um dia me adicionar uma janela .com o progresso do download que eu gosto na foto, por favor. mui me é urgente esse script. O atualizador usará como meu jogo. porfabor se alguém puder ajudar, eu vou ser eternamente grato

    here the script T.T








    Código:


    #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

    #                    Telechargement de fichiers avec Rmxp

    #  par berka                      v 2.1                     rgss 1

    #                          www.rpgmakervx-fr.com                                          

    #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

    # ! Ne pas utiliser de serveur ftp contenant ds données perso et confidentielles

    # ! ce script possède vos identifiants ftp: un  crack du projet les rend publics

    #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

    # Ftp :

    #     ▼ Recevoir :

    #           Net:tp.download("dos_sur_ftp/fichier.zip","./Graphics")

    #     ▼ Envoyer :

    #           Net:tp.upload("./Graphics/fichier.zip","/dos_sur_ftp/fichier.zip")

    #     ▼ Créer un répertoire distant :

    #           Net:tp.mkdir("/dos_sur_ftp")

    # Http :

    #     ▼ recevoir :

    #           Net::Http.download("url","./Graphics")

    #     ▼ total octets téléchargés :

    #           Net::HTTP.transfered

    #     ▼ Taille du fichier :

    #           Net::HTTP.size("test.zip")

    #     ▼ % de progression :

    #           Net::HTTP.progress("test.zip")

    #     ▼ temps de transfert individuel:

    #           Net::HTTP.temps("test.zip")

    #     ▼ fichiers à télécharger :

    #           Net::HTTP.transfers

    #     ▼ fichier téléchargé ? :

    #           Net::HTTP.loaded?("test.zip")

    #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

    module Berka

      module NetError

        ErrConIn="Impossible de se connecter à Internet"

        ErrConFtp="Impossible de se connecter au Ftp"

        ErrConHttp="Impossible de se connecter au Serveur"

        ErrNoFFtpIn="Le fichier à recevoir n'existe pas"

        ErrNoFFtpEx="Le fichier à envoyer n'existe pas"

        ErrTranHttp="Le téléchargement Http a échoué"

        ErrDownFtp="Le téléchargement Ftp a échoué"

        ErrUpFtp="L'envoi Ftp a échoué"

        ErrNoFile="Aucun fichier à télécharger"

        ErrMkdir="Impossible de créer le répertoire distant"

      end

    end

    module Net

      W='wininet'

      SPC=Win32API.new('kernel32','SetPriorityClass','pi','i').call(-1,128)

      IOA=Win32API.new(W,'InternetOpenA','plppl','l').call('',0,'','',0)

      IC=Win32API.new(W,'InternetConnectA','lplpplll','l')

      print(Berka::NetErrorErr::ConIn)if IOA==0

      module FTP

        FSCD=Win32API.new(W,'FtpSetCurrentDirectoryA','lp','l')

        FGF=Win32API.new(W,'FtpGetFileA','lppllll','l')

        FPF=Win32API.new(W,'FtpPutFile','lppll','l')

        FCD=Win32API.new(W,'FtpCreateDirectoryA','lp','l')

        module_function    

        def init

          #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-#

          ftp="ftp.server.com"          #

          port=21                       #  A modifier !

          identifiant="user"            #

          motdepasse="password"         #

          #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-#

          @fb=IC.call(IOA,ftp,port,identifiant,motdepasse,1,0,0)

          ftp,port,identifiant,motdepasse=[nil]*4 # efface les ids par sécurité

          (print(Berka::NetError::ErrConFtp))if @fb==0

        end

        def download(ext,int='./')

          init if @fb.nil?    

          c=ext.split('/').pop

          if FSCD.call(@fb,ext.gsub(c,''))!=0

            print(Berka::NetErrorErr::ErrDownFtp)if FGF.call(@fb,c,"#{int}/#{c}",0,32,2,0)==0

          else

            print(Berka::NetErrorErr::ErrNoFFtpIn)

          end

        end

        def mkdir(rep)

          init if @fb.nil?

          print(Berka::NetErrorErr::ErrMkdir)if FCD.call(@fb,rep)==0

        end

        def upload(int,ext)

          init if @fb.nil?

          if FSCD.call(@fb,ext)&&File.exist?(int)

            print(Berka::NetErrorErr::ErrUpFtp)if FPF.call(@fb,int,ext,2,0)==0

          else

            print(Berka::NetErrorErr::ErrNoFFtpEx)

          end

        end

      end

      #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

      module HTTP

        IOU=Win32API.new(W,'InternetOpenUrl','lppllp','l')

        IRF=Win32API.new(W,'InternetReadFile','lpip','l')

        ICH=Win32API.new(W,'InternetCloseHandle','l','l')

        HQI=Win32API.new(W,'HttpQueryInfo','llppp','i')

        module_function

        def sizeloaded(i='');@read;end

        def transfered;@dloaded;end

        def transfers;@dls;end

        def progress(i='');(@read.to_f/@size*100);end

        def loaded?(i='');@read>=@sizerescue nil;end

        def temps(i='');@tpsif loaded?(i);end

        def size(i='');@size;end

        def download(url,int='./')

          @dloaded||=0;@dls||={};@i||=-1;@size||={};@read||={};@tps={}

          a=url.split('/');serv,root,fich=a[2],a[3..a.size].join('/'),a[-1]

          print(Berka::NetErrorErr::ErrNoFile)if fich.nil?

          @dls[fich]=Thread.start(url,int){|url,int|txt='';t=Time.now

          Berka::NetErrorErr::ErrConHttp if(e=IC.call(IOA,serv,80,'','',3,1,0))==0  

          f=IOU.call(IOA,url,nil,0,0,0)

          HQI.call(f,5,k="\0"*1024,[k.size-1].pack('l'),nil)

          @read[fich],@size[fich]=0,k.delete!("\0").to_i

          loop do

            buf,n=' '*1024,0

            r=IRF.call(f,buf,1024,o=[n].pack('i!'))

            n=o.unpack('i!')[0]

            break if r&&n==0

            txt << buf[0,n]

            @read[fich]=txt.size

          end

          (File.open(int+fich,'wb') << txt).close

          @dloaded+=@read[fich]

          ICH.call(f);sleep(0.01)

          @tps[fich]=Time.now-t}

        end

      end

    end


    _________________
    RPG maker XP in android? Razz :

      Data/hora atual: Ter Dez 06, 2016 2:53 pm