New Response

« Return to the main article

You are replying to:

  1. Thanks Eric.

    I'm not getting "agent done" msg anymore.

    However no view data is being returned! If anyone has an idea why my script does not seem to enter the While loop, I might actually get somewhere!

    I used the code given in the example (with Eric's two added lines) & I'm running Notes 5.0:

    Dim sess As New NotesSession Dim db As NotesDatabase Dim qs As NotesView Dim nv As NotesViewNavigator Dim ne As NotesViewEntry Set db = sess.CurrentDatabase Set qs = db.GetView("ByStore2") Set nv = qs.CreateViewNav Set ne = nv.GetFirst Print |Content-Type:application/vnd.ms-excel| Print |<table border="1"><tr><td width="80">Quarter</td><td>Sales</td></tr>| While Not(ne Is Nothing) Print|<tr><td>| + ne.ColumnValues(1) + |</td><td >| + ne.ColumnValues(2) + |</td></tr>| Set ne = nv.GetNext( ne ) Wend

Your Comments