View Source

[examples]
context.wtcl
cookies.wtcl
cookiesIntro.wtcl
errors.wtcl
errorsIntro.wtcl
expr.wtcl
fish.jpg
fish.wtcl
flush.wtcl
flushIntro.wtcl
form.wtcl
formIntro.wtcl
index.wtcl
ready.wtcl
scripting.wtcl
scripting.wtcl~
scriptingIntro.wtcl
session.wtcl
sessionIntro.wtcl
uploads/
uploads.wtcl
uploadsIntro.wtcl
virtual.wtcl
virtualIntro.wtcl
File: / examples / flush.wtcl

Lines Size Modified Created Owner MIME Types
23 327 2010/05/18 23:04:06 2011/06/13 15:35:16 BUILTIN\Administrators application/x-wtcl, text/x-wtcl

0001
<?
0002
0003
include ../lib/examplePage.wtcl
0004
0005
::wt::examples::setTitle "Flush"
0006
0007
include ../lib/header.wtcl
0008
0009
?>
0010
0011
Waiting... <?
0012
for {set i 0} {$i < 5} {incr i} {
0013
  if {$i > 0} {
0014
    set str ", "
0015
  } else {
0016
    set str ""
0017
  }
0018
  puts -nonewline "${str}[expr $i + 1]"
0019
  sleep 1000
0020
  flush stdout
0021
} ?>, Done.
0022
0023
<? include ../lib/footer.wtcl ?>