Facebook

I see myself loosin Time for the Project in pointless Facebook debattes.
There will always be people, whose minds whee completely filled up with exactly one single "colour".
. Decided to focus my Time now to more productive Topics, but -.- its difficult with all that jerkin dogs around. Anyway. Politic is made by people, and if there is a group of colourblind People, than they have the right to build a political Party. even when its a party of the colorblind. As long as they dont reject the existence of rainbows...

Got me to the Idea of implementin timeout / retry / fail while waitin for a response.

...syncFunc...

Do
   actual_time = Format(Now, "hhmmss")
   If actual_time - start_time > timeout Then
      fSyncBrowser = 1
      Exit Function
   ElseIf actual_time - start_time > signal_time _
   And (actual_time <> last_signal) Then
       ' Do it per second and nicely Formatted.
        Debug.Print " ...waiting... " & actual_time - start_time
         last_signal = actual_time
   End If

which results in an nicely formatted:

click -> http://www.cplusplus.com/reference/cctype/
waiting... 3
waiting... 4
Sync ready. Counter at: 4123
click -> http://www.cplusplus.com/reference/cfenv/
...

So. this colourful debatte finally showed finally some good Solution :)