gistfile1.txt

/*
will create campaign member records for all contacts and all campaigns
campaign member status will split between sent and responded
this is to for creating test records in developer orgs
it will fail with large numbers of records
*/

List<campaign> cl = new list<campaign>([select id from campaign); 
List<contact> conlist = new list <contact>([select id from contact]); 
List<campaignMember> cmlist = new list <campaignMember>(); 
integer counter = 1; 
for (Campaign cam : cl){ 
	for (Contact c : conlist){ 
		campaignmember cm = new campaignmember(); 
		cm.contactId = c.id; 
		cm.campaignId = cam.id; 
		IF(math.mod(counter,2) == 0){ 
			cm.status = 'responded'; 
		} 
		ELSE(cm.status='sent'); 
		cmlist.add(cm); 
		counter += 1; 
	} 
} 
insert cmlist;