Dim myCommand As New OleDbCommand
        myCommand.Connection = myConnection
        myCommand.CommandText = ("INSERT INTO tbl_Filme VALUES (@ID, @FName," & _
          "@FUntertitel, @FJahr, @FBeschreibung, @FBewertung, @FAddTime)")
        myCommand.Parameters.Add("@ID", OleDbType.BigInt).Value = 0
        myCommand.Parameters.Add("@FName", OleDbType.VarWChar, 125).Value = _
          txtName.Text
        myCommand.Parameters.Add("@FUntertitel", OleDbType.VarWChar, 200).Value _
        = txtName.Text
        myCommand.Parameters.Add("@FJahr", OleDbType.VarWChar, 12).Value = _
        txtName.Text
        myCommand.Parameters.Add("@FBeschreibung", _
        OleDbType.LongVarWChar).Value = txtName.Text
        myCommand.Parameters.Add("@FBewertung", OleDbType.VarWChar, 50).Value = _
        txtName.Text
        myCommand.Parameters.Add("@FAddTime", OleDbType.DBTimeStamp).Value = _
        My.Computer.Clock.LocalTime
        myCommand.ExecuteNonQuery()