SMTP und ESMTP mit der 39dll (E-Mails versenden)

    • Skript

    • SMTP und ESMTP mit der 39dll (E-Mails versenden)

      Hallo,
      ich hab mich wieder mal kurz mit SMTP befasst (Wikipedia und so) und hab es gerade geschafft eine E-Mail mit diese Skripten an mich selbst zu schicken, das ganze ist eigentlich Recht einfach. Der Nachteil es gibt keine Fehler Behandlung, ich hab das ganze mit Web.de getestet (ESMTP). SMTP wird verwendet um E-Mails zu versenden, meistens.

      Download: henrik1235.bplaced.net/upload/data/smtp.zip
      Informationen zu SMTP und ESMTP:
      de.wikipedia.org/wiki/Simple_Mail_Transfer_Protocol
      de.wikipedia.org/wiki/SMTP-Auth
      Noch irgendwelche Hinweise:
      Es gibt nur wenig Fehlerbehandlung. :S Es gibt sehr viele Argumente die man in den Skripts nachlesen kann. Es wird
      39dll Version 2.5 verwendet.


      Skripte in GML Code: [hide='smtp']

      GML-Quellcode

      1. /*Versende E-Mails per SMTP mit der 39dll
      2. Achtung hier wird SMTP verwenden, wenn es einen Server gibt der ESMTP braucht (z.B. web.de)
      3. musst du das Skript ESMTP nehmen und es gibt nur wenig Fehlerbehandlung.
      4. by henrik1235
      6. Argumente
      7. 0:Server
      8. 1:Port(Standart 25)
      9. 2:Name
      10. 3:Von E-Mail
      11. 4:Für E-Mail
      12. 5:Betreff
      13. 6:Text
      15. Return:
      16. (Real)1 wenn es gut ging
      17. (String)Fehler*/
      19. //Verbindung
      20. var server;
      21. server=tcpconnect(argument0,argument1,1);
      22. if (server<=0) { return "No connection"; }
      23. setformat(server,1,chr(10));
      25. //Versenden
      26. var step,size,str;
      27. step=0;
      28. size=0;
      29. while(1)
      30. {
      31. size=receivemessage(server);
      32. if (size==0) { return "Connection lost."; }
      33. if (size>0)
      34. {
      35. str=readchars(bytesleft());
      36. if (string_char_at(str,1)!="2") { return str; }
      37. switch(step)
      38. {
      39. case 0:
      40. clearbuffer(); writechars("HELO "+argument2); sendmessage(server);
      41. break;
      42. case 1:
      43. clearbuffer(); writechars("MAIL FROM:<"+argument3+">" ); sendmessage(server);
      44. break;
      45. case 2:
      46. clearbuffer(); writechars("RCPT TO:<"+argument4+">" ); sendmessage(server);
      47. break;
      48. case 3:
      49. clearbuffer(); writechars("DATA"); sendmessage(server);
      50. break;
      51. case 4:
      52. var str;
      53. str="From: <"+argument3+">"+chr(10);
      54. str+="To: <"+argument4+">"+chr(10);
      55. str+="Subject: <"+argument5+">"+chr(10);
      56. str+=chr(10)+argument6;
      57. str+=chr(10)+".";
      58. clearbuffer(); writechars(str); sendmessage(server);
      59. break;
      60. case 5:
      61. clearbuffer(); writechars("QUIT"); sendmessage(server); closesocket(server);
      62. return 1;
      63. break;
      64. }
      65. step+=1;
      66. }
      67. }
      Alles anzeigen
      [/hide]
      [hide='esmtp']

      GML-Quellcode

      1. /*Versende E-Mails per ESMTP mit der 39dll
      2. Achtung es wird ESMTP mit der Authentifizierung Login verwendet und es gibt nur wenig Fehlerbehandlung.
      3. by henrik1235
      5. Argumente
      6. 0:Server
      7. 1:Port(Standart 25)
      8. 2:Name
      9. 3:Benutzername mit base64 kodiert
      10. 4:Passwort mit base64 kodiert
      11. 5:Von E-Mail
      12. 6:Für E-Mail
      13. 7:Betreff
      14. 8:Text
      16. Return:
      17. (Real) 1 wenn es gut ging
      18. (String)Fehler*/
      20. //Verbindung
      21. var server;
      22. server=tcpconnect(argument0,argument1,1);
      23. if (server<=0) { return "No connection"; }
      24. setformat(server,1,chr(10));
      26. //Versenden
      27. var step,size;
      28. step=0;
      29. size=0;
      30. while(1)
      31. {
      32. size=receivemessage(server);
      33. if (size==0) { return "Connection lost"; }
      34. if (size>0)
      35. {
      36. str=readchars(bytesleft());
      37. if (string_char_at(str,1)!="2") and (step!=2) and (step!=3) { return str; }
      38. switch(step)
      39. {
      40. case 0:
      41. clearbuffer(); writechars("EHLO "+argument2); sendmessage(server);
      42. break;
      43. case 1:
      44. clearbuffer(); writechars("AUTH LOGIN"); sendmessage(server);
      45. break;
      46. case 2:
      47. clearbuffer(); writechars(argument3); sendmessage(server);
      48. break;
      49. case 3:
      50. clearbuffer(); writechars(argument4); sendmessage(server);
      51. break;
      52. case 4:
      53. clearbuffer(); writechars("MAIL FROM:<"+argument5+">" ); sendmessage(server);
      54. break;
      55. case 5:
      56. clearbuffer(); writechars("RCPT TO:<"+argument6+">" ); sendmessage(server);
      57. break;
      58. case 6:
      59. clearbuffer(); writechars("DATA"); sendmessage(server);
      60. break;
      61. case 7:
      62. var str;
      63. str="From: <"+argument5+">"+chr(10);
      64. str+="To: <"+argument6+">"+chr(10);
      65. str+="Subject: "+argument7+chr(10);
      66. str+=chr(10)+argument8;
      67. str+=chr(10)+".";
      68. clearbuffer(); writechars(str); sendmessage(server);
      69. break;
      70. case 8:
      71. clearbuffer(); writechars("QUIT"); sendmessage(server); closesocket(server);
      72. return 1;
      73. break;
      74. }
      75. step+=1;
      76. }
      77. }
      Alles anzeigen
      [/hide]


      MfG henrik1235
      Ps.: Falls ihr es verwendet in irgendein Spiel, ist es euch überlassen mich zu nennen, ich meine es kann ja jeder selber machen so ein Skript wenn er Wikipedia liest. ^^
      wupto.net/ Nicht meine Seite!
      We love Koalas.

      GM-D-Spam-o-Meter: 32%

      Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von henrik1235 ()

    • Da meine Skripte keine Fehler Behandlung machen, bau ich vielleicht. noch ein. Liegt es daran das du dein Passwort+Benutzter Name nicht base64 kodiert ein gibst? Ich baue mal schnell eine Fehlerbehandlung ein.^^
      #edit: Fertig, eine sehr wenige Fehlerbehandlung
      wupto.net/ Nicht meine Seite!
      We love Koalas.

      GM-D-Spam-o-Meter: 32%

      Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von henrik1235 ()