Formatering af tal

Jeg har en sql sætning:
<%
SQL1= \"SELECT SUM(Total) AS TotalPris FROM Basket %>

Denne sætning opsummerer alle køb i en kurv og giver outputtet TotalPris aka et tal.

I en anden tabel har jeg nogle priser for levering som skal lægges til TotalPris hvorfor jeg gør således:

<%If \"\"&RS2(\"Levering\")&\"\" = 1 Then
          SQL3=\"Select * from Levering\"
          Set RS3=Conn.execute(SQL3)
          %>
          <% Set mus = (RS1(\"TotalPris\"))
          Set mas = (RS3(\"Gebyr\"))
          Set mis = (RS3(\"Leveringspris\"))
          If mus < 600 then
          set LevPris = mas + mis
          else
          Set LevPris = mis
          end if
         
          %>

Grunden til den lidt omstændige kode er at hvis beløbet er under 600 så skal der lægges gebyr på. Her kommer så problemet:

<%Set TOTINCL = \"\"&RS1(\"TotalPris\")&\"\" + \"&LevPris&\"%>
                <%

Response.write(TOTINCL)%>
<%end if%>

Denne sætning giver følgende fejl:

Der opstod en Microsoft VBScript-kørselsfejl error \'800a01a8\'

Et objekt er obligatorisk: \'[string: \"1343&LevPris&\"]\'

PayOrderView.asp, line 199

Jeg ved det er noget med formateringen af tal. Det ene er sikkert opfattet som text og det andet tal.

Har prøvet følgende som egentlig også skal indgå:

<%
kroner = \"Kr. \"&formatnumber(RS1(\"TotalPris\"),2)
Response.write kroner%>