Gets or sets the name of the data model.
            
            
            
Syntax
| Visual Basic (Declaration) |   | 
|---|
Property Name As String  | 
 
| Visual Basic (Usage) |  Copy Code | 
|---|
Dim instance As INameSupport
Dim value As String
 
instance.Name = value
 
value = instance.Name  | 
 
            
            
            Property Value
String containing the custom name
 
            
			
			
            
            
            
Example
This example notifies the user if the name of the model changes.
             
| C# |  Copy Code | 
|---|
FarPoint.Web.Spread.Model.DefaultSheetDataModel dsdm;
FarPoint.Web.Spread.Model.INameSupport ins;
private void PageLoad(object sender, System.EventArgs e)
{
      dsdm = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel;
      FpSpread1.Tab.TabControlPolicy = FarPoint.Web.Spread.TabControlPolicy.Always;
      Response.Write(dsdm.Name);
      ins = (FarPoint.Web.Spread.Model.INameSupport)dsdm;
      dsdm.NameChanged += new EventHandler(dsdmNameChanged);
      ins.NameChanged +=new EventHandler(insNameChanged);
}
private void Button1Click(object sender, System.EventArgs e)
{
      FpSpread1.Sheets[0].SheetName = "Test";
}
private void dsdmNameChanged(object sender, EventArgs e)
{
      Response.Write("alert('The name of the model has changed!!')");
}
private void insNameChanged(object sender, EventArgs e)
{
      Response.Write(ins.Name);
}
 | 
 
| Visual Basic |  Copy Code | 
|---|
Friend WithEvents dsdm As FarPoint.Web.Spread.Model.DefaultSheetDataModel
Friend WithEvents ins As FarPoint.Web.Spread.Model.INameSupport
Private Sub PageLoad(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      dsdm = FpSpread1.ActiveSheetView.DataModel
      ins = dsdm
      FpSpread1.Tab.TabControlPolicy = FarPoint.Web.Spread.TabControlPolicy.Always
      Response.Write(dsdm.Name)
End Sub
Private Sub Button1Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      FpSpread1.Sheets(0).SheetName = "Test"
      Response.Write(ins.Name)
End Sub
Private Sub dsdmNameChanged(ByVal sender As Object, ByVal e As EventArgs) Handles dsdm.NameChanged
      Response.Write("alert('The name of the model has changed!!')")
End Sub | 
 
 
            
            
Requirements
Target Platforms: Windows 98, Windows NT 4.0, Windows Millennium Edition, Windows 2000, Windows XP Home Edition, Windows XP Professional, Windows Server 2003 family, Windows Vista, Windows Server 2008 family
 
            
            
See Also