1<script type="text/javascript" runat="server">
2
3 // Include SSJS Core Library
4 Platform.Load("core", "1");
5
6 // retrieve all the lists in the account
7 var retrievedLists = List.Retrieve();
8
9 // set up and add an email
10 var emailData = {
11 "CustomerKey" : "Cool_Email_Key",
12 "Name" : "Cool Email",
13 "HTMLBody" : "<body bgcolor='#ffffff' text='#000000'><table cellspacing='0' cellpadding='0' border='1' bordercolor='#000000' bgcolor='#ffffff' width='600' align='center'><tr><td align='center'><font face='verdana' size='1' color='#444444'>To view this email as a web page, click <a href='%%view_email_url%%'>here.</a></font></span><br/><br/><center><h2>Way Cool Email</h2></center><br/><br/><table cellpadding='2' cellspacing='0' width='600' ID='tblRequired' Border=0><tr><td><font face='verdana' size='1' color='#444444'>This email was sent to: %%emailaddr%% <br><br><b>Email Sent By:</b> %%Member_Busname%%<br>%%Member_Addr%% %%Member_City%%, %%Member_State%%, %%Member_PostalCode%%, %%Member_Country%%<br><br></td></tr></table><a href='%%profile_center_url%%' alias='Update Profile'>Update Profile</a><custom name='opencounter' type='tracking'></td></tr></table>",
14 "Subject" : "Check out my way cool email",
15 "IsHTMLPaste" : "true"
16 };
17
18 // Create the email
19 newEmail = Email.Add(emailData);
20 // Send the email to all the lists
21 status = Send.Add("Cool_Email_Key", retrievedLists);
22</script>