Do While Not RsAcron.EOF
            CnMySQL.Execute "insert into prozessdaten (" & _
              "Zeitstempel_Acron,Millisekunden_Acron,L_OW)" & _
            " Values('" & Format(RsAcron.Fields("timestamp").Value, "YYYY-MM-DD" & _
            "HH:MM:SS") & "'," & _
            RsAcron.Fields("milliseconds").Value & "," & RsAcron.Fields( _
            "l_ow_pval").Value & ")"
            RsAcron.MoveNext
        Loop