サーバアプリケーションとの連携

Biz/BrowserはWEBサーバとHTTPで通信を行います。従って、WEBサーバ側で動作するアプリケーションは、通常のWEBブラウザとの通信と同じようにBiz/Browserからのリクエストを受け取り、レスポンスを返すことができます。

IIS上で動作するVBScriptの例

この例では、Biz/BrowserのTextBox1に"Hello"と表示します。

--- CRS sample1.crs ---

Form sample {
    Width = 300;
    Height = 200;
    TextBox TextBox1 {
        X = 10;
        Y = 10;
        Width = 100;
        Height = 30;
    }
    Get("sample1.asp");
}

--- VBScript – sample1.asp ---

<%
    Response.Write("TextBox1.value = "+Chr(&h22)+"Hello"+Chr(&h22)+";")
%>

このようにサーバ側のプログラム方法はHTMLと何ら変りません。唯一の違いは応答する内容が、HTMLではなくCRSスクリプトとなる点だけです。

Biz/Browserからデータを送信する例

この例では、Biz/BrowserのButton1をタップしたときTextBox1に入力された値をWEBサーバに渡します。

--- CRS sample2.crs ---

Form sample {
    Width = 300;
    Height = 200;
    TextBox TextBox1 {
        X = 10;
        Y = 10;
        Width = 100;
        Height = 30;
    }
    Button Button1 {
        X = 10;
        Y = 50;
        Width = 100;
        Height = 30;
        Title = "click";
        Function OnTouch(e) {
            Get("sample2.asp", sample.TextBox1);
        }
    }
}

--- VBScript – sample2.asp ---

<%
    ' リクエストパラメータの取得
    data = Request.Form("TextBox1")
    Response.Write("title = "+Chr(&h22)+data+Chr(&h22)+";")
%>

このように、パラメータの受け取りも、HTMLの場合と何ら変ることはありません。

Biz/Browserとサーブレットの連携例

③〜⑥のCRSスクリプト例
:
Button MyButton {
    ：
    Function OnTouch(e) {
        try {
            var session = getHttpSession();
            var request = session.CreateRequest("/app/proc1");
            request.AddParam("code", 123);
            var response = session.Post(request);
            var xmlImpl = new xmlDOMImplimentation;
            var xdoc = xmlImpl.Load(response);
            this.Title = xdoc.SelectSingleNode("//name").Text;
        }
        catch (exp) {
            MessageBox(exp);
        }
    }
:
}
: