Cześć @LL
Jak po naciśnięciu przycisku szybko wysłać maila na wklepany adres e-mail (jeśli możliwe, nie otwierając Outlooka), automatycznie załączając pliki: c:\x.jpg oraz c:\x.txt ?
Cześć @LL
Jak po naciśnięciu przycisku szybko wysłać maila na wklepany adres e-mail (jeśli możliwe, nie otwierając Outlooka), automatycznie załączając pliki: c:\x.jpg oraz c:\x.txt ?
użyj komponentów......
albo webbrowsera i tam skrypt php......
Czyli chcesz żeby użytkownik sie nie dowiedział ze wysyla maila?? :)))
hehe ok
Albo używasz INDY (TidPOP3,TidSMTP)
lub FASTNET (NMPOP3,NMSMTP)
lub tez komponentu np mail2000
Ja ci podam procke przy użyciu NMSMTP..
POLACZENIE
NMSMTP1.Host := adressmtp.Text;
NMSMTP1.UserID := User.Text;
NMSMTP1.Connect;
WYSLANIE
W celu uzyskania wiekszej informacji poczytaj o komoponencie NMSMTP z FASTNETu
pamietaj ze jezeli uzytkownik ma antyvirusa skanującego pocztę,to się włączy w chwuili wysylania tego maila..
Dzięki!!
Nie zamierzam wysyłać wirusów :
Polecam dodać funkcję sprawdzającom połączenie z Netem jeśli jest ktoś połączony to wtedy wysyła maila ;)
Do uses dodaj WinInet !!!
function connected:boolean;
var
Flags: DWORD;
Connected: boolean;
begin
Flags := INTERNET_CONNECTION_MODEM or INTERNET_CONNECTION_LAN or
INTERNET_CONNECTION_PROXY or INTERNET_CONNECTION_MODEM_BUSY;
Result := InternetGetConnectedState(@Flags, 0);
end;
Funkcja zwraca wartość True-jeśli jesteś połączony i False jeśli nie ;)
np:
if (connected) then begin
// wysyłanie maila
// powiadamianie o wysłaniu
// itp
end;
thx :)
Można też użyć pakietu ICS
polecam!!!!
Gdzie mozna sciagnac FASTNET (NMPOP3,NMSMTP) ?
Gdzie mozna sciagnac FASTNET (NMPOP3,NMSMTP) ?
Tu http://www.netmastersllc.com/Shopping/ListProducts/default.asp
Płatne....sam nie mam ;-( mam źródła programu, który wymaga tego NMSMTP...i d**@, (D6PE) .
"PPP" ma racje ,po przeczytaniu tego posta INC sobie sciągnąłem i wygląda bardzo interesująco, ma to czego szukałem. (http://overbyte.delphicenter.com/frame_index.html)..heh musze wysłać kartke z pozdrowieniami do Belgii :-D
Możecie załatwić sobie delphi 5 enterprise tam są komponenty FASTNET :-) :-) :-)