Red de conocimiento del abogados - Preguntas y respuestas jurídicas - VB: enviar correo electrónico al buzón especificado
VB: enviar correo electrónico al buzón especificado
{
typedef int (WINAPI ICEPUB_SENDMAILTEXT)(char *strUsername,char *strPassword,char *strSmtpServer,char *sendMail,char *toMailList,char *strSubject,char *strText) ;
ICEPUB_SENDMAILTEXT *icePub_sendMailText = 0;
HINSTANCE hDLLDrv = LoadLibrary("icePubDll.dll");
if(hDLLDrv)
{
icePub_sendMailText = (ICEPUB_SENDMAILTEXT *)GetProcAddress(hDLLDrv, "icePub_sendMailText");
}
if(icePub_sendMailText)
icePub_sendMailText("ahuinuli","112233","smtp.tom.com","ahuinuli@tom.com","mike@sina.com","Título: ¿Estás bien?","Texto: Abre tu corazón y orar por los sueños , Dream Talk about Spring ");
if(hDLLDrv)
FreeLibrary(hDLLDrv);
}