<% 'connection for Access VarConn2="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("../../mdb-database/daewoo_it_ca.mdb") 'APRO IL DB set conn=server.createobject("ADODB.connection") conn.open VarConn 'APRO IL DB Centri Assistenza set conn2=server.createobject("ADODB.connection") conn2.open VarConn2 %>

Home > Supporto > Centri Assistenza

		Centri assistenza I centri assistenza Daewoo coprono tutto il territorio nazionale. Trova il centro assistenza più vicino a te. Categoria Display al Plasma >Televisori >Sistemi Home Cinema >DVD e Videoregistratori >Sistemi Audio >Autoradio >Monitor >Forni a microonde >Lavatrici >Aspirapolvere >Frigoriferi >Climatizzatori Provincia <% sqlRegione="select distinct Pro from TbCentriAss order by Pro" set rsProv=conn2.execute(sqlRegione) %> Tutte ---------- <% do while not rsProv.eof %> " <%if request.form("Pro")=rsProv("Pro") then response.write " selected"%>><%=rsProv("Pro")%> <% rsProv.movenext loop set rsProv=nothing %>   <% 'SE IL TASTO TROVA è STATO PREMUTO if request.form("Trova")<>"" then %>   Centri assistenza trovati     Categoria prodotti selezionata: <% select case request.form("categoria") case "MW" VarCampoDB="MW" response.write "Forni a microonde" case "WM" VarCampoDB="WM" response.write "Lavatrici" case "RF" VarCampoDB="RF" response.write "Frigoriferi" case "VC" VarCampoDB="VC" response.write "Aspirapolvere" case "AC" VarCampoDB="AC" response.write "Climatizzatori" case "GA" VarCampoDB="GA" response.write "Sistemi audio" case "CAR" VarCampoDB="CAR" response.write "Autoradio" case "VR" VarCampoDB="VR" response.write "DVD e Videoregistratori" case "TVC" VarCampoDB="TVC" response.write "Televisori" case "IT" VarCampoDB="IT" response.write "Monitor" case "PDP" VarCampoDB="PDP" response.write "Display al plasma" case else response.write request.form("categoria") end select %> Provincia selezionata: <% sql="select Provincia from TBProvincie where ProvinciaID='" & request.form("provincia") & "'" set rsProv=conn.execute (sql) if not rsProv.eof then response.write rsProv("provincia") else response.write "Tutte" end if set rsProv=nothing ' response.write request("provincia") %> top <% 'seleziono la categoria if request.form("categoria")<>"" then 'seleziono la provincia if request.form("provincia")="Tutte" then sqlCA="select * from TbCentriAss where " & VarCampoDB & "<>''" else sqlCA="select * from TbCentriAss where " & VarCampoDB & "<>'' and Pro = '" & request.form("provincia") & "'" end if set rs=conn2.execute(sqlCA) 'response.write sqlCA end if if not rs.eof then %> <% 'LOOP do while not rs.eof %> <%= rs("Nome Cliente")%>    <%= rs("Via")%> - <%= rs("CAP") & " " & rs("Località")%> (<%= rs("Pro")%>)    Telefono: <%= rs("Telefono")%><%if rs("Telefono2")<>"" then response.write " - " & rs("Telefono2")%> - Fax: <%= rs("Numero di telefax")%> - Email: <%= rs("Indirizzoemail")%> <% rs.movenext loop %> top <% else %> Non è stato trovato nessun Centro Assistenza con le caratteristiche richieste. Per avere maggiori informazioni contattare il Servizio Consumatori Daewoo Electronics al numero telefonico 199.100.166 al numero di fax 199.120.021 o per posta elettronica servizioconsumatori@daewoo-electronics.it <% END IF 'RS.EOF %> <% END IF 'tasto TROVA %>

<% set conn=nothing set conn2=nothing set rs=nothing %>