| |
Marke/Modell |
Kilometer
  |
Preis
|
Erstzulassung |
Farbe |
 |
BMW
530d xDrive Touring F11 |
16800 |
79.200 EUR
|
12.4.2011 |
Titansilber metallic |
 |
Porsche
911 Speedster |
10 |
244.800 EUR
|
.. |
purblau |
 |
Mercedes-Benz
A 200 CDI |
64800 |
17.900 EUR
|
12.4.2006 |
Schwarzmetallic |
 |
Audi
A4 2.0 TDI |
9800 |
30.900 EUR
|
16.10.2009 |
quarzgrau metallic |
 |
Audi
A4 Avant 2.0 TDI quattro Sport Edtion |
10 |
49.900 EUR
|
.. |
phantomschwarz perleffekt |
 |
Audi
A4 Avant 3.0 V6 quattro |
87000 |
22.900 EUR
|
25.7.2006 |
phantomschwarz perleffekt |
 |
Audi
A6 3.0 TDI quattro |
6200 |
69.900 EUR
|
31.3.2011 |
havanaschwarz metallic |
 |
Audi
A6 Avant 3.0 TDI quattro |
10 |
80.800 EUR
|
.. |
phantomschwarz perleffekt |
 |
Audi
A6 Avant 3.0 TDI quattro |
2500 |
86.900 EUR
|
12.10.2011 |
phantomschwarz perleffekt |
 |
Seat
Alhambra Style TDI CR 4WD |
14500 |
39.900 EUR
|
21.7.2011 |
indiumgrau metallic |
 |
Seat
Alhambra Style TDI CR 4WD |
14500 |
39.900 EUR
|
21.7.2011 |
Mond-Silber metallic |
 |
Seat
Alhambra Style TDI CR 4WD |
14500 |
39.900 EUR
|
21.7.2011 |
indiumgrau metallic |
 |
Audi
Audi A8 3.0 TDI quattro |
4600 |
89.500 EUR
|
30.11.2010 |
havanaschwarz metallic |
 |
Audi
Audi A8 4.2 FSI quattro |
100 |
111.900 EUR
|
.. |
phantomschwarz perleffekt |
 |
Citroen
Citroen C5 Tourer THP 155 |
15500 |
29.200 EUR
|
15.2.2011 |
Thorium grau metallic |
 |
Mercedes-Benz
CLS 350 CDI BlueEFF |
10 |
86.900 EUR
|
.. |
obsidianschwarz metallic |
 |
Mercedes-Benz
CLS 350 CDI BlueEFF. |
10 |
78.500 EUR
|
.. |
obsidianschwarzmetallic |
 |
Mercedes-Benz
CLS 350 CDI BlueEFF. |
10 |
78.900 EUR
|
.. |
diamantweiß bright metallic |
 |
VW
Golf Cabriolet TSI |
10 |
31.200 EUR
|
.. |
deepblack perleffekt |
 |
VW
Golf Comfortline TDI 4montion |
3900 |
26.300 EUR
|
30.8.2011 |
unitedgrey mettalic |
 |
VW
Golf GTI |
10 |
43.400 EUR
|
.. |
carbon stell grey metallic |
 |
Renault
Megane Dynamique Komfort 1.5 dCi |
64500 |
7.500 EUR
|
14.9.2004 |
schwarzmetallic |
 |
MINI
Mini One R56 |
23300 |
15.500 EUR
|
22.11.2010 |
chili red uni |
 |
MINI
Mini One R56 |
24200 |
15.900 EUR
|
20.10.2010 |
horizon blue metallic |
 |
MINI
Mini One R56 |
21700 |
15.500 EUR
|
21.10.2010 |
chili red uni |
 |
MINI
Mini One R56 |
21800 |
15.500 EUR
|
21.10.2010 |
chili red uni |
 |
VW
Multivan Highline TSI 4motion |
6900 |
73.900 EUR
|
23.1.2012 |
Candyweiss |
| |
Porsche
Panamera 4 |
10 |
124.900 EUR
|
.. |
carreraweiss |
| |
Porsche
Panamera 4 S |
10 |
146.900 EUR
|
.. |
carreraweiss |
 |
