/ Forums / Advansys Formativ / Creating Solutions with Formativ / Not A Programmer Question – Interpret HTMLDialog / Reply To: Not A Programmer Question – Interpret HTMLDialog

#6535
Support 1a
Participant

Here is a very simple example of a HTML dialog. Create a new applet, then copy and paste this source code.

Please let me know if you require any further information.

Advansys Support

'-------------------------------------------------------------------------------
' Insert your comments here
'-------------------------------------------------------------------------------

Sub Main(Client, GWEvent)

  Set aDlg = Utilities.NewHTMLDialog 
  aDlg.ToolbarVisible = FALSE
  aDlg.Caption = "HTML dialog" 
  aDlg.HTMLCode = "<HTML> " &_
                  "  <HEAD> " &_
                  "  <TITLE></TITLE> " &_
                  "  </HEAD> " &_
                  "  <BODY>" &_
                  "  <FORM METHOD=""POST""> " &_
                  "  <TABLE BORDER=""0"" WIDTH=""100%""> " &_
                  "    <TR> " &_
                  "    <TD> Dialog Heading</TD> " &_
                  "    </TR> " &_
                  "    <TR> " &_
                  "    <TD HEIGHT=""50pt""> Body text</TD> " &_
                  "    </TR> " &_
                  "    <TR> " &_
                  "    <TD ALIGN=""RIGHT""><INPUT TYPE=""SUBMIT"" NAME=""MRCANCEL""" &_
                  "    VALUE=""Cancel"">   <INPUT TYPE=""SUBMIT"" NAME=""MROK""" &_
                  "    VALUE=""OK""> </TD> " &_
                  "    </TR> " &_
                  "  </TABLE> </FORM> </BODY>" &_
                  "</HTML>"
  aDlg.Execute 

End Sub