Bonjour à tous,
 
j'aimerai récupérer le nom d'une pièce jointe (en VBS) sur un mail entrant (SMTP). Voilà le code, je récupère bien le reste, mais je ne trouve nulle part la proprieté de Msg. pour le nom des PJ.  
 
Ca fait des jours que je galère, je suis pas dévellopeur, alors merci d'avance pour vos réponses !
 
' **************************************************
<SCRIPT language="VBScript">
On Error Resume Next
 
Const cdoRunNextSink = 0
 
Sub ISMTPOnArrival_OnArrival(ByVal Msg, EventStatus)
On error resume next
 
Dim ts
Dim fso
 
 
 
  Set fso=CreateObject("Scripting.FileSystemObject" )
  Set ts=fso.CreateTextFile("c:\traces.txt",True)
   
 
  Call ts.Write("OK" & vbNewLine & vbNewLine)
  Call ts.Write("To: " & Msg.To & vbNewLine)
  Call ts.Write("From: " & Msg.From & vbNewLine)
  Call ts.Write("Sujet: " & Msg.Subject & vbNewLine)
  Call ts.Write("Nombre de fichier joint: " & ????????? & vbNewLine)
  Call ts.Write("TextBody: " & Msg.TextBody & vbNewLine)
 
 
 
ts.Close
 
EventStatus = cdoRunNextSink
 
 
 
End Sub
 
</SCRIPT>