securedatabaseservice.aspx

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

ASPX
49 行
字号 
<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data" %>

<script runat="server">
   sub Submit(obj as object, e as eventargs)
      dim objService as new TYASPNET.Clients.SecureDatabaseService
      dim sHeader as new TYASPNET.Clients.Authenticator
      dim objDS as new DataSet
      
      sHeader.Username = tbUser.Text
      sHeader.Password = tbPass.Text
      objService.AuthenticatorValue = sHeader
      
      try 
         objDS = objService.SelectSQL(tbQuery.Text)
      
         DataGrid1.DataSource = objDS
	     DataGrid1.DataMember = "tblUsers"
         DataGrid1.Databind()
      catch ex as exception
         Response.Write("Invalid username or password")
      end try
   end sub
</script>

<html><body>
   <form runat="server">
      Username:
      <asp:Textbox id="tbUser" runat="server"/><br>
      Password:
      <asp:Textbox id="tbPass" runat="server"
         TextMode="password" /><p>
      Enter a query: 
      <asp:Textbox id="tbQuery" runat="server"/>
      <asp:Button id="btSubmit" runat="server"
         text="Submit"
         OnClick="Submit" />
      <p>
      <asp:DataGrid id="DataGrid1" 
         runat="server" BorderColor="black" 
         GridLines="Vertical" cellpadding="4" 
         cellspacing="0" width="100%"
         Font-Name="Arial" Font-Size="8pt" 
         HeaderStyle-BackColor="#cccc99"
         ItemStyle-BackColor="#ffffff"
         AlternatingItemStyle-Backcolor="#cccccc" />
      
   </form>
</body></html>

securedatabaseservice.aspx - 源码说明

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

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

⌨️ 快捷键说明

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