Tomt fält i databas

9 svar · 350 visningar · startad av Sammy 28 aug. 2001

SammyMedlem sedan maj 2000202 inlägg

Trådstart28 aug. 2001 13:10#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
%>

spangoMedlem sedan juni 20008 205 inlägg

28 aug. 2001 13:41#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]

SammyMedlem sedan maj 2000202 inlägg

28 aug. 2001 13:52#3

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

@ndersMedlem sedan juni 200032 967 inlägg

28 aug. 2001 13:55#4

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

spangoMedlem sedan juni 20008 205 inlägg

28 aug. 2001 13:56#5

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

PaceMedlem sedan juni 20019 024 inlägg

28 aug. 2001 13:59#6

If IsNull(RStemp("PICTURE")) OR IsEmpty(RStemp("PICTURE")) OR RStemp("PICTURE") = "" then

SammyMedlem sedan maj 2000202 inlägg

28 aug. 2001 14:10#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?

mrblondeMedlem sedan aug. 20012 349 inlägg

28 aug. 2001 14:40#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??

spangoMedlem sedan juni 20008 205 inlägg

28 aug. 2001 14:55#9

ALltså jag vill visa de senaste 4 bilderna.

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

SammyMedlem sedan maj 2000202 inlägg

28 aug. 2001 15:18#10

YES!

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