#******************************************** # MacVersion = 1.6 # MacDescription = All "Found" logs in html # UserSort moet wel ingevuld zijn voor gebruik van deze macro! # MacAuthor = GeoFlowers # MacFileName = logjes.gsk #******************************************** # 1.6 images uitgebreid met de smilies gebruik in logs # 1.5 opgegeven foder en image folder worden aangemaakt # 1.4 simpel keuzemenu (topmenu) is nu aanwezig # 1.1 eerst gepubliceerde versie #******************************************** # Vastleggen variabelen #******************************************** $DBname = "juni2009" # Welke database gebruiken? $Folder = "c:\Gsak\logjes\" # output folder, logjes html $HtmlName = "Logjes" # output filename $AantalTabel = 500 # Aantal logjes per tabel $PagTekst = "Onze Logjes" # toevoegen intro op web-pagina $MenuTitel = "
" + $MenuRegel + "
" + $_NewLine + "| "
$tabel = $tabel + "
| " TABLE Active=Logs Scope=Parent WHILE NOT($_EOL) IF IsOwner() $date = DateFormat($d_lDate) $List = List("TypeList","Find","$d_lType") $Image = List("ImageList","Item","$List") $Image = " ",$LogText,TRUE) $LogText = Replace("[:)]"," ",$logText,TRUE)
$LogText = Replace("[:D]"," ",$logText,TRUE)
$LogText = Replace("[8D]"," ",$logText,TRUE)
$LogText = Replace("[:I]"," ",$logText,TRUE)
$LogText = Replace("[:P]"," ",$logText,TRUE)
$LogText = Replace("[}:)]"," ",$logText,TRUE)
$LogText = Replace("[;)]"," ",$logText,TRUE)
$LogText = Replace("[:o)]"," ",$logText,TRUE)
$LogText = Replace("[B)]"," ",$logText,TRUE)
$LogText = Replace("[8]"," ",$logText,TRUE)
$LogText = Replace("[:(]"," ",$logText,TRUE)
$LogText = Replace("[8)]"," ",$logText,TRUE)
$LogText = Replace("[:O]"," ",$logText,TRUE)
$LogText = Replace("[:(!]"," ",$logText,TRUE)
$LogText = Replace("[xx(]"," ",$logText,TRUE)
$LogText = Replace("[|)]"," ",$logText,TRUE)
$LogText = Replace("[:X]"," ",$logText,TRUE)
$LogText = Replace("[^]"," ",$logText,TRUE)
$LogText = Replace("[V]"," ",$logText,TRUE)
$LogText = Replace("[?]"," ",$logText,TRUE)
$tabel = $tabel + "$Image $date by $d_lBy |