AOL Takes It Off Confirmation Page

<% set trackInfo "" %> <% set page_id 1073782572 %> AOL Takes It Off Confirmation Page

<% set promo_set [mn_gen_fetch_promo {37013}] %><% set info [mn_gen_tracking_info_aspp2 $promo_set $page_id] append trackInfo $info %><% set promo_html [mn_gen_display_promo_field_aspp2 $promo_set "ImageBody_Art1" $page_id] ns_puts -nonewline $promo_html %>

<% set promo_set [mn_gen_fetch_promo {37014}] %><% set info [mn_gen_tracking_info_aspp2 $promo_set $page_id] append trackInfo $info %><% set promo_html [mn_gen_display_promo_field_aspp2 $promo_set "ImageBody_Art1" $page_id] ns_puts -nonewline $promo_html %>

Thank you for submitting your diet story. Please be sure to check your email for instructions on how to submit your photos to be considered for our photo galleries.

<% set promo_set [mn_gen_fetch_promo {37015}] %><% set info [mn_gen_tracking_info_aspp2 $promo_set $page_id] append trackInfo $info %><% set promo_html [mn_gen_display_promo_field_aspp2 $promo_set "Text1" $page_id] ns_puts -nonewline $promo_html %>

AOL Takes It Off!
August, 2004

AOL Keyword: Diet & Fitness

<% set promo_set [mn_gen_fetch_promo {37016}] %><% set info [mn_gen_tracking_info_aspp2 $promo_set $page_id] append trackInfo $info %>

<% set promo_html [mn_gen_display_promo_field_aspp2 $promo_set "Text1" $page_id] ns_puts -nonewline $promo_html %>

<% set promo_html [mn_gen_display_promo_field_aspp2 $promo_set "Text2" $page_id] ns_puts -nonewline $promo_html %>

<% set promo_html [mn_gen_display_promo_field_aspp2 $promo_set "Text3" $page_id] ns_puts -nonewline $promo_html %>

<% if {[string compare $trackInfo ""]} { # get aol header information set result_set [ns_set create] set target "http://ads.web.aol.com/" append target "promoimp/" set length [string length $trackInfo ] if { $length <= 255 } { append target $trackInfo "aol" ns_puts "" } else { if {$trackInfo !=" "} { set trackInfo1 [string trim $trackInfo "/"] set items [split $trackInfo1 /] set size [llength $items] set newTarget $target set currentIndex 0 set currentCount 1 set info "" set continueNext 1 while {$continueNext == 1} { set currentString [lindex $items $currentIndex] append info $currentString "/" if { $currentIndex == ($size-1)} { append target $info "aol" ns_puts "" break } elseif { $currentCount==10 } { append target $info "aol" ns_puts "" set currentCount 1 set target $newTarget set info "" incr currentIndex 1 } else { incr currentIndex 1 incr currentCount 1 } } } } } %> <% mn_gen_impression_tracking $trackInfo %>