SPREAD for ASP.NETデモアプリケーション

using System;
using System.Data;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.Configuration;
public partial class clientcallback : System.Web.UI.Page
{
    protected void Page_Load(object sender, EventArgs e)
    {
        // クライアントイベント設定
        string js = "var spid='" + FpSpread1.ClientID + "';";
        ClientScript.RegisterStartupScript(this.GetType(), "onStartUpScript", js, true);       

        if (IsPostBack) return;

        //データ連結
        DataSet ds = new DataSet();
        ds.ReadXml(MapPath("../App_Data/data50.xml"));
        FpSpread1.DataSource = ds;

        //SPREAD初期化
        InitSpread(FpSpread1.Sheets[0]);
    }

    private void InitSpread(FarPoint.Web.Spread.SheetView sheet)
    {
        //SPREAD設定
        sheet.FpSpread.CssClass = "spreadStyle";
        sheet.FpSpread.ShowFocusRectangle = true;
        sheet.FpSpread.UseClipboard = false;

        // フォントサイズの設定
        sheet.DefaultStyle.Font.Size = FontUnit.Parse("80%");
        sheet.ColumnHeader.DefaultStyle.Font.Size = FontUnit.Parse("80%");
        sheet.RowHeader.DefaultStyle.Font.Size = FontUnit.Parse("80%");
        sheet.SheetCorner.DefaultStyle.Font.Size = FontUnit.Parse("80%");

        //シート設定
        sheet.PageSize = 10;

        //列幅の設定
        sheet.Columns[0].Width = 38;
        sheet.Columns[1].Width = 88;
        sheet.Columns[2].Width = 98;
        sheet.Columns[3].Width = 80;
        sheet.Columns[4].Width = 38;
        sheet.Columns[5].Width = 46;
        sheet.Columns[6].Width = 46;
        sheet.Columns[7].Width = 80;
        sheet.Columns[8].Width = 174;

        // 縦方向の揃え位置を中央に設定
        sheet.DefaultStyle.VerticalAlign = VerticalAlign.Middle;

        // ロックされたセルのスタイルの設定
        sheet.LockBackColor = System.Drawing.Color.Red;
        sheet.LockForeColor = System.Drawing.Color.White;
    }

    protected void FpSpread1_ButtonCommand(object sender, FarPoint.Web.Spread.SpreadCommandEventArgs e)
    {
        switch (e.CommandName)
	    {
            case "lock":
                FpSpread1.ActiveSheetView.DefaultStyle.Locked = true;
                break;

            case "unlock":
                FpSpread1.ActiveSheetView.DefaultStyle.Locked = false;
                break;
	    }

    }
}

Partial Public Class clientcallback
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        ' クライアントイベント設定
        Dim js As String = "var spid='" + FpSpread1.ClientID & "';"
        ClientScript.RegisterStartupScript(Me.GetType(), "onStartUpScript", js, True)

        If IsPostBack Then
            Return
        End If

        'データ連結
        Dim ds As New System.Data.DataSet()
        ds.ReadXml(MapPath("../App_Data/data50.xml"))
        FpSpread1.DataSource = ds

        'SPREAD初期化
        InitSpread(FpSpread1.Sheets(0))
    End Sub

    Private Sub InitSpread(ByVal sheet As FarPoint.Web.Spread.SheetView)
        'SPREAD設定
        sheet.FpSpread.CssClass = "spreadStyle"
        sheet.FpSpread.ShowFocusRectangle = True
        sheet.FpSpread.UseClipboard = False

        ' フォントサイズの設定
        sheet.DefaultStyle.Font.Size = FontUnit.Parse("80%")
        sheet.ColumnHeader.DefaultStyle.Font.Size = FontUnit.Parse("80%")
        sheet.RowHeader.DefaultStyle.Font.Size = FontUnit.Parse("80%")
        sheet.SheetCorner.DefaultStyle.Font.Size = FontUnit.Parse("80%")

        'シート設定
        sheet.PageSize = 10

        '列幅の設定
        sheet.Columns(0).Width = 38
        sheet.Columns(1).Width = 88
        sheet.Columns(2).Width = 98
        sheet.Columns(3).Width = 80
        sheet.Columns(4).Width = 38
        sheet.Columns(5).Width = 46
        sheet.Columns(6).Width = 46
        sheet.Columns(7).Width = 80
        sheet.Columns(8).Width = 174

        ' 縦方向の揃え位置を中央に設定
        sheet.DefaultStyle.VerticalAlign = VerticalAlign.Middle

        ' ロックされたセルのスタイルの設定
        sheet.LockBackColor = System.Drawing.Color.Red
        sheet.LockForeColor = System.Drawing.Color.White
    End Sub

    Protected Sub FpSpread1_ButtonCommand(ByVal sender As Object, ByVal e As FarPoint.Web.Spread.SpreadCommandEventArgs) Handles FpSpread1.ButtonCommand
        Select Case e.CommandName
            Case "lock"
                FpSpread1.ActiveSheetView.DefaultStyle.Locked = True
                Exit Select

            Case "unlock"
                FpSpread1.ActiveSheetView.DefaultStyle.Locked = False
                Exit Select
        End Select
    End Sub
End Class

<%@ Page MasterPageFile="~/MasterPage.master" Language="c#" AutoEventWireup="true" 
         Inherits="clientcallback" CodeFile="clientcallback.aspx.cs" %>

<%@ Register Assembly="FarPoint.Web.SpreadJ" Namespace="FarPoint.Web.Spread" TagPrefix="FarPoint" %>

<asp:Content ID="Content1" ContentPlaceHolderID="HeaderPlaceHolder1" Runat="Server">
    <script type="text/javascript">
        function splock(enable) {
            var spread = document.getElementById(spid);
            if (enable == 1) {
                spread.CallBack("lock");
            } else {
                spread.CallBack("unlock");
            }
        }

        function cstart(e) {
            var e = e || window.event;
            var enm = e.command;
            if (enm.indexOf("lock") != -1) {
                e.async = true;
            }
        }       
    </script>
</asp:Content>

<asp:Content ID="Content2" ContentPlaceHolderID="ContentPlaceHolder1" runat="server">
    <input id="Button1" type="button" value="セルをロック" onclick="splock(1)" />
    <input id="Button2" type="button" value="ロック解除" onclick="splock(0)" />
    <farpoint:FpSpread ID="FpSpread1" runat="server"  BorderColor="#A0A0A0" BorderStyle="Solid"
        BorderWidth="1px" onbuttoncommand="FpSpread1_ButtonCommand">
        <CommandBar BackColor="#F6F6F6" ButtonFaceColor="Control" ButtonHighlightColor="ControlLightLight"
            ButtonShadowColor="ControlDark" />
        <Sheets>
            <farpoint:SheetView SheetName="Sheet1">
            </farpoint:SheetView>
        </Sheets>
    </farpoint:FpSpread>
</asp:Content>