QUESTION POSED ON: 16 December 2004
I have a problem related to server DSN connectivity in Lotus Notes. I want to access the server DSN in LotusScript. But it shows this error:
**Notes error: Error Validating user's agent execution access.**
I am running the agent and it's called another agent odbc1. How can I call server DSN?
My code is:
Dim session As New NotesSession
Dim uidoc As NotesUIDocument
Dim ws As New NotesUIWorkspace
Dim notsagent As NotesAgent
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim parm As String
Set db = session.CurrentDatabase
Set doc = New NotesDocument(db)
Set uidoc = ws.CurrentDocument
Set notsagent=db.GetAgent("odbc1")
Call doc.save(True, False)
parm = doc.NoteID
Msgbox "Parameter of " & parm
Call notsagent.RunOnServer(parm)
Msgbox "Right"
|
