suite4.net.FormDatabase Documentation

IForm.WebLoaderEvent Property

Gets a IWebLoaderEvent value for use in the WebLoader component.

[Visual Basic]
Property WebLoaderEvent As IWebLoaderEvent
[C#]
IWebLoaderEvent WebLoaderEvent {get;}

Property Value

An IWebLoaderEvent.

Remarks

This property is only used with the WebLoader. If an external JavaScript function assigns a new value to DataUniqueID, the WebLoader calls the specified web service to retrieve the data source (business class) values corresponding to the DataUniqueID value.

Example

The following example demonstrates how to serialize an IForm and assign a DataUniqueID.

C# sample

using System;
using suite4.net.FormDatabase;
using suite4.net.Sample;
namespace suite4.net.Web.Sample
{
    public class FormServer : System.Web.Services.WebService
    {
        [System.Web.Services.WebMethod]
        public string SerializeForm(string formName)
        {
            string                    projectFileName;
            Employee                employee;
            IForm                        form;
            IProject                project;
            WebLoaderAlert    webLoaderAlert;

            projectFileName = this.Server.MapPath("\\sample")  "\\sample.fspj";
            project = Project.LoadFromFile(projectFileName);
            if(project != null)
            {
                form = project.GetForm(formName);
                if(form != null)
                {
                    employee = new Employee();
                    employee.EmployeeID    = 1;
                    employee.LastName        = "Robert";
                    employee.LastName        = "King";
                    form.DataUniqueID        = employee.EmployeeID.ToString();
                    form.WebLoaderEvent.WsdlUrl        = "/FormServer/FormServer.asmx?wsdl";
                    form.WebLoaderEvent.Operation    = "GetEmployee";
                    form.WebLoaderEvent.ClearParameters();
                    form.WebLoaderEvent.AddParameter(WebLoaderParameterType.FormDatabase);
                    form.WebLoaderEvent.AddParameter(WebLoaderParameterType.FormName);
                    form.WebLoaderEvent.AddParameter(WebLoaderParameterType.DataUniqueID);
                    return form.SerializeToSwfXml(employee);
                }
                else
                {
                    webLoaderAlert = new WebLoaderAlert();
                    webLoaderAlert.Title = "Failed to load form";
                    webLoaderAlert.Message = "Can't find form "  formName;
                    return webLoaderAlert.SerializeToSwfXml();
                }
            }
            else
            {
                webLoaderAlert = new WebLoaderAlert();
                webLoaderAlert.Title = "Failed to load project";
                webLoaderAlert.Message = "Can't find project\n"  projectFileName;
                return webLoaderAlert.SerializeToSwfXml();
            }
        }
    }
}
            

VB.Net sample
Imports System
Imports suite4.net.FormDatabase
Imports suite4.net.Sample
Namespace suite4.net.Web.Sample
    Public Class FormServer
     Inherits System.Web.Services.WebService
        <System.Web.Services.WebMethod> _
        Public Function SerializeForm(ByVal formName As String) As String
            Dim projectFileName As String
            Dim employee As Employee
            Dim form As IForm
            Dim project As IProject
            Dim webLoaderAlert As WebLoaderAlert

            projectFileName = Me.Server.MapPath("\\sample")  "\\sample.fspj"
            project = Project.LoadFromFile(projectFileName)
            If Not project Is Nothing Then
                form = project.GetForm(formName)
                If Not form Is Nothing Then
                    employee = New Employee()
                    employee.EmployeeID    = 1
                    employee.LastName        = "Robert"
                    employee.LastName        = "King"
                    form.DataUniqueID        = employee.EmployeeID.ToString()
                    form.WebLoaderEvent.WsdlUrl        = "/FormServer/FormServer.asmx?wsdl"
                    form.WebLoaderEvent.Operation    = "GetEmployee"
                    form.WebLoaderEvent.ClearParameters()
                    form.WebLoaderEvent.AddParameter(WebLoaderParameterType.FormDatabase)
                    form.WebLoaderEvent.AddParameter(WebLoaderParameterType.FormName)
                    form.WebLoaderEvent.AddParameter(WebLoaderParameterType.DataUniqueID)
                    Return form.SerializeToSwfXml(employee)
                Else
                    webLoaderAlert = New WebLoaderAlert()
                    webLoaderAlert.Title = "Failed to load form"
                    webLoaderAlert.Message = "Can't find form "  formName
                    Return webLoaderAlert.SerializeToSwfXml()
                End If
            Else
                webLoaderAlert = New WebLoaderAlert()
                webLoaderAlert.Title = "Failed to load project"
                webLoaderAlert.Message = "Can't find project\n"  projectFileName
                Return webLoaderAlert.SerializeToSwfXml()
            End If
        End Function
    End Class
End Namespace

            

See Also

IForm Interface | suite4.net.FormDatabase Namespace