listing1913.aspx

来自「asp入门到精通的源代码」· ASPX 代码 · 共 35 行

ASPX
35 行
字号 
<%@ Page Language="VB" %>
<%@ Import Namespace="System.Globalization" %>
<%@ Import namespace="System.Resources" %>
<%@ Import namespace="System.Threading" %>

<script runat="server">
   sub Page_Load(obj as object, e as eventargs)
      dim objRM as ResourceManager
      'dim strLanguage as string = CultureInfo.CurrentCulture.ToString
      dim strLanguage as string = Request.UserLanguages(0).ToString
      dim objCulture as new CultureInfo(strLanguage)
      Thread.CurrentThread.CurrentCulture = new CultureInfo(strLanguage)
      Thread.CurrentThread.CurrentUICulture = new CultureInfo(strLanguage)
      
      objRM = ResourceManager.CreateFileBasedResourceManager("data", _
              Server.MapPath("."), Nothing)
      
      lblGreeting.Text = objRM.GetString("Greeting")
      lblTime.Text = objRM.GetString("Time") & " " & _
         DateTime.Now.ToString("t")
      lblBlurb.Text = objRM.GetString("Blurb")
      lblDisclaimer.Text = objRM.GetString("Disclaimer")
      
      objRM.ReleaseAllResources
   end sub   
</script>

<html><body>
   <b><asp:Label id="lblGreeting" runat="server"/></b> 
   <asp:Label id="lblTime" runat="server"/><p>
   
   <asp:Label id="lblBlurb" runat="server"/><p>
   
   <asp:Label id="lblDisclaimer" runat="server"/>
</body></html>

listing1913.aspx - 源码说明

本页面展示了「asp入门到精通的源代码」中的 listing1913.aspx 源码文件，采用 ASPX 编程语言编写，共 35 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与asp相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?