Aldeia RPG

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Suporte ao desenvolvimento de jogos


2 participantes

    Enviar Emails pelo RMXP

    RD12
    RD12
    Lenda
    Lenda


    Medalhas : Enviar Emails pelo RMXP 48080450Enviar Emails pelo RMXP Trophy11Enviar Emails pelo RMXP GIueZEnviar Emails pelo RMXP ZgLkiRU
    Mensagens : 1946
    Créditos : 745

    Enviar Emails pelo RMXP Empty Enviar Emails pelo RMXP

    Mensagem por RD12 Qui Fev 14, 2013 11:36 am

    Enviar Email

    Este script lhe permite enviar emails para um pessoa pelo Rmxp. Para fazê-lo usei PHP, o script apenas requisita o arquivo, fazendo ele enviar o email. O script seria maior se eu fizesse tudo pelo RMXP.
    O arquivo php já está hospedado, mas se você quiser hospedar no seu servidor eu estou postando o código aqui.

    Script

    Código:
    #:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=
    #Author: RD12         Enviar Email
    #:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=
    #Para enviar um email, chame este script:
    # $Email.send("Destino@host.com", "Assunto", "Mensagem")

    class Email

      def initialize
        @iou = Win32API.new('wininet','InternetOpenUrl','lppllp','l')
        @ioa = Win32API.new('wininet','InternetOpenA','plppl','l').call('',0,'','',0)
        @site = "http://arquivo.hospedado/receive.php?"
      end
        
      def send(email,assunto,mensagem)
        if !email.include?("@") or !email.include?(".")
          p "Email inválido"
          return
        end
        @send = @iou.call(@ioa,@site+"email=#{email}&assunto=#{assunto}&mensagem=#{mensagem}",nil,0,0,0)
      end
      
    end
    $Email = Email.new

    Instruções no script.

    Código php
    Uma página php deve ser hospedada em um site, cujo endereço deve ser inserido no script acima em @site = "http://arquivo.hospedado/receive.php?". Segue o código do arquivo .php
    Código:
    <?php
    $email = $_GET["email"];
    $assunto = $_GET["assunto"];
    $message = $_GET["mensagem"];

    $message = wordwrap($message, 70);

    // Send
    mail($email, $assunto, $message);
    ?>

    OBS: A mensagem pode ir parar na lixeira.

    Créditos RD12


    Última edição por RD12 em Dom Fev 18, 2018 11:20 am, editado 1 vez(es)
    Canjoo
    Canjoo
    Experiente
    Experiente


    Mensagens : 505
    Créditos : 52

    Enviar Emails pelo RMXP Empty Re: Enviar Emails pelo RMXP

    Mensagem por Canjoo Qui Fev 14, 2013 11:37 am

    Nem li, mas tenho certeza q é bom vou ler agora e dou um edit!

    EDIT: Muito bom RD12, se eu for continuar com meu jogo vou usa-lo para enviar alertas e coisas tipo promoções pros jogadores.

      Data/hora atual: Dom maio 19, 2024 6:32 pm