2 decimal vises ikke

http://www.w3schools.com/vbscript/func_formatnumber.asp kan mange ting

Hej og tak for hjælpen, men har nu prøvet med:
SUM_IN = Formatnumber(Rs("sum_ind"),2)

Men får fejlen:

Microsoft VBScript runtime error '800a000d'
Type mismatch: 'Formatnumber'

/login/regnskab.asp, line 58

line 58 er:
SUM_IN = Formatnumber(Rs("sum_ind"),2)

Ja, hvad står der i feltet?

Har prøvet med dette:

<table>
<td style="text-align:left;" width="60px">&nbsp;<span><%=SUM_IN%></span></td>
</table>

Feltet i DB'en indeholder tal (datatype: decimal(6,2)), eks. 150.50

prøv med <%=cdbl(SUM_IN)%>

Får denne fejl:

Invalid use of Null: 'cdbl'

/login/regnskab.asp, line 68

Formatnumber kan vist heller ikke li' null-værdier. Prøv om den virker på felter, hvor der ikke står null.

' det er fordi er der er felter hvor der ikke er noget i så prøv dette

SUM_IN = Rs("sum_ind")
SUM_DE = Rs("sum_deb")
SUM_KR = Rs("sum_kre")
SAMLET = Rs("sum_ind") + Rs("sum_deb") - Rs("sum_kre")

if SUM_IN <> ""
if SUM_IN > 0 then
SUM_IN = cdbl(SUM_IN)
end if
end if

if SUM_DE <> ""
if SUM_DE > 0 then
SUM_DE = cdbl(SUM_DE)
end if
end if

if SUM_KR <> ""
if SUM_KR > 0 then
SUM_KR = cdbl(SUM_KR)
end if
end if

if SAMLET <> ""
if SAMLET > 0 then
SAMLET = cdbl(SAMLET)
end if
end if

Der manglede vist Then i dem alle, men prøvede med:

if SUM_IN <> "" Then
if SUM_IN > 0 then
SUM_IN = cdbl(SUM_IN)
end if
end if

if SUM_DE <> "" Then
if SUM_DE > 0 then
SUM_DE = cdbl(SUM_DE)
end if
end if

if SUM_KR <> "" Then
if SUM_KR > 0 then
SUM_KR = cdbl(SUM_KR)
end if
end if

if SAMLET <> "" Then
if SAMLET > 0 then
SAMLET = cdbl(SAMLET)
end if
end if

Får nu ingen fejl, men heller ikke nogle decimaler, medmindre tallet eks. er 255.45, kan man ikke bruge noget replace istedet??

Kim

ups det havde jeg lige glemt - then.

prøv at udskifte cdbl med formatnumber(samlet,2) osv.

Okay, tak

nu virker alle undtaget SAMLET

Har prøvet med:

if SAMLET <> "" Then
if SAMLET > 0 then
SAMLET = formatnumber(SAMLET,2)
end if
end if

og

SAMLET = formatnumber(Rs("sum_ind") + Rs("sum_deb") - Rs("sum_kre"),2)

<%
if SUM_IN <> "" Then
if SUM_IN > 0 then
SUM_IN = formatnumber(SUM_IN,2)
end if
end if

if SUM_DE <> "" Then
if SUM_DE > 0 then
SUM_DE = formatnumber(SUM_DE,2)
end if
end if

if SUM_KR <> "" Then
if SUM_KR > 0 then
SUM_KR = formatnumber(SUM_KR,2)
end if
end if

if SUM_IN > 0 then
if SUM_DE > 0 then
SAMLET = cdbl(SUM_IN) + cdbl(SUM_DE)
else
SAMLET = cdbl(SUM_IN)
end if
end if

if SUM_KR > 0 then
SAMLET = SAMLET - cdbl(SUM_KR)
else
SAMLET = SAMLET - 0
end if


%>)

Det virker heller ikke, SAMLET er stadig uden 2 decimal (og udregningen er forkert)

Fatter ikke hvorfor det ikke bare kan virke.

Nu virker det sku...

Ved ikke helt hvorfor, men skidt :o)

if SAMLET <> "" Then
SAMLET = formatnumber(SAMLET,2)
else
SAMLET = ""
end if

det var godt.