User Tools

Site Tools


html

html

This was used to create html for days in Alaska.

| in str |
" create html for each jog in the in collection"
in := #('abc.jpg' ). day := 'day1'.  "<----------------- change this"
endStr := '>'. quote := $" asString. str1 := '<div class='.
str2 := 'w3-display-container mySlides'. str3 := ' <img src='. str4:= '/%1'. str5 := ' style='.
str6 := 'width:100%'. str7 := ' <div class='.
str8 := 'w3-display-topleft w3-container w3-padding-16 w3-black'.
str9 := '    
 </div>
</div>'.

in do: [:each | | temp | temp := str4 bindWith: each.
Transcript nextPutAll: str1, quote ,str2,quote,endStr;cr.
Transcript nextPutAll: str3, quote, day,temp, quote,str5,quote,str6,quote,endStr;cr.
Transcript nextPutAll: str7, quote,str8,quote,endStr;cr.
Transcript show: str9;cr.
].



/volume1/synshare/web/macqueen.us/dokuwiki/data/pages/html.txt · Last modified: 2021/05/05 17:19 (external edit)