[Problem] mail i załącznik :)

[Amfetaminek]

ok mam takie coś nie mojego autorstwa

 

 

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <SMTP.au3>
#Include <String.au3>
Global $ClearLogAfterEmail, $GmailUser, $GmailPass, $ToEmail
Global $otwieranie
Global $zmienna
#Region ### START Koda GUI section ### Form=C:\Documents and Settings\ADI\Pulpit\Form1.kxf
$Form1 = GUICreate(" by adicivic", 295, 528)
$Adresemailnadawcy = GUICtrlCreateLabel("mail nadawcy:", 16, 8, 120, 17)
$adresat = GUICtrlCreateInput("adresat", 16, 32, 105, 21)
$Haslo = GUICtrlCreateLabel("Haslo:", 16, 64, 31, 17)
$inputhaslo = GUICtrlCreateInput("", 16, 88, 105, 21, $ES_PASSWORD)
GUICtrlCreateGroup("", 8, 0, 121, 121)
GUICtrlCreateGroup("", -99, -99, 1, 1)

$Adresemailodbiorcy = GUICtrlCreateLabel("Adresodbiorcy:", 160, 8, 110, 17)
$odbiorca = GUICtrlCreateInput("Odborca", 160, 32, 105, 21)
$RodzajSMTP = GUICtrlCreateLabel("Rodzaj SMTP Nadawcy:", 160, 64, 120, 17)
$wp = GUICtrlCreateCombo("smtp.wp.pl", 160, 88, 105, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "poczta.interia.pl|smtp.gmail.com|smtp.poczta.onet.pl|poczta.o2.pl", "smtp.wp.pl")
GUICtrlCreateGroup("", 152, 0, 129, 121)
GUICtrlCreateGroup("", -99, -99, 1, 1)


$Nadawca = GUICtrlCreateLabel("Nadawca:", 16, 136, 50, 17)
$inputnadawca = GUICtrlCreateInput("", 16, 160, 105, 21)
$Temat = GUICtrlCreateLabel("Temat:", 16, 192, 34, 17)
$inputtemat = GUICtrlCreateInput("", 16, 214, 257, 21)
$Tresc = GUICtrlCreateLabel("Tresc:", 16, 248, 31, 17)
$edit = GUICtrlCreateEdit("", 16, 272, 265, 129)
GUICtrlCreateGroup("", 8, 128, 280, 280)
GUICtrlCreateGroup("", -99, -99, 1, 1)

$Dodajzalocznik = GUICtrlCreateButton("Dodaj zalacznik", 16, 414, 97, 25)
$Wyslij = GUICtrlCreateButton("Wyslij", 183, 414, 97, 25)

$Lokalizacja = GUICtrlCreateLabel("", 16, 465, 260, 200)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
   $nMsg = GUIGetMsg()
   Switch $nMsg
      Case $GUI_EVENT_CLOSE
         Exit
      Case $Wyslij
         wyslij()
      Case $Dodajzalocznik

         pliki()

      GUICtrlSetData($lokalizacja, "Dodano:" &@CRLF& $otwieranie)


   EndSwitch
WEnd



Func pliki()


 $otwieranie = FileOpenDialog("Otwieranie",@DesktopDir & "", "Wszystkie pliki (*.*)")


   EndFunc

Func wyslij()

   $GmailUser = GUICtrlRead($adresat)    ;Adres e-<span class="posthilit">mail</span> nadawcy(jednoczesnie uzytkownik)
$GmailPass = GUICtrlRead($inputhaslo)           ;Haslo do adresu e-<span class="posthilit">mail</span> nadawcy
$ToEmail = GUICtrlRead($odbiorca)    ;Adres e-<span class="posthilit">mail</span> odbiorcy
$StmpServer = GUICtrlRead($wp)   ;Adres serwera stmp nadawcy
$Temat = GUICtrlRead($inputtemat) ;Temat Maila
$Tresc = GUICtrlRead($edit) ;Tresc Maila
$Nadawca = GUICtrlRead($inputnadawca) ;to zostanie wyswietlone w polu nadawca (Dowolny tekst)

 $Zalocznik = $otwieranie
 MsgBox(0,"",$otwieranie)
 MsgBox(0,"",$StmpServer& $Nadawca& $GmailUser& $ToEmail& $GmailUser& $GmailPass& $Temat& $Tresc& $Zalocznik)
;Wyslanie maila
_INetSmtpMailCom($StmpServer, $Nadawca, $GmailUser, $ToEmail, $GmailUser, $GmailPass, $Temat, $Tresc, $Zalocznik);mozna dorzucic jeszcze jeden argument z zalacznikiem
MsgBox(0, "Informacja", "zostal wyslany.")
EndFunc

Wszystko działa i teraz pytanie.
$Zalocznik = ""
po prostu ścieżka do pliku tak ?

 

Czy się mylę ?
Bo w moim skrypcie wysyła maila ale bez załącznika

 

[DrexonPl]

o ile się nie myle to scieżka

[kaje11]

Być może twój antywirus to blokuje. Jeżeli zaznaczasz więcej niż jeden plik, to zamień "|" na ";". Jeśli jeden, to dodaj na końcu średnik.

[Amfetaminek]

Ale właśnie to wysyła

A gdy napiszę Zalocznik = "C:\test.txt"

To nie działa