FormatNumber

• Jan 13, 2014

• #2

xwb

Programmer

Jul 11, 2002

6,828

GB

Have you looked at

http://www.w3schools.com/vbscript/func_formatnumber.asp

Show us what you have tried with format number that doesn't work as you would like it.

 

Upvote 0 Downvote

• Jan 14, 2014

• Thread starter
• #3

hubit

Technical User

Jan 13, 2014

6

DK

I have tried a lot off kombinations
This
response.write("<td align='right'>" + cstr(RS("TRANSPORTPRIS")&"") + "</td>")
Works fine

Then i tried to kombine it with the FormatNumber

response.write("<td align='right'>" + FormatNumber(cstr(RS("TRANSPORTPRIS"))&""),2 + "</td>")
response.write("<td align='right'>" + Formatnumber(rs("TRANSPORTPRIS"),2) + "</td>")

 

Upvote 0 Downvote

• Jan 14, 2014

• #4

xwb

Programmer

Jul 11, 2002

6,828

GB

FormatNumber requires a number: not a string. So if you want two decimal places, it would be

Code:

response.write("<td align='right'>" & FormatNumber(RS("TRANSPORTPRIS"),2) & "</td>")

The second one should have worked except possibly you used + instead of & for string concatenation. Use + for javascript, & for vbscript.

 

Upvote 0 Downvote

• Jan 14, 2014

• Thread starter
• #5

hubit

Technical User

Jan 13, 2014

6

DK

Ok there have been used + ind all the other lines
So when I use the (have tried the & as well
response.write("<td align='right'>" + FormatNumber(RS("TRANSPORTPRIS"),2) + "</td>")

I keep getting the error


Microsoft VBScript runtime error '800a000d'

Type mismatch: 'FormatNumber'

 

Upvote 0 Downvote

• Jan 14, 2014

• #6

xwb

Programmer

Jul 11, 2002

6,828

GB

I think RS("TRANSPORTPRIS") returns a string. Try converting it to a double before formatting

Code:

response.write("<td align='right'>" & FormatNumber(cdbl(RS("TRANSPORTPRIS")),2) & "</td>")

 

Upvote 0 Downvote

• Jan 14, 2014

• Thread starter
• #7

hubit

Technical User

Jan 13, 2014

6

DK

New error

Microsoft VBScript runtime error '800a005e'

Invalid use of Null: 'cdbl'

 

Upvote 0 Downvote

• Jan 14, 2014

• Thread starter
• #8

hubit

Technical User

Jan 13, 2014

6

DK

New error

Microsoft VBScript runtime error '800a005e'

Invalid use of Null: 'cdbl'

 

Upvote 0 Downvote

• Jan 14, 2014

• #9

xwb

Programmer

Jul 11, 2002

6,828

GB

Looks like RS(...) is NULL. Check that RS("TRANSPORTPRIS") is not null before writing it.

 

Upvote 0 Downvote

• Jan 17, 2014

• #10

gk53

Programmer

Jul 7, 2005

216

US

it is simple

Code:

if cstr(RS("TRANSPORTPRIS")&"")<>"" then 
response.write("<td align='right'>" &  FormatNumber(cdbl(RS("TRANSPORTPRIS")),2) & "</td>") 
else
response.write("<td align='right'></td>") 
end if

 

Upvote 0 Downvote

• Jan 17, 2014

• #11

ChrisHirst

IS-IT--Management

Nov 23, 2001

8,049

GB

What's wrong with the IsNull() function?

Chris.

Indifference will be the downfall of mankind, but who cares?
Time flies like an arrow, however, fruit flies like a banana.
Webmaster Forum

 

Upvote 0 Downvote

• Jan 17, 2014

• #12

guitarzan

Programmer

Apr 22, 2003

2,236

US

Also IsNumeric()

 

Upvote 0 Downvote

• Jan 18, 2014

• Thread starter
• #13

hubit

Technical User

Jan 13, 2014

6

DK

Hi

When I use the code from gk53 everything is workngust fine.

I haven't used th idNumeric() ane IsNull() funktion. I'l try them another day.

Thank you for all the help.

 

Upvote 0 Downvote

• Jan 21, 2014

• #14

gk53

Programmer

Jul 7, 2005

216

US

I use cstr(RS("TRANSPORTPRIS")&"")<>"" becouse isNull check for null value, but will not catch "" value it is not null, so you should have to chack for isNull() and cstr(RS("TRANSPORTPRIS"))<>"" or isNumeric().
IsNumeric() check just for numeric value and if it is null not catching that...
I think
if cstr(RS("TRANSPORTPRIS")&"")<>"" then

simpler then
if ((not isNull(RS("TRANSPORTPRIS"))) and isNumeric(RS("TRANSPORTPRIS"))) then

(extra parenteces just for readability)

 

Upvote 0 Downvote