Hjälp med en INSERT sats

Vet inte ifall detta betraktas som korspostning, men jag gör ändå ett försök:

Jag har en sida med nedanstående kod:

<%
Session.LCID = 1053
Set vatskeb = Server.CreateObject( "Adodb.Connection" )
vatskeb.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath("\vatskebalans\db\vbalans.mdb")
vatskeb.ConnectionString = "Data Source='" & MdbFilePath & "'"
vatskeb.open

pnr= Request.Form("personnr")
d = FormatDateTime(Date, 2)
For each formObj in Request.Form
     If left(formObj,9) = "leggatill" Then
            lngFluidID = Replace(Request.Form(formObj), "leggatill", "")
            strSQL = "INSERT INTO tblVetskebalans(Dag, FluidID, Volym, PatID) VALUES(#" & d & "#,'" & lngFluidID & "'," & Request.Form("volym" & lngFluidID) & ", '" & pnr & "')"

 Response.Write strSQL
vatskeb.Execute strSQL, , 128
   
     End if
Next
            
vatskeb.close
Set vatskeb = Nothing

%>

Nu vill jag att i tblVetskebalans.Na lägga till resultatet av multiplikation mellan

1. textfältet där volymsskrivs = Request.Form("volym" & lngFluidID)
2. tblFluids.Na -> talfält(fälststorlek= enkel, format = fast, 4 decimaler)