Frage

wewe

Gibt es irgendeine Anweißung die an alle in Outlook gespeicherte e-mail adressen ein text mit anhang verschickt??

net 0

wewe schrieb:

Gibt es irgendeine Anweißung die an alle in Outlook gespeicherte e-mail adressen ein text mit anhang verschickt??

ich glaub die hies 'ILOVEYOU.VBS'. den und ähnliche findeste garantiert irgendwo noch im netz

WebFritzi

Wie man im Adressbuch rumfummelt, weiß ich nicht. Aber hier ein Codeschnipsel zum Versenden von Emails:

#include <mapi.h>

VOID SendMail(HWND hwnd,
              LPTSTR adrReceiver,
              LPTSTR nameReceiver,
              LPTSTR adrFrom,
              LPTSTR nameFrom,
              LPTSTR subject,
              LPTSTR text)
{
     LPMAPISENDMAIL pfnSendMail;
     MapiRecipDesc  rdOriginator;
     MapiRecipDesc  rdRecipient[1];
     LPMAPILOGOFF   pfnLogoff;
     LPMAPILOGON    pfnLogon;
     MapiMessage    mapimsg;
     HINSTANCE      hDll;
     LHANDLE        lHnd;

     if(NULL == (hDll = LoadLibrary(TEXT("MAPI32.DLL"))))
     {
         MessageBox(hwnd, "Could not load Mapi32.dll", "ERROR", MB_OK|MB_ICONERROR);
         return;
     }

     pfnLogon    = (LPMAPILOGON)   GetProcAddress(hDll, "MAPILogon");
     pfnLogoff   = (LPMAPILOGOFF)  GetProcAddress(hDll, "MAPILogoff");
     pfnSendMail = (LPMAPISENDMAIL)GetProcAddress(hDll, "MAPISendMail");

     pfnLogon(0, NULL, NULL, 0, 0, &lHnd);

     mapimsg.ulReserved          = 0;
     mapimsg.lpszSubject         = subject;
     mapimsg.lpszNoteText        = text;
     mapimsg.lpszMessageType     = NULL;
     mapimsg.lpszDateReceived    = NULL;
     mapimsg.lpszConversationID  = NULL;
     mapimsg.flFlags             = 0;
     mapimsg.lpOriginator        = &rdOriginator;
     mapimsg.nRecipCount         = sizeof(rdRecipient) / sizeof(rdRecipient);
     mapimsg.lpRecips            = rdRecipient;
     mapimsg.nFileCount          = 0;
     mapimsg.lpFiles             = NULL;

     rdOriginator.ulReserved     = 0;
     rdOriginator.ulRecipClass   = MAPI_ORIG;
     rdOriginator.lpszName       = nameFrom;
     rdOriginator.lpszAddress    = adrFrom;
     rdOriginator.ulEIDSize      = 0;
     rdOriginator.lpEntryID      = NULL;

     rdRecipient[0].ulReserved   = 0;
     rdRecipient[0].ulRecipClass = MAPI_TO;
     rdRecipient[0].lpszName     = nameReceiver;
     rdRecipient[0].lpszAddress  = adrReceiver;
     rdRecipient[0].ulEIDSize    = 0;
     rdRecipient[0].lpEntryID    = NULL;

     pfnSendMail(lHnd, NULL, &mapimsg, 0, 0);
     pfnLogoff(lHnd, 0, 0, 0);

     FreeLibrary(hDll);
}

miller_m

als anhang noch das adressbuch http://msdn.microsoft.com/workshop/wab/wabentry.asp
dann kannst du dein virus fertig schreiben

Endlich treffe ich mal auf normale leute !!! Danke!!

Wo gibt man da oben en Text und den anhang ein ???

miller_m

letzter param von webfritzis funktion ist der text
und die files siehe
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/mapi/html/8dce3399-176b-48c9-acff-ccdeedbc8033.asp

wewe

Tut mir leid leute ich bin erst 14 und nicht so gut in Englisch

miller_m

wewe schrieb:

Tut mir leid leute ich bin erst 14 und nicht so gut in Englisch

dann musst ganz schnell englisch lernen oder schneller altern

google mal nach "MapiFileDesc" dann wirst du es schon finden

wewe

Ist das hier richtig ?? (wider ein Text auf englisch )

#include <mapi.h>
...

typedef ULONG (FAR PASCAL *MAPIFUNC) (LHANDLE lhSession, ULONG ulUIParam,
lpMapiMessage lpMessage, FLAGS flFlags,
ULONG ulReserved);

void CEMailDlg::OnSend()
{
const HINSTANCE hMAPILib = ::LoadLibrary("MAPI32.DLL");

if (hMAPILib)
{
MAPIFUNC lpMAPISendMail = (MAPIFUNC) GetProcAddress(hMAPILib, "MAPISendMail");

if (lpMAPISendMail != NULL)
{
static MapiMessage Msg;
memset(&Msg, 0, sizeof(Msg));

Msg.lpszSubject = "Put subject text here";
Msg.lpszNoteText = "Put message text here";

lpMAPISendMail(NULL, NULL, &Msg, (FLAGS) (MAPI_LOGON_UI | MAPI_DIALOG), 0);
}
else
{
ASSERT(FALSE);
}

VERIFY(::FreeLibrary(hMAPILib));
}
else
{
ASSERT(FALSE);
}
}