webForumDet fria alternativet

Tomt fält i databas

ASP

9 svar · 309 visningar · startad av Sammy

Medlem sedan maj 2000202 inlägg
Frågan#1

Hur ska jag skriva om jag vill att tomma fält i en databas ska hoppas över?
Alltå att i det här fallet ska nästa bild visas om jag nu har lagt till en bild i databasfältet PICTURE.

<%
If IsNull(RStemp("PICTURE")) then
'vad ska jag skriva här?'
Else
Response.Write "<td align=center valign=top> <IMG src=thumbs/" & RStemp("PICTURE") & "><BR>" & RStemp("NAMN") & "</td>"
End If
%>

------------------
/Sammy Swärd

Medlem sedan juni 20008 205 inlägg
#2

Grundläggande logik...

 If Not IsNull(RStemp("PICTURE")) then
Response.Write "<td align=center valign=top> <IMG src=thumbs/" & RStemp("PICTURE") & "><BR>" & RStemp("NAMN") & "</td>"
End If

[Redigerat av spango den 28 aug 2001]

Medlem sedan maj 2000202 inlägg
#3

Jojo.. men är fältet tomt så hoppas den inte över de tomma fälten. Det är ju det jag vill uppnå.

------------------
/Sammy Swärd

Medlem sedan juni 200032 967 inlägg
#4

du får nog försöka beskriva problemet lite närmre. jag fattar i alla fall ingenting. :)

------------------
mördar-anders, det är jag.

Medlem sedan juni 20008 205 inlägg
#5

Hur menar du med "hoppa över"? Lämna en tom tabellcell, eller?

------------------
The mud can make you prisoner, the plains can make you dry,
the snow can burn your eye but only people make you cry...

Medlem sedan juni 20019 024 inlägg
#6
If IsNull(RStemp("PICTURE")) OR IsEmpty(RStemp("PICTURE")) OR RStemp("PICTURE") = "" then

------------------
Peter D

Medlem sedan maj 2000202 inlägg
#7

<%
'***** Skapar Connection-objektet *****'
Set Connect = Server.CreateObject("ADODB.Connection")
'***** Specifierar sökvägen *****'
MdbFilePath = Server.MapPath("../../../db/test.mdb")
'***** öppnar databasen *****'
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"

Set RStemp = Connect.Execute("Select TOP 4 \* From DATABAS order by DATUM desc, NAMN")

%>

<TABLE bgcolor="#FFFFFF" width="100%" border="0" cellspacing="1" cellpadding="0">
<TR>
<%
Do Until RStemp.EOF
%>
<%
If IsNull(RStemp("PICTURE")) then
'här vill jag att den hoppar till nästa fält/hittade bild'
Else
Response.Write "<td width=25% align=center valign=top> <IMG src=thumbs/" & RStemp("PICTURE") & "><BR>" & RStemp("NAMN") & "</td>"
End If
%>

 \<%
  RStemp.MoveNext
  Loop
 %\>
\</TR\>

</table>

<%
Connect.close
Set Connect = nothing
%>

ALltså jag vill visa de senaste 4 bilderna. Är fältet tomt vill jag att den söker vidare efter nästa. För som det är nu så visar den endast 1 bild?

------------------
/Sammy Swärd

[Redigerat av Sammy den 28 aug 2001]

Medlem sedan aug. 20012 349 inlägg
#8
<%
If NOT IsNull(RStemp("PICTURE")) then
Response.Write "<td width=25% align=center valign=top> <IMG src=thumbs/" & RStemp("PICTURE") & "><BR>" & RStemp("NAMN") & "</td>"
End If
%>

Detta är väl vad du är ute efter??

------------------
calling me a motherfucker, saying he's gonna blow me away and blah, blah, blah, blah, blah.
National Blonde Day!

[Redigerat av mrblonde den 28 aug 2001]

Medlem sedan juni 20008 205 inlägg
#9

ALltså jag vill visa de senaste 4 bilderna.

SELECT TOP 4 * FROM tabell WHERE NOT bildfält IS NULL :q

------------------
The mud can make you prisoner, the plains can make you dry,
the snow can burn your eye but only people make you cry...

[Redigerat av spango den 28 aug 2001]

Medlem sedan maj 2000202 inlägg
#10

YES!

Tack Spango!!! Precis vad jag ville åt! ;)

------------------
/Sammy Swärd

259 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
124 ms — deklarationer (db)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)
118 ms — ändringar (db)