Hej
Jeg har et problem, når jeg laver et selekterer nogle data i en tabel, lave
nogle beregninger og smider dem over i en anden tabel via recordsets. Jeg
skal have formateret resultatet, sålede at de tal der indsættes i
måltabellen, kun har 2 decimaler. Kan dette lade sige gøre i Access.
Udpluk af koden er nedenfor:
sql = "SELECT DISTINCTROW [tabel1].Type, Sum([tabel].[tal1])"
sql = sql & " AS [Sumogtal1], Sum([tabel1].[tal2]) AS [sumoftal2],"
sql = sql & " ([sumoftal1]/[sumoftal2])*60 AS [sum3],".................
Set dynKilde = db.OpenRecordset(sql, dbOpenDynaset)
dynKilde.MoveFirst
Do While Not dynKilde.EOF
dynmal.AddNew
For i = 0 To 15
dynmal(i) = dynKilde(i)
Next i
dynmal.Update
dynKilde.MoveNext
Loop
Med venlig hilsen
Keen Simonsen
|