4 svar · 365 visningar · startad av PatrikB
.... där det finns flera värden att hämta info med ....
Det är så att jag i ett fält i db har tex dessa uppgifter:
1, 10, 43 (alltid siffror, kommaterade)
Det är så att användaren ska kunna hämta tex endast 10 och lista info för den raden. 10 kommer med en querystring från en annan sida. querystringen kan även innehålla 1 eller 43 ... eller vilken siffra "som helst".
Fast, om qs innehåller 10 får den ej ta med 100, 1000 eller 110, 1100 osv ...
Någon som har en liten finurlig lösning, gärna i ett och samma recset.
cya,
PatrikB
------------------
=================================
** ZWGdesign **
=================================
[Redigerat av PatrikB den 07 sep 2000]
Ska klura lite på detta, men en enkel lösning rent spontant är att lagra värdet i databasen med ett inledande mellanslag, och ett efterföljande komma.
" 1, 10, 43,"
då är det bara att söka efter LIKE '% värdet,%'
------------------
Gunnar Liljas - webbutvecklare
Leon Reklambyrå AB
hello emission,
tyvärr, det funkade inte så bra, eller så som jag hade tänkt mig det.
Får skylla på den tidiga timmen att jag ej testade ordentligt.
Fixade det så här istället:
(strängen som kommer från RSkennel(1) kan se ut så här: 12,112,45,
eller
12)
'----- kod ------
SQL = "SELECT k.KE_ID, k.KE_RAS, k.KE_NAME, k.KE_CITY," & _
" r.fldRA_ID, r.fldRA_RAS FROM tblRas r, KENNEL k " & _
"WHERE r.fldRA_ID = " & intRas & _
" AND k.KE_RAS LIKE '%" & intRas & "%'"
Set RSkennel = Server.CreateObject("ADODB.Recordset")
RSkennel.Open SQL, oConn, 1, 3
'----- kod ------
Dim i
Dim strRas
Dim arrRas
Dim n
Dim intKennelID
Dim strKennel
Dim strCity
Dim objRas
i = 1 ' set proper value to get new row after 2 recs
Do Until RSkennel.EOF
intKennelID = RSkennel(0)
strRas = RSkennel(1)
strKennel = RSkennel(2)
strCity = RSkennel(3)
arrRas = Split(strRas,",")
For Each objRas In arrRas
' If correct RasID(intRas) is in the string,
' ie 65 and not 165 or 650 due to LIKE statement in sqlquery
' then show info
'------------------------------------------------------------
If objRas = intRas Then
Response.Write("<td><font face=""Verdana, Arial, Helvetica, sans-serif""" & _
" size=""2""><a href=""showKennel.asp?kennel=" & _
intKennelID & """>" & _
strKennel & "</a>, " & _
strCity & "</font></td>")
' check if a new table row should be created
'-------------------------------------------
If i mod 2 = 0 Then
Response.Write("</tr><tr>")
End If
i = i + 1
End If ' end objRas check
Next ' next objRas
RSkennel.MoveNext
Loop
End If
'------ kod ------
Vet ej om detta var den "bästa" lösningen. Har du en annan bättre lösning posta den gärna, fast denna funkar fint ;o
cya,
PatrikB
------------------
=================================
** ZWGdesign **
=================================
[Redigerat av PatrikB den 07 sep 2000]