Hi AllI am redirecting one form into another form in web.While submitting.,i am running the following code in the agent.i want to send one value from the first form to anoother.
Dim ss As New NotesSession
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Dim cdoc As NotesDocument
Dim checkview As NotesView
Dim db As NotesDatabase
Set db=ss.CurrentDatabase
Set checkview=db.GetView("CheckView")
If checkview Is Nothing Then
Msgbox "no view found"
End If
Set doc=ss.DocumentContext
Set cdoc=checkview.GetDocumentByKey(doc.GetItemValue("user")(0))
If cdoc Is Nothing Then
Call doc.Save(True,False)
Else
Print |<script language="JavaScript">|
Print |loc = location.href.toLowerCase().split(".nsf")[0]+".nsf"|
Print |location.href=loc+"/frmloginpage?openform&user="|
Print |</script>|
End If
Exit Sub
In the above code.,i want to redirect into loginpage along with value doc.getitemvalue(“user”)(0)
I want url as www.aaa.nsf/frmloginpage?openform&user=aaaa
Thanks in advance