Simple unusual variable problem

Hi guru guys,

I have serious problem. At first sight it looks very simple but i dont
have any idea how to solve it.

With this statement 'If len(rs_cit) = 0 then rs_cit = 0' I cant put
into variable 'rs_cit' value '0' if it is clean. There is no value in
html displayed.

Here is code:

...
Dim rs_customer, rs_cit, rs_total, rs_manual

i = 1
Do While Not RS.Eof

rs_customer = RS("customer")
rs_account = RS("account")
rs_cit = RS("cit")
rs_total = RS("total")
rs_manual = rs_total - rs_cit

If len(rs_cit) = 0 then rs_cit = 0
'neither this does not work: If rs_cit = "" then rs_cit = 0


response.write ("<tr>")
response.write ("<td bgcolor='black' align='right'>" & i & ".</td>")
i = i + 1
response.write ("<td bgcolor='black'>" & rs_account & "</td>")
response.write ("<td bgcolor='black'>" & rs_customer & "</td>")
response.write ("<td align='center' bgcolor='#666666'>" & rs_cit &
"</td>")
response.write ("<td align='center' bgcolor='#666666'>" & rs_manual &
"</td>")
response.write ("<td align='center' bgcolor='#666666'>" & rs_total &
"</td>")
response.write ("</tr>")
RS.MoveNext
Loop
...

rs_cit = RS("cit") might be null.  In some cases using Len can be
unreliable.

Try

If IsNull(rs_cit) Or Len(rs_cit) = 0 Then rs_cit = 0


"Bramo" <aenima@pobox.sk> wrote in message
news:e302df07.0409232232.513f3977@posting.google.com...
> Hi guru guys,
>
> I have serious problem. At first sight it looks very simple but i dont
> have any idea how to solve it.
>
> With this statement 'If len(rs_cit) = 0 then rs_cit = 0' I cant put
> into variable 'rs_cit' value '0' if it is clean. There is no value in
> html displayed.
>
> Here is code:
>
> ...
> Dim rs_customer, rs_cit, rs_total, rs_manual
>
> i = 1
> Do While Not RS.Eof
>
> rs_customer = RS("customer")
> rs_account = RS("account")
> rs_cit = RS("cit")
> rs_total = RS("total")
> rs_manual = rs_total - rs_cit
>
> If len(rs_cit) = 0 then rs_cit = 0
> 'neither this does not work: If rs_cit = "" then rs_cit = 0
>
>
> response.write ("<tr>")
> response.write ("<td bgcolor='black' align='right'>" & i & ".</td>")
> i = i + 1
> response.write ("<td bgcolor='black'>" & rs_account & "</td>")
> response.write ("<td bgcolor='black'>" & rs_customer & "</td>")
> response.write ("<td align='center' bgcolor='#666666'>" & rs_cit &
> "</td>")
> response.write ("<td align='center' bgcolor='#666666'>" & rs_manual &
> "</td>")
> response.write ("<td align='center' bgcolor='#666666'>" & rs_total &
> "</td>")
> response.write ("</tr>")
> RS.MoveNext
> Loop
> ...

Bramo wrote:
> With this statement 'If len(rs_cit) = 0 then rs_cit = 0' I cant put
> into variable 'rs_cit' value '0' if it is clean. There is no value in
> html displayed.
> ...
> rs_cit = RS("cit")
> ...
> If len(rs_cit) = 0 then rs_cit = 0
> 'neither this does not work: If rs_cit = "" then rs_cit = 0

For what it's worth, this is all you need to meet your needs in JScript:

rs_cit = RS.Fields("cit").Value || 0


It is sufficient because JScript coerces null and empty string values into
false boolean values when used in conditional assignment constructions.



--
Dave Anderson

Unsolicited commercial email will be read at a cost of $500 per message. Use
of this email address implies consent to these terms. Please do not contact
me directly or ask me to contact you directly for assistance. If your
question is worth asking, it's worth posting.