Creating New Author Field

This is sort of an updated post from yesterday- I have written LS (code follows) to create a new field called Author that is an “Author” data type - its value should be the value of the current field “Name”- at first look it works- but, I find on some of the documents, my name is in the “Author” field- not the value of the Name field- and in those cases, there is a $writers field that has my name in it- one last oddity is that on some documents in field property the type says “SUMMARY NAMES” & in others the type says "SUMMARY READ/WRITE-ACCESS NAMES " (which is what they all should say.) Here is my code.

Sub Initialize

Dim db As New NotesDatabase( "server","mydb.nsf" )

	Dim view As NotesView

Dim doc As NotesDocument

Set view = db.GetView("FixAuthorField")

Set doc = view.GetFirstDocument

'Dim Author As String

Dim AuthorField As String

Set	doc = view.GetFirstDocument

Dim Counter As Integer

counter = 0

Do Until doc Is Nothing

	AuthorField=doc.Name(0)

	Dim AuthorsITem As New NotesItem(doc,"Author",AuthorField,Authors)

	Set Doc = view.GetNextDocument(Doc)

	Counter = Counter + 1

	Print "I am working on " & Counter

Loop

End Sub

Subject: Creating New Author Field

Okay - putting in call doc.save helped a lot! Doh!