如何让Visual Studio和web标准联姻
2007-08-27 21:35:13 来源:WEB开发网核心提示: Setp1:vs2005中建一个web工程,在一个新的页面上拖个Label服务器控件,如何让Visual Studio和web标准联姻(4),在工程中新添加一个browsers文件取名为test.browser,参看下图(十分抱歉,添加我们的代码如下:<browsers> &l
Setp1:vs2005中建一个web工程。在一个新的页面上拖个Label服务器控件。在工程中新添加一个browsers文件取名为test.browser,参看下图(十分抱歉,是日文的VS2005,虽然已经跳槽,但是现在仍然在原公司做交接工作):
Setp2:删除test.browser自动生产的代码,添加我们的代码如下:
<browsers>
<browserrefID="default">
<controlAdapters>
<adaptercontrolType="System.Web.UI.WebControls.Label"adapterType="LabelAdapter"/>
</controlAdapters>
</browser>
</browsers>
这段代码的意思是为所有的Label服务器端控件指定名为“LabelAdapter”的适配器类型。
Setp3:创建一个名为“LabelAdapter”的类。类代码如下(解释见注释):
ImportsSystem
ImportsSystem.Web.UI
ImportsSystem.Web.UI.WebControls
PublicClassLabelAdapter
InheritsSystem.Web.UI.WebControls.Adapters.WebControlAdapter
ProtectedOverloadsReadOnlyPropertyControl()AsLabel
Get
ReturnDirectCast(MyBase.Control,Label)
EndGet
EndProperty
ProtectedOverridesSubRenderBeginTag(ByValwriterAsHtmlTextWriter)
writer.WriteLine()'换行
writer.AddAttribute(HtmlTextWriterAttribute.Id,Control.ClientID)'添加一个id属性
IfNotString.IsNullOrEmpty(Control.ControlStyle.CssClass)Then'如果设置了cssClass就添加一个Class属性
writer.AddAttribute(HtmlTextWriterAttribute.Class,Control.ControlStyle.CssClass)
EndIf
writer.RenderBeginTag(HtmlTextWriterTag.Label)'标签头是label
writer.Indent=writer.Indent+1'增加缩进
EndSub
ProtectedOverridesSubRenderEndTag(ByValwriterAsHtmlTextWriter)
writer.Indent=writer.Indent-1'减少缩进
writer.RenderEndTag()'闭合标签
writer.WriteLine()
EndSub
ProtectedOverridesSubRenderContents(ByValwriterAsHtmlTextWriter)
RenderContent(writer)
EndSub
PrivateSubRenderContent(ByValwriterAsHtmlTextWriter)
writer.Write(Control.Text)'打出控件的text属性内容
EndSub
EndClass
Step3:编译、运行。
更多精彩
赞助商链接