FANDOM


Delete records:Edit

CurrentDb.Execute ("Delete * From [OutputTable]")

Update records:Edit

CurrentDb.Execute "UPDATE [InputTable] SET is_active = False"

Loop through records:Edit

    Dim rsInput As dao.Recordset: Set rsInput = CurrentDb.OpenRecordset("SELECT * FROM [InputTable]")

    rsInput.MoveFirst
    Do Until rsInput.EOF
            
        ' rsInput.fields("BugNumber").Value
           rsOutput.AddNew
        ' rsInput.fields("BugNumber").Value
        ' rsInput.fields("WouldLikeFixedBy").Value)
        ' rsInput.fields("NeedsAnalysisByOtherTeams").Value
            
        rsInput.MoveNext
    Loop

Add new record:Edit

Dim rsOutput As dao.Recordset: Set rsOutput = CurrentDb.OpenRecordset("SELECT * FROM ResourceMap")
rsOutput.AddNew
   rsOutput.fields("BugNumber").Value = '............
   rsOutput.fields("WouldLikeFixedBy").Value = '............
   rsOutput.fields("NeedsAnalysisByOtherTeams").Value = '............
   rsOutput.Update

Update existing record:Edit

Dim rsOutput As dao.Recordset: Set rsOutput = CurrentDb.OpenRecordset("SELECT * FROM ResourceMap")
rsOutput.Edit
   rsOutput.fields("BugNumber").Value = '............
   rsOutput.fields("WouldLikeFixedBy").Value = '............
   rsOutput.fields("NeedsAnalysisByOtherTeams").Value = '............
   rsOutput.Update

Find record in recordset:Edit

rs.FindFirst "AsInActiveDirectory = """ & lfName & """"
   If rs.NoMatch Then
       rs.AddNew
   Else
       rs.Edit
   End If

Ad blocker interference detected!


Wikia is a free-to-use site that makes money from advertising. We have a modified experience for viewers using ad blockers

Wikia is not accessible if you’ve made further modifications. Remove the custom ad blocker rule(s) and the page will load as expected.