Fortgeschrittene Beispiele / Code-Snippets

Top  Previous  Next

1. Prüfe alle Bookmarks und zeige danach in einer MessageBox, wie viele Updates gefunden wurden.

 

CheckBookmarks /all
$Updated = GetUpdatedBookmarkCount
MessageBox "Bookmarks changed: {$Updated}" /beep

 

 

2. Prüfe alle Bookmarks. Wenn Updates gefunden wurden, dann erstelle einen Report mit einem dynamischen, eindeutigen Namen und versende ihn per E-Mail.

 

CheckBookmarks /all
if GetUpdatedBookmarkCount=then goto NoUpdates
 
  $filename = GetUniqueID + ".htm"
  CreateReport /template="{programdir}examples\report_template_changes.htm" /output="c:\{$filename}" /bookmarks=changed
  SendMail /recipient="support@domain.com,info@domain2.com" /subject="WSW-Report" /body="Attached a WSW report" /attachfile="c:\{$filename}"
 
Label NoUpdates

 

 

3. Zeige eine QuestionBox und führe anschließend verschiedene Aktionen in Abhängigkeit des geklickten Buttons aus.

 

QuestionBox "Click yes or no"
if GetQuestionBoxResult="yes" then goto yes_has_been_clicked
if GetQuestionBoxResult="no" then goto no_has_been_clicked
 
label yes_has_been_clicked
  // insert commands here
  goto continue
 
label no_has_been_clicked
  // insert commands here
 
label continue

 

 

4. Eine Schleife mit 10 Durchläufen.

 

$i=1
Label BeginLoop1
  if $i > 10 then goto EndLoop1
 
  // commands, for example a Messagebox which displays the iteration number
  MessageBox "Iteration #: {$i}"
 
  $i = $i + 1
  goto BeginLoop1
Label EndLoop1

 

 

5. Öffne eine Bookmark-Datei, falls sie nicht bereits offen ist

 

// Open the bookmark file "c:\wsw\bm.wsw" if it is not the opened bookmark file
$s1 = "{bookmarkdir}" + GetBookmarkFilename
$s1 = Lowercase($s1)
if $s1 <> "c:\wsw\bm.wsw" then OpenBookmarkFile "c:\wsw\bm.wsw"