gérer d'autre programme

Backup · Message par **Backup** » mar. 06/déc./2005 15:06

gadjet35 · Message par **gadjet35** » mar. 06/déc./2005 15:21

eume vous auriez rien de un peu moi html sa fait depuis longtemps que je l'ai oublier celui la !

Chris · Message par **Chris** » mar. 06/déc./2005 15:40

AWEAR · Message par **AWEAR** » mar. 06/déc./2005 16:40

Woaw !

Fallait l'oser celle-là !

gadjet35 · Message par **gadjet35** » mar. 06/déc./2005 16:47

Chris · Message par **Chris** » mar. 06/déc./2005 16:48

AWEAR a écrit :Woaw !
Fallait l'oser celle-là !

Hein !!
Fallait oser quoi ?

AWEAR · Message par **AWEAR** » mar. 06/déc./2005 16:48

Demander une autre solution "moins html"..

Chris · Message par **Chris** » mar. 06/déc./2005 16:50

Ah ben c'est tout gadget ça!

Tu lui donnes le doigt, y te prends le bras!

C'est un Pitbull ce mec

gadjet35 · Message par **gadjet35** » mar. 06/déc./2005 17:21

oh sa va !

Chris · Message par **Chris** » mar. 06/déc./2005 18:00

gadjet35 a écrit :oh sa va !

Pas mal, oui!
Et toi?

CameleonTH · Message par **CameleonTH** » mar. 06/déc./2005 18:49

Mega lol mdr ptdr enfin tous quoi
La c'est le sujet MDR de Chris.

Et puis pour envoyer des mail il existe des librairie SMTP mais je ne les ai pas sous la main (ou pluto dans mon PC) donc je ne peut te donner les liens mais ils existe.

Flype · Message par **Flype** » sam. 17/déc./2005 15:57

on peux toujours conseiller cette lib :

PureSMTP de Gnozal

http://people.freenet.de/gnozal/
http://people.freenet.de/gnozal/PureSMTP.zip

Chris · Message par **Chris** » sam. 17/déc./2005 16:37

@Flype

Je ne suis pas sûr que l'utilisation d'une lib lui apprenne la programmation, et l'utilisation de la lib Network()

En cherchant un peu sur les forums , il y a des exemples de codes qui utilisent les fonctions de Purebasic pour l'envoi d'e-mail.

Les libs, c'est bien pour éviter de reprogrammer un truc, mais ça ne dispense pas de connaître un peu comment ca se code.

Enfin, c'est ce que j'en pense

gansta93 · Message par **gansta93** » sam. 17/déc./2005 17:35

Pour Outlook, il y a MAPI mais je c pas comment ça fonctione.

Gillou · Message par **Gillou** » dim. 18/déc./2005 19:43

Un code pour envoyer un email sans utiliser un programme externe

(Je l'utilise avec le serveur mail de ma boîte

)

Procedure send(msg.s)
Global resultSM.s, connectionID
SendNetworkData (connectionID,@msg, Len (msg))
EndProcedure

Procedure.l SendMail(ServerIP.s, mailto.s, mailfrom.s, subject.s, msgbody.s, port) ; Envoie un message à l'adresse mail choisie (vous pouvez utiliser GetIP pour obtenir l'adresse IP) (port=25 la plupart du temps)
Global resultSM.s, connectionID
If InitNetwork ()
connectionID = OpenNetworkConnection (ServerIP,port)
If connectionID
wait()
error=0
If resultSM= "220"
send( "HELO CGIapp" + #CRLF$ )
wait()
If resultSM= "250"
Delay (100)
send( "MAIL FROM: <" +mailfrom+ ">" + #CRLF$ )
wait()
If resultSM= "250"
send( "RCPT TO: <" +mailto+ ">" + #CRLF$ )
wait()
If resultSM= "250"
send( "DATA" + #CRLF$ )
wait()
If resultSM= "354"
Delay (100)
send( "Date: " + #CRLF$ )
send( "From: <" +mailfrom+ ">" + #CRLF$ )
send( "To: <" +mailto+ ">" + #CRLF$ )
send( "Subject: " +subject+ #CRLF$ )
send( "X-Mailer: PBMailer" + #CRLF$ )
Delay (100)
send( "--" + #CRLF$ + "--" + #CRLF$ + #CRLF$ )
send(msgbody)
Delay (100)
send( "" + #CRLF$ )
send( "." + #CRLF$ )
wait()
If resultSM= "250"
Delay (100)
send( "QUIT" + #CRLF$ )
wait()
ProcedureReturn 1
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
CloseNetworkConnection (connectionID)
EndIf
EndIf
EndProcedure