I cant save the this now to my database
error 3464 "data type mismatch"

here are the codes
Code:
Set db = OpenDatabase(App.Path & "\database\database.mdb")
    db.Execute "update audit_log set timeout = '" & TimeValue(Now) & "', totaltime = '" & totaltime & "' where id = '" & timeid & "'"
in my table(Audit_log) field2(timeout) and field3(totaltime) are text and my primary key field1(timeid) is autonumber

my variables in vb timevalue(now) is string.
totaltime is string
time id is integer

why I have data type mismatch??