Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
%%[
var @rr, @sfp, @lists, @status
SET @rr = CreateObject("RetrieveRequest")
SetObjectProperty(@rr,"ObjectType","List")
AddObjectArrayItem(@rr,"Properties","ID")
AddObjectArrayItem(@rr,"Properties","ListName")
SET @sfp = CreateObject("SimpleFilterPart")
SetObjectProperty(@sfp,"Property","Type")
SetObjectProperty(@sfp,"SimpleOperator","equals")
AddObjectArrayItem(@sfp,"Value","Public")
SetObjectProperty(@rr,"Filter",@sfp)
SET @lists = InvokeRetrieve(@rr, @status, @requestID)
output(concat("rrStatus: ", @status))
output(concat("<br>rrRequestID: ", @requestID))
for @i = 1 to RowCount(@lists) do
set @list = Row(@lists, @i)
set @Name = Field(@list, "ListName")
output(concat("<br>ListName: ", @Name))
next @i
]%%
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment