Hej! Om jag har förstått dig rätt:Värde 0 på RS
Hämtar rs från tabell som innehåller valuta
Skriver ut detta som vanligt men vill inte att de poster som har värde 0 (Obs ej Null)
ej skall skrivas ut - hur går jag tillväga?
Någon som har ide??
Trevlig helg och vänliga hälsningar
Tyrone
________________________________________________________________
<!-- blad1 = Access hämtar värde från Excel (länk) där #0 är valuta -->
Dim RS
Dim Conn
Set RS=Conn.Execute("SELECT * FROM blad1")
If RS.EOF then
Response.Write("<b>nu har det gått fel - hem och sov med dig!</b>")
Else Do until RS.EOF
%>
<tr>
<th scope="col"><b><%=RS("A#NR")%></b></th>
<th scope="col"><b><%=RS("BENÄMNING")%></b></th>
<th scope="col"><b><%=RS("USL")%></b></th>
<th scope="col"><b><%=RS("#0")%></b></th>
</tr>
Sv: Värde 0 på RS
IF RS("A#NR") > 0 then
'skriv ut
End If
Eftersom du får kolla detta ett antal gånger, så skulle jag göra en SUB av det:
SUB kollaVarde(ByRef rec)
If rec > 0 then
response.write rec
End If
..därefter så kallar du bara på den
CALL kollaVarde(RS("A#NR") )
..nu är dena suben helt otestad, men den borde fungera så.