Copy the code below into an agent and change the "SERVERNAME" to your Domino Quickr servers to add back in implicit versioning to any and all places on the server. It will also add implicit versioning to any and all documents added to Quickr so these will be versioned from that point on.

Use at your own risk, and always backup place NSF files before running code like this!

 
         Dim s As New NotesSession
         Dim dbdir As New NotesDbDirectory("SERVERNAME") 
         Dim db As NotesDatabase 
         Dim view As NotesView 
         Dim doc As NotesDocument 
         
         Set db = dbdir.GetFirstDatabase(DATABASE) 
         
         Do Until db Is Nothing 
                 If db.Open("","") Then 
                         If Ucase( db.FileName) = "MAIN.NSF" Then 
                                 Set view = db.GetView("System\Forms") 
                                 Set doc = view.GetFirstDocument 
                                 Do Until doc Is Nothing 
                                         doc.h_VersionType = "implicit" 
                                         Call doc.Save( False, False ) 
                                         Set doc = view.GetNextDocument(doc) 
                                 Loop 
                                 
                                 Set view = db.GetView("System\Docs By Folder") 
                                 If Not(view Is Nothing) Then 
                                         Set doc = view.GetFirstDocument 
                                         Do Until doc Is Nothing 
                                                 doc.h_VersionType = "implicit" 
                                                 Call doc.Save( False, False ) 
                                                 Set doc = view.GetNextDocument(doc) 
                                         Loop 
                                 End If 
                         End If 
                 End If 
                 
                 
                 Set db = dbdir.GetNextDatabase 
         Loop