<% Const ForReading = 1, ForWriting = 2, ForAppending = 8 strLogfilePath = "D:\Web\D\B\36\~db\" strLogfile = "count.txt" strText = "init" Dim objFso, objLogfile set objFso = CreateObject("Scripting.FileSystemObject") set objLogfile = objFso.OpenTextFile(strLogfilePath & strLogfile, ForReading) intCount = Int(objLogfile.ReadLine) objLogfile.Close set objLogfile = Nothing set objFso = Nothing Response.Write("-Besucherzähler: " & intCount & "-") %>

 

 

 

Siegfried Graf

 

 

 

 

 

 

 

 

 

Wahrzeichen

Der Wegbeschreibung folgend, erblicken Sie beim Einbiegen in die Heinrieter Straße eine überdimensionale, 7 Meter hohe Schreibtischleuchte, die unsere Einfahrt säumt. Dieses Kunstwerk gaben wir als originalgetreue Nachbildung des Klassikers «Tizio» in Auftrag. Diese bereits 1973 von dem württembergischen Designer Richard Sapper entworfene und im Lieferprogramm des italienischen Renommierherstellers Artemide befindliche Leuchte ist nicht nur die beliebteste und am häufigsten gekaufte Schreibtischleuchte, sondern auch unser Wahrzeichen und Wegweiser.