35 lines
1.2 KiB
Plaintext
35 lines
1.2 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: Mail - Send
|
|
//:: mail_send.nss
|
|
//:: Copyright (c) 2003 Jake E. Fitch
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
Send the Message.
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Jake E. Fitch (Milambus Mandragon)
|
|
//:: Created On: Jan. 6, 2004
|
|
//:://////////////////////////////////////////////
|
|
|
|
#include "mail_include"
|
|
|
|
void main()
|
|
{
|
|
object oPC = GetPCSpeaker();
|
|
object oMailman = GetNearestObjectByTag("Mailman", oPC);
|
|
|
|
int iToMB = GetLocalInt(oMailman, "mail_ToMB");
|
|
int iFromMB = GetLocalInt(oMailman, "mail_Mailbox");
|
|
string sSubject = GetLocalString(oMailman, "mail_Subject");
|
|
string sMessage = GetLocalString(oMailman, "mail_Message");
|
|
|
|
int iMessageID = GetCampaignInt(DBName, "LastMessage") + 1;
|
|
SetCampaignInt(DBName, "LastMessage", iMessageID);
|
|
|
|
SetCampaignInt(DBName, "T" + IntToString(iMessageID), iToMB);
|
|
SetCampaignInt(DBName, "F" + IntToString(iMessageID), iFromMB);
|
|
SetCampaignString(DBName, "S" + IntToString(iMessageID), sSubject);
|
|
SetCampaignString(DBName, "M" + IntToString(iMessageID), sMessage);
|
|
SetCampaignInt(DBName, "R" + IntToString(iMessageID), FALSE);
|
|
}
|