Porsche
Panamera Diesel |
10 |
119.800 EUR
|
.. |
schwarz metallic |
 |
VW
Passat Variant Highline BMT TDI 4motion |
28000 |
42.800 EUR
|
14.1.2011 |
deepblack perleffekt |
| |
Porsche
Porsche 911 S Coupe |
100 |
144.500 EUR
|
.. |
Achatgrau metallic |
 |
Audi
Q3 2.0 TDI quattro |
1300 |
55.500 EUR
|
22.9.2011 |
phantomschwarz perleffekt |
 |
Audi
Q3 2.0 TDI quattro |
6500 |
47.300 EUR
|
28.10.2011 |
monsungrau metallic |
 |
Audi
Q3 2.0 TDI quattro |
9000 |
52.000 EUR
|
22.9.2011 |
gletscherweiß metallic |
 |
Audi
Q5 2.0 TDI quattro |
7500 |
58.900 EUR
|
2.11.2011 |
daytonagrau perleffekt |
 |
Audi
Q5 2.0 TDI quattro |
12000 |
58.500 EUR
|
2.11.2011 |
daytonagrau perleffekt |
 |
Audi
Q5 2.0 TDI quattro |
12000 |
56.900 EUR
|
21.11.2011 |
phantomschwarz perleffekt |
 |
Audi
Q5 2.0 TDI quattro |
12200 |
59.500 EUR
|
28.9.2011 |
phantomschwarz perleffekt |
 |
Audi
Q5 2.0 TDI quattro |
14000 |
56.900 EUR
|
30.9.2011 |
daytonagrau perleffekt |
 |
Audi
Q5 2.0 TDI quattro |
12200 |
56.800 EUR
|
19.9.2011 |
daytonagrau perleffekt |
 |
Audi
Q5 2.0 TDI quattro |
9500 |
59.800 EUR
|
9.1.2012 |
phantomschwarz perleffekt |
 |
Audi
Q5 3.0 TDI quattro |
9600 |
74.500 EUR
|
30.9.2011 |
phantomschwarz perleffekt |
 |
Audi
Q5 3.0 TDI quattro |
15900 |
74.500 EUR
|
3.10.2011 |
phantomschwarz perleffekt |
 |
Audi
Q5 3.0 TDI quattro |
10 |
78.900 EUR
|
11.4.2011 |
teakbraunmetallic |
 |
Audi
Q7 3.0 TDI quattro |
10 |
90.000 EUR
|
.. |
orcaschwarz perleffekt |
 |
Audi
RS3 Sportback 2.5 TFSI quattro |
10 |
68.800 EUR
|
.. |
ibisweiss |
 |
Audi
RS5 Coupe 4.2 FSI quattro |
10 |
98.500 EUR
|
24.10.2011 |
phantomschwarzperleffekt |
 |
Mercedes-Benz
S 350 4M. BlueTec |
6000 |
102.900 EUR
|
28.2.2011 |
obsidianschwarzmetallic |
 |
VW
Sharan Sky BMT TDI |
9700 |
41.600 EUR
|
1.9.2011 |
deepblack perleffekt |
 |
VW
Sharan Sky BMT TDI 4 motion |
14100 |
40.900 EUR
|
1.9.2011 |
deepblack perleffekt |
 |
VW
Sharan Sky BMT TDI 4motion |
10 |
47.200 EUR
|
.. |
Candyweiss |
 |
VW
Sharan Sky BMT TDI 4motion |
10 |
47.900 EUR
|
.. |
deepblack perleffekt |
 |
VW
Sharan Sky BMT TSI |
2500 |
41.900 EUR
|
13.10.2011 |
nightblue metallic |
 |
VW
Sharan Trendline BMT TDI 4 motion |
6400 |
37.500 EUR
|
22.8.2011 |
indiumgrau metallic |
 |
Kia
Sportage Active BI. 2.0 CRDI 2WD |
106000 |
9.400 EUR
|
2.1.2007 |
schwarz metallic |
 |
Suzuki
SX4 2.0 GLX DDiS 4WD |
10 |
20.900 EUR
|
31.10.2011 |
cosmic black pearmetallic |
 |
