aso,

vb code

strSQL = "UPDATE fms_fz SET status_fz='" & strSimple(6) & "', tki='" & strSimple(9) & "', user='" & user & "' WHERE kennung='" & strSimple(1) & "'"

ich hoffe, das du hier mit was anfangen kannst.