• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 1234
  • Last Modified:

Microsoft VBScript runtime (0x800A005E) Invalid use of Null: 'cdbl'

Hi,

I receive the below error message on line 2 of the attached vb script code snippet:

Microsoft VBScript runtime (0x800A005E) Invalid use of Null: 'cdbl'

Do any experts know how I can fix this error? It only seems to flag now and again?

Thanks.
col_num = col_num + 1
col_sum(col_num) = col_sum(col_num) + sign * cdbl(itm.Value)
										if (sign * cdbl(itm.Value)) > 0 then
											fontcolor_st = ""
											fontcolor_et = ""
										else
											fontcolor_st = "<font color=red>"
											fontcolor_et = "</font>"
										end if
										Response.Write "<td class=s1d1_ce_r valign=top >" & fontcolor_st & GetYourFormat(sign * cdbl(itm.Value),number_format) & fontcolor_et & "</td>"

Open in new window

0
aspnet-scotland
Asked:
aspnet-scotland
  • 2
  • 2
1 Solution
 
VBClassicGuyCommented:
Maybe itm.Value sometimes is NULL? Might want to check for a valid value before executing the statement. Like:
If itm.Value <> Null Then
   col_sum(col_num) = col_sum(col_num) + sign * cdbl(itm.Value)
End If
0
 
aspnet-scotlandAuthor Commented:
I also get the error on the first line of the attached if you could help...
if (sign * cdbl(itm.Value)) > 0 then
											fontcolor_st = ""
											fontcolor_et = ""
										else
											fontcolor_st = "<font color=red>"
											fontcolor_et = "</font>"
										end if

Open in new window

0
 
aspnet-scotlandAuthor Commented:
I tried the attached but I still get the error?
if (sign * cdbl(itm.Value)) > 0 OR isNull(sign * cdbl(itm.Value)) then
											fontcolor_st = ""
											fontcolor_et = ""
										else
											fontcolor_st = "<font color=red>"
											fontcolor_et = "</font>"
										end if

Open in new window

0
 
VBClassicGuyCommented:
I think you have to do a check for "not null" on itm.Value all bu itself first, before you evaluate or do anything else. Just like my first example, make sure itm.Value is not null, then procede with your code.
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

  • 2
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now