<%@ Language=VBScript %>
<%
Dim bChangeRowColor
bChangeRowColor = True
FUNCTION ChangeRowColor
If bChangeRowColor Then
ChangeRowColor = "bgcolor=" & Chr(34) & "#b3c6bb" & Chr(34)
Else
ChangeRowColor = "bgcolor=" & Chr(34) & "#e6dccd" & Chr(34)
End If
bChangeRowColor = Not bChangeRowColor
END FUNCTION
FUNCTION ChangeRowColor2
If bChangeRowColor Then
ChangeRowColor2 = "bgcolor=" & Chr(34) & "#e6dccd" & Chr(34)
Else
ChangeRowColor2 = "bgcolor=" & Chr(34) & "#CDDAD2" & Chr(34)
End If
END FUNCTION
menu_image = 0
SUB menu_eintrag(name, url)
menu_image = menu_image + 1
Response.Write("")
Response.Write("" & name & "
 & ) | ")
Response.Write(" |
")
END SUB
%>
no-home? | kontakt und impressum
sie erreichen uns
|
 |
| |
|
Impressum: |
|
inhaber |
no-home? s. fries und v. ulsamer gbr
steuernummer: 257/179/02303
finanzamt würzburg |
|
anschrift |
barbarastr. 8 - D-97074 würzburg |
|
telefax |
09 31 / 79 79 0 55 |
|
email |
mail @ no-home.de |