VW
T5 Multivan Highline BiTDI 4 motion |
6100 |
69.800 EUR
|
14.9.2011 |
deepblack perleffekt |
 |
VW
T5 Multivan Sky BiTDI 4motion |
10 |
78.000 EUR
|
.. |
dark wood perleffekt |
 |
VW
Tiguan Sky 2.0 TDI 4motion R-line |
9800 |
34.900 EUR
|
19.7.2010 |
reflexsilber metallic |
 |
VW
Tiguan Sky TDI BMT |
12000 |
34.400 EUR
|
13.12.2011 |
deepblack perleffekt |
 |
VW
Tiguan Sky TDI BMT 4motion |
8500 |
Fehler 13 in Symbios-Script
Type mismatch: 'formatnumber'
Zeile: 172 Zeichen: 4
000
001 Response.Write("")
002
003 'Suchkriterien festlegen
004 if request.form("rbWaehrung")="" then
005 strWaehrung = "A"
006 else
007 strWaehrung = request.form("rbWaehrung")
008 end if
009
010 'Sortierung festlegen
011 if request.querystring("Order")="" then
012 strOrder = "order by AUBezeichnung"
013 else
014 strOrder = "order by " & request.querystring("Order")
015 end if
016
017 'Variablen aus Suchformular füllen
018 strMarke = request.form("ddMarke")
019 strAntrieb = request.form("ddAntrieb")
020 strMotor = request.form("ddMotor")
021 strModell = request.form("ddModell")
022
023 Public DataConn
024 StartConnection()
025 DIM datepart
026
027 'SQL-Abfragen
028
029 SQLStatement = "select * from Autos WHERE (aufreischaltung='J' AND date()<aulieferbarab+15 OR aufreischaltung='J' AND autage='N') "
030
031 if strMarke <> "" then
032 SQLStatement = SQLStatement & "and AUMarke='"&strMarke&"' "
033 end if
034 if strAntrieb <> "" then
035 SQLStatement = SQLStatement & "and AUAntrieb='"&strAntrieb&"' "
036 end if
037 if strMotor <> "" then
038 SQLStatement = SQLStatement & "and AUMotor='"&strMotor&"' "
039 end if
040 if strModell <> "" then
041 SQLStatement = SQLStatement & "and AUBezeichnung='"&strModell&"' "
042 end if
043
044
045 SQLStatement = SQLStatement & strOrder
046
047 Set RS = DataConn.Execute (SQLStatement)
048
049 SQLStatement1 = "Select * from Marke order by MABezeichnung"
050 Set RSMarke = DataConn.Execute(SQLStatement1)
051
052 SQLStatement2 = "select AUMotor from Autos group by AUMotor order by AUMotor "
053 Set RSMotor = DataConn.Execute (SQLStatement2)
054
055 If RS.eof then
056 Response.Write("" & Chr(13) & Chr(10) &_
057 " Es gibt leider keine Übereinstimmungen zu Ihrer Auswahl. Bitte wählen" & Chr(13) & Chr(10) &_
058 " Sie andere Suchkriterien." & Chr(13) & Chr(10) &_
059 " <p></p>" & Chr(13) & Chr(10) &_
060 " <p> </p>" & Chr(13) & Chr(10) &_
061 " <p> </p>" & Chr(13) & Chr(10) &_
062 " <p> </p>" & Chr(13) & Chr(10) &_
063 " ")
064 else
065 Response.Write("" & Chr(13) & Chr(10) &_
066 " <table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0"">" & Chr(13) & Chr(10) &_
067 " <tr>" & Chr(13) & Chr(10) &_
068 " <td><span class=""bodyText""> Folgende Fahrzeuge sind vorhanden: [ Preise" & Chr(13) & Chr(10) &_
069 " für <img src=""")
070 Response.Write(Symbiosis.xEval("C_SSYS_PATH_Images"))
071 Response.Write("flag_")
072 Response.Write(strWaehrung)
073 Response.Write(".gif"" height=""12""> ]<br>" & Chr(13) & Chr(10) &_
074 " ")
075 if strWaehrung="CH" then response.write("Preise inkl. MFK und CH-Steuer<br>")
076 Response.Write("" & Chr(13) & Chr(10) &_
077 " <font size=""1"">[Durch Click auf das Bild-Icon <img src=""")
078 Response.Write(Symbiosis.xEval("C_SSYS_PATH_Images"))
079 Response.Write("kamera.gif"" alt=""Details"" border=""0"" width=""12"" height=""8""> erhalten" & Chr(13) & Chr(10) &_
080 " Sie nähere Details]</font></span></td>" & Chr(13) & Chr(10) &_
081 " </tr>" & Chr(13) & Chr(10) &_
082 " </table>" & Chr(13) & Chr(10) &_
083 " <table width=""100%"" border=""1"" cellspacing=""0"" cellpadding=""2"" bordercolor=""#CCCCCC"">" & Chr(13) & Chr(10) &_
084 " <tr class=""tableHead"">" & Chr(13) & Chr(10) &_
085 " <td width=""6%""> </td>" & Chr(13) & Chr(10) &_
086 " <td width=""32%"" valign=""top"">Marke/Modell</td>" & Chr(13) & Chr(10) &_
087 " <td width=""10%"" align=""right"" valign=""top"">Kilometer<br>" & Chr(13) & Chr(10) &_
088 " <a href=""")
089 Response.Write(Symbiosis.xEval("C_SSYS_DefaultPage"))
090 Response.Write("?navig=2&Order=AUKilometer desc&Marke=")
091 Response.Write(strMarke)
092 Response.Write("&Antrieb=")
093 Response.Write(strAntrieb)
094 Response.Write("&Motor=")
095 Response.Write(strMotor)
096 Response.Write("""><img src=""")
097 Response.Write(Symbiosis.xEval("C_SSYS_PATH_Images"))
098 Response.Write("pfeil_auf.gif"" alt=""aufsteigend"" hspace=""5"" border=""0""></a><a href=""")
099 Response.Write(Symbiosis.xEval("C_SSYS_DefaultPage"))
100 Response.Write("?navig=2&Order=AUKilometer&Marke=")
101 Response.Write(strMarke)
102 Response.Write("&Antrieb=")
103 Response.Write(strAntrieb)
104 Response.Write("&Motor=")
105 Response.Write(strMotor)
106 Response.Write("""><img src=""")
107 Response.Write(Symbiosis.xEval("C_SSYS_PATH_Images"))
108 Response.Write("pfeil_ab.gif"" alt=""absteigend"" border=""0""></a></td>" & Chr(13) & Chr(10) &_
109 " <td width=""11%"" align=""right"" valign=""top"">Preis<br>" & Chr(13) & Chr(10) &_
110 " <a href=""")
111 Response.Write(Symbiosis.xEval("C_SSYS_DefaultPage"))
112 Response.Write("?navig=2&Order=AUNettopreis desc&Marke=")
113 Response.Write(strMarke)
114 Response.Write("&Antrieb=")
115 Response.Write(strAntrieb)
116 Response.Write("&Motor=")
117 Response.Write(strMotor)
118 Response.Write("""><img src=""")
119 Response.Write(Symbiosis.xEval("C_SSYS_PATH_Images"))
120 Response.Write("pfeil_auf.gif"" alt=""aufsteigend"" hspace=""5"" border=""0""></a><a href=""")
121 Response.Write(Symbiosis.xEval("C_SSYS_DefaultPage"))
122 Response.Write("?navig=2&Order=AUNettopreis&Marke=")
123 Response.Write(strMarke)
124 Response.Write("&Antrieb=")
125 Response.Write(strAntrieb)
126 Response.Write("&Motor=")
127 Response.Write(strMotor)
128 Response.Write("""><img src=""")
129 Response.Write(Symbiosis.xEval("C_SSYS_PATH_Images"))
130 Response.Write("pfeil_ab.gif"" alt=""absteigend"" border=""0""></a></td>" & Chr(13) & Chr(10) &_
131 " <td width=""16%"" align=""center"" valign=""top"">Erstzulassung</td>" & Chr(13) & Chr(10) &_
132 " <td width=""25%"" align=""center"" valign=""top"">Farbe</td>" & Chr(13) & Chr(10) &_
133 " </tr>" & Chr(13) & Chr(10) &_
134 " ")
135 do while not RS.eof
136 varAuto=RS("AUId")
137
138 'SQLStatement = "select * from Bilder where AUId=" & varAuto & " and BIAktiv=1;"
139 SQLStatement = "select * from Bilder where AUId=" & varAuto & ";"
140 Set RSBild = DataConn.Execute (SQLStatement)
141
142 'Wenn kein Bild vorhanden ist leeres anzeigen
143 if RSBild.eof then
144 strBild = "nopicture.jpg"
145 else
146 strBild = RSBild("BIDateiG")
147 end if
148
149
150 Response.Write("" & Chr(13) & Chr(10) &_
151 " <tr valign=""top"">" & Chr(13) & Chr(10) &_
152 " <td width=""6%"" class=""bodyText""> <a href=""")
153 Response.Write(Symbiosis.xEval("C_SSYS_DefaultPage"))
154 Response.Write("?navig=60&Id=")
155 Response.Write(RS("AUId"))
156 Response.Write("&Waehrung=")
157 Response.Write(strWaehrung)
158 Response.Write("""><img src=""/sendBinary.asp?bild=")
159 Response.Write(strBild)
160 Response.Write("&width=150"" alt=""Details"" border=""0""></a> </td>" & Chr(13) & Chr(10) &_
161 " <td width=""32%"" class=""bodyText"">")
162 Response.Write(RS("AUMarke"))
163 Response.Write("<br> ")
164 Response.Write(RS("AUBezeichnung"))
165 Response.Write("</td>" & Chr(13) & Chr(10) &_
166 " <td width=""10%"" align=""right"" class=""bodyText""> ")
167 Response.Write(RS("AUKilometer"))
168 Response.Write("</td>" & Chr(13) & Chr(10) &_
169 " <td width=""11%"" align=""right"" class=""bodyText"">" & Chr(13) & Chr(10) &_
170 " ")
171 if strWaehrung="A" then
172 response.write(formatnumber((Int(((((RS("AUNettopreis"))*(1+RS("AUNova")/100)+RS("AUCO2"))*(1+RS("AUMwst")/100))+90)/100)*100),0,0,0,-1)&" EUR")
173 elseif strWaehrung="CH" then
174 if RS("AUMwst")=0 then
175 sMwst=1
176 else
177 sMwst=1.076
178 end if
179 response.write(formatnumber((Int((((RS("AUNettopreis"))*1.04*sMwst)+90)/100)*100),0,0,0,-1) & " EUR")
180 elseif strWaehrung="D" then
181 if RS("AUMwst")=0 then
182 sMwst=1
183 else
184 sMwst=1.19
185 end if
186 response.write(formatnumber((Int((((RS("AUNettopreis"))*sMwst)+90)/100)*100),0,-1,0,-1) & " EUR")
187 end if
188
189
190 Response.Write("" & Chr(13) & Chr(10) &_
191 " </td>" & Chr(13) & Chr(10) &_
192 " <td width=""16%"" align=""center"" class=""bodyText"">")
193 Response.Write(day(RS("AUErstzulassung"))&"."&month(RS("AUErstzulassung"))&"."&year(RS("AUErstzulassung")))
194 Response.Write("</td>" & Chr(13) & Chr(10) &_
195 " <td width=""25%"" align=""center"" class=""bodyText"">")
196 Response.Write(RS("AUFarbe"))
197 Response.Write("</td>" & Chr(13) & Chr(10) &_
198 " </tr>" & Chr(13) & Chr(10) &_
199 " ")
200 RSBild.close
201 RS.movenext
202 loop
203 Response.Write("" & Chr(13) & Chr(10) &_
204 " </table>" & Chr(13) & Chr(10) &_
205 " <br>" & Chr(13) & Chr(10) &_
206 " <br>" & Chr(13) & Chr(10) &_
207 " Bei Schreib-, Druck- und Rechenfehlern auf der" & Chr(13) & Chr(10) &_
208 " Website ist auto-line.info jederzeit zum Rücktritt berechtigt!<br>" & Chr(13) & Chr(10) &_
209 "")
210 end if
211
212 RSMarke.close
213 RS.close
214 stopConnection()
215 Response.Write("")
|
]
erhalten
Sie nähere Details]