negative tal fra database?

Kan være noget jeg har overset.(håber jeg)

Problemet er at "kredit" ender med at være null eller ingenting

oldreg bliver lavet lidt før
dbkre("samlet") vil altid vare en negativ tal feks. -50.00 eller -340.50
Samletpris i database: float(11,2)

Koden:
---------------
strkrit = "select sum(Samletpris) as samlet from Kredit where Faknr = "&oldreg&""
set dbkre = Con.Execute(strkrit)

kredit = 0
if not dbkre.eof then
    kredit = kredit - dbkre("samlet")
end if