Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Checkboxar

Postades av 2002-08-13 16:01:05 - Peter Svensson, i forum asp - allmänt, Tråden har 3 Kommentarer och lästs av 427 personer

Tjo,

4 checkboxar. Lika många kolumner i databasen (Access) som är true/false.
Jag får inte till sidan som ska visa resultatet att visa mer än en checkbox.

Ex sida ett:
<code>
<FORM METHOD=POST ACTION="sida2.asp">
<input type="checkbox" name="ett" value="true"> ett<br>
<input type="checkbox" name="tva" value="true"> två<br>
<input type="checkbox" name="tre" value="true"> tre<br>
<input type="checkbox" name="fyra" value="true"> fyra<br>
<input type="submit" value="Search">
</form>
</code>

Sida två:
<code>
<%
Dim objcon, objRS, Path
Dim strSQL
Set objcon = Server.CreateObject("ADODB.Connection")
Path = Server.MapPath("testar.mdb")
objcon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Path
Set objRS=Server.CreateObject("ADODB.Recordset")

Dim strEtt, strTva, strTre, strFyra
strEtt = Request("ett")
strTva= Request("tva")
strTre= Request("tre")
strFyra= Request("fyra")

If strEtt = "true" then
strSQL = "Select * From checkboxar WHERE ett = true"
end if
If strTva = "true" then
strSQL = "Select * From checkboxar WHERE tva = true"
end if

...'osv för resterande checkboxar

objRS.Open strSQL, objcon, 1, 2
%>
</code>
Kryssar man i flera checkboxar visas ändå bara resultatet från en.
Jag tänker mig att sql frågan inte stämmer. Kan man spara ner värdena i en variabel som sedan körs i Sql frågan, kanske?





Svara

Sv: Checkboxar

Postades av 2002-08-13 23:10:06 - Andreas Hillqvist

Vet intw om det var så här du menar:
<code>
<FORM METHOD=POST ACTION="sida2.asp">
<input type="checkbox" name="ett" value="true"> ett<br>
<input type="checkbox" name="tva" value="true"> två<br>
<input type="checkbox" name="tre" value="true"> tre<br>
<input type="checkbox" name="fyra" value="true"> fyra<br>
<input type="submit" value="Search">
</form>


</code>
Sida två:
<code>
<%
Dim objcon, objRS, Path
Dim strSQL, strWhere
Dim strEtt, strTva, strTre, strFyra

strEtt = Request("ett")
strTva= Request("tva")
strTre= Request("tre")
strFyra= Request("fyra")

If strEtt = "true" Then
strWhere = strWhere & " OR ett = true"
End If

If strTva = "true" Then
strWhere = strWhere & " OR tva = true"
End If

If strTre = "true" Then
strWhere = strWhere & " OR Tre = true"
End If

If strFyra = "true" Then
strWhere = strWhere & " OR Fyra = true"
End If

If Len(strWhere) Then
strSQL = "SELECT * FROM checkboxar WHERE " & Mid(strWhere, 5)
Else
strSQL = "SELECT * FROM checkboxar WHERE True = False"
End If

Path = Server.MapPath("testar.mdb")

Set objcon = Server.CreateObject("ADODB.Connection")
objcon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Path

Set objRS=Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL, objcon
%>
</code>


Svara

Sv: Checkboxar

Postades av 2002-08-13 23:47:31 - Peter Svensson

Ah, lysande!

Tror tom jag förstår lite också.
strWhere lagrar vilka boxar som är klickade eller hur..?

<code>
Mid(strWhere, 5)
</code>
Vad gör den för nånting?

Mycken tack!


Svara

Sv: Checkboxar

Postades av 2002-08-14 12:32:28 - Andreas Hillqvist

Jag använder Mid() funktionen för att hoppa över första OR. IStället för att kontroller om det finns ett värde i strWhere:
<code>
If Len(strWhere) Then
strWhere = strWhere & " OR ett = true"
Else
strWhere = "ett = true"
End if
</code>


Svara

Nyligen

  • 08:28 Butiksskyltar: Hur upplever utbude
  • 22:31 Slappna av
  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 825
27 960
271 761
2 965
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies