asp.net|编译利息计算器
首先,我们打开 Visual Studio .NET Whidbey,创建一个名为 Compilation 的新 Web 站点。创建 Web 站点之后,IDE 应与图 1 类似。
图 1:Visual Studio .NET Whidbey Web 站点
然后,我们将 \Code 文件夹添加到该 Web 站点,添加方法为右击该项目,然后选择 New Folder(新建文件夹)。此文件夹必须命名为 Code,但名称不区分大小写。添加文件夹后,我们可以添加一个新的类文件:右击 \Code 文件夹,单击 Add New Item...(添加新项...),然后在 Add New Item(添加新项)对话框的 Templates(模板)窗格中选择 Class(类)项。将类命名为 CalculateInterest.vb。然后添加用于计算利息的代码(将其添加到 Class 和 End Class 语句之间):
Public Function CalcBalance(ByVal Prncpl As Integer, _ ByVal Rate As Double, _ ByVal Years As Integer, _ ByVal Period As Integer) As String Dim BaseNum As Double = (1 + Rate / Period) CalcBalance = _ Format(Prncpl * System.Math.Pow(BaseNum, _ (Years * Period)), "#,###,##0.00").ToStringEnd Function
创建组件类后,我们需要修改 Default.aspx 页面以提供用来输入数据的字段,还需要调用组件的 CalcBalance 方法。为了简单起见,Default.aspx 的完整列表显示如下(请注意,Default.aspx 使用单文件代码模型)。
Default.aspx:
<% page language="VB" %><script runat="server"> Sub Button1_Click(ByVal sender As Object, _ ByVal e As System.EventArgs) Dim Calc As New CalculateInterest Label6.Text = "$" & _ Calc.CalcBalance(Convert.ToInt32(TextBox1.Text), _ (Convert.ToInt32(TextBox2.Text) / 100), _ Convert.ToInt32(TextBox3.Text), _ Convert.ToInt16(Dropdownlist1.SelectedValue)) Label6.Visible = True End Sub</script><html><head runat="server"> <title> 利息计算器</title></head><body> <form runat="server"> <asp:label id="Label1" runat="server">P本金 ($):</asp:label> <asp:textbox id="TextBox1" runat="server"> </asp:textbox> <br /> <asp:label id="Label2" runat="server">利率 (%):</asp:label> <asp:textbox id="TextBox2" runat="server"> </asp:textbox> <br /> <asp:label id="Label3" runat="server">年数:</asp:label> <asp:textbox id="TextBox3" runat="server"> </asp:textbox> <br /> <asp:label id="Label4" runat="server">复利频率:</asp:label> <asp:dropdownlist id="Dropdownlist1" runat="server"> <asp:ListItem Value="1">每年</asp:ListItem> <asp:ListItem Value="4">每季</asp:ListItem> <asp:ListItem Value="12">每月</asp:ListItem> <asp:ListItem Value="365">每日</asp:ListItem> </asp:dropdownlist> <br /> <asp:label id="Label5" runat="server">结余: </asp:label> <asp:label id="Label6" visible="false" runat="server"></asp:label> <br /> <asp:button id="Button1" runat="server" text="计算" /> </form></body></html>
在设计视图中,修改后的 Default.aspx 应与图 2 类似。
图 2:设计视图中的 Default.aspx
需要注意是,当您在用于调用组件类的 <脚本> 块中键入代码时,将获得完整的 IntelliSense 语句完成(包括组件类),如图 3 所示。这是在 Visual Studio .NET 2003 基础上的一大改进,Visual Studio .NET 2003 不支持服务器端 <脚本> 块中的 IntelliSense。
图 3:源视图中的 IntelliSense
浏览 Default.aspx 会生成图 4 中所示的输出。填入本金、利率和年数,然后单击 Calculate(计算),输出结果应与图 5 类似。
图 4:Default.aspx 的初始输出
图 5:计算后的输出
资源文件 如果您以前在 Visual Studio .NET 2002 或 2003 中使用过 Web 应用程序,您一定已经注意到每次创建新 Web 窗体页时,除了 .aspx 页以及 .vb 或 .cs 模块化文件之外,Visual Studio 还会创建一个具有 .resx 扩展名的匹配文件(即 WebForm1.aspx.resx)。与大多数 Web 开发人员一样,您可能也会忽略或试图删除这些文件,因为它们的用途和/或用法并不是很直观。简言之,这些 .resx 文件称为“资源文件”,主要用于存储各个版本的资源,例如用于本地化的不同语言的文本字符串。
在 Visual Studio .NET 2002 和 2003 中,资源文件需要作为生成项目进程的一部分添加到项目程序集中,并且需要导入两个命名空间,创建一个 ResourceManager 对象,并调用其 GetString 方法以访问资源字符串。在 \Code 目录的帮助下,Visual Studio .NET Whidbey 中的资源访问过程变得非常简单,如下面的示例所示。
我们先从创建资源文件开始,还是使用上一个示例中的项目。首先,右击刚才创建的 Compilation Web 站点,然后单击 Add New Item...(添加新项...)。在 Add New Item(添加新项)对话框中,选择 Assembly Resource File(程序集资源文件)模板,将资源文件命名为 strings.resx,然后单击 Open(打开)。strings.resx 文件的默认视图应与图 6 类似。
图 6:在 XML 编辑器中编辑资源文件
将以下项添加到数据表中(可以将“comment”(注释)、“type”(类型)和“mimetype”(MIME 类型)列保留为空):
现在重复上述过程,添加一个名为 strings.en-GB.resx 的新资源文件,并将以下项添加到其数据表中,然后保存文件(因为我们没有添加 txtColorResponse* 的项,所以所有客户机都将使用 strings.resx 中的这些项的值):
现在,为了充分利用 Code 目录的神奇作用,我们需要将这两个 .resx 文件从 Web 站点的根目录拖到 Code 目录中。完成上述操作后,将得到类似图 7 的结果。
图 7:Code 目录中的 .resx 文件
为了说明现在使用创建的资源文件是多么简单,我们将一个 Web 窗体添加到项目中,方法如下:右击 Web 站点节点,然后单击 Add New Item....(添加新项...)。在 Add New Item(添加新项)对话框中,选择 Web 窗体,将页面命名为 ColorPicker.aspx,然后单击 Open(打开)。修改此页面,使其与以下列表匹配。
ColorPicker.aspx:
<% page UICulture="en-GB" language="VB" %><script runat="server"> Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Label1.Text = Resources.strings.txtColorPrompt End Sub Sub Submit_Click(ByVal sender As Object, _ ByVal e As System.EventArgs) Label1.ForeColor = _ System.Drawing.Color.FromName(Dropdownlist1.SelectedValue) Select Case Dropdownlist1.SelectedValue Case "红色" Label1.Text = Resources.strings.txtColorResponseRed Case "绿色" Label1.Text = Resources.strings.txtColorResponseGreen Case "蓝色" Label1.Text = Resources.strings.txtColorResponseBlue End Select Dropdownlist1.Visible = False Submit.Visible = False End Sub</script><html><head runat="server"> <title>颜色选取器</title></head><body> <form runat="server"> <asp:label id="Label1" runat="server">Label</asp:label> <asp:dropdownlist id="Dropdownlist1" runat="server"> <asp:listitem value="Red">红色</asp:listitem> <asp:listitem value="Green">绿色</asp:listitem> <asp:listitem value="Blue">蓝色</asp:listitem> </asp:dropdownlist> <asp:button id="Submit" text="提交" runat="Server" /> </form></body></html>
当从浏览器中浏览 ColorPicker.aspx 时,默认输出与图 8 类似。如果从为英国用户设置的系统中浏览此页面(您可以通过将页面的 UICulture 属性设置为“en-GB”并保存页面来模拟此情形),输出将与图 9 类似(请注意,我们已经在“colour”中添加了 u)。
图 8:ColorPicker.aspx 的默认输出
图 9:英国系统的 ColorPicker.aspx 输出
请注意,在 ASP.NET Whidbey 中访问资源文件只需要一行代码。因为将资源文件放到 Code 目录中后,即可自动嵌入和引用该资源文件,所以不需要引用任何命名空间或程序集,也不需要为访问资源字符串创建对象。而且 ASP.NET 还可以确定应该使用哪个资源文件(基于用户浏览器的设置),因此我们不需要在运行时对此进行判断并作出相应的响应。ASP.NET 可以帮助我们完成这一切。