---
title: "Tror jag har krånglat till det"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/55069-tror-jag-har-krånglat-till-det"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "alfa"
published: "2002-10-03T22:16:32.000Z"
updated: "2002-10-03T22:16:32.000Z"
replies: 0
views: 177
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/55069-tror-jag-har-krånglat-till-det"
---

# Tror jag har krånglat till det

## #1 — alfa, 2002-10-03T22:16Z

Skickar iväg denna kod

Response.write "\<TD\>"
								Response.write "\<input type='checkbox' name='Alla_fastighets_slag' value='0' checked\>Alla"
							Response.write "\</TD\>"
							Response.write "\<TD\>"
								Response.write "\<input type='checkbox' name='Hyreshus' value='1'\>Hyreshus\<br\>"
								Response.write "\<input type='checkbox' name='Fabrik' value='2'\>Fabrik"
							Response.write "\</TD\>"
							Response.write "\<TD\>"
								Response.write "\<input type='checkbox' name='Affar' value='3'\>Affär\<br\>"
								Response.write "\<input type='checkbox' name='Kopcentrum' value='4'\>Köpcentrum"
							Response.write "\</TD\>"

tar emot denna kod

Alla_fastighets_slag = Request.Form ("Alla_fastighets_slag")
Hyreshus = Request.Form ("Hyreshus")
Fabrik = Request.Form ("Fabrik")
Affar = Request.Form ("Affar")
Kopcentrum = Request.Form ("Kopcentrum")

if Hyreshus = "" then
	Hyreshus = 0
end if
if Fabrik = "" then
	Fabrik = 0
end if
if Affar = "" then
	Affar = 0
end if
if Kopcentrum = "" then
	Kopcentrum = 0
end if

stad = Request.Form ("stad")

if stad = 0 then
	MySQL1 = "SELECT zhops_fastighet_tillsalu.fastighet_id, zhops_fastighet_tillsalu.Pris, zhops_fastighet_tillsalu.Datum, zhops_fastighet_tillsalu.fosaljnings_text, zhops_fastighet_tillsalu.kund_id, zhops_fastighets_slag.fastighets_slag_id, zhops_stad.Stad_id, zhops_stad.stad_namn, zhops_fastighets_slag.fastighets_slag, zhops_fastighet.Fastighets_namn FROM zhops_stad INNER JOIN ((zhops_fastighets_slag INNER JOIN zhops_fastighet ON zhops_fastighets_slag.fastighets_slag_id = zhops_fastighet.Fastighet_slag_id) INNER JOIN zhops_fastighet_tillsalu ON zhops_fastighet.Fastighet_id = zhops_fastighet_tillsalu.fastighet_id) ON zhops_stad.Stad_id = zhops_fastighet.stad_id"
else
	MySQL1 = "SELECT zhops_fastighet_tillsalu.fastighet_id, zhops_fastighet_tillsalu.Pris, zhops_fastighet_tillsalu.Datum, zhops_fastighet_tillsalu.fosaljnings_text, zhops_fastighet_tillsalu.kund_id, zhops_fastighets_slag.fastighets_slag_id, zhops_stad.Stad_id, zhops_stad.stad_namn, zhops_fastighets_slag.fastighets_slag, zhops_fastighet.Fastighets_namn FROM zhops_stad INNER JOIN ((zhops_fastighets_slag INNER JOIN zhops_fastighet ON zhops_fastighets_slag.fastighets_slag_id = zhops_fastighet.Fastighet_slag_id) INNER JOIN zhops_fastighet_tillsalu ON zhops_fastighet.Fastighet_id = zhops_fastighet_tillsalu.fastighet_id) ON zhops_stad.Stad_id = zhops_fastighet.stad_id WHERE zhops_stad.Stad_id="&stad
end if

if Alla_fastighets_slag = 0 then
	MySQL1 = MySQL1 & ";"
else
	MySQL1 = MySQL1 & " AND fastighets_slag_id="&Hyreshus&" OR fastighets_slag_id="&Fabrik&" OR fastighets_slag_id="&Affar&" OR fastighets_slag_id="&Kopcentrum&";"
end if

Set objRecordset1 = Server.CreateObject("ADODB.Recordset")

Tror att jag har krånglat till det mer än vad som behövs är det någon som har förslag hur man ska göra det effektivare.

Permalänk: https://www.webforum.nu/p/55069

---

Tråden på webben: https://www.webforum.nu/amne/asp/55069-tror-jag-har-krånglat-till-det