dataclinet.aspx

来自「asp做的新闻系统」· ASPX 代码 · 共 53 行

ASPX

53 行

<%@ Import Namespace="DataServiceVB" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>

<html>
<script language="VB" runat="server">
    Protected Sub Page_Load(Src As Object, E As EventArgs)
        Dim D As DataServiceVB.DataService = New DataServiceVB.DataService()
        D.Credentials = System.Net.CredentialCache.DefaultCredentials
        Dim MyData As DataSet = D.GetTitleAuthors()
        Authors_DataGrid.DataSource=MyData.Tables("Authors").DefaultView
        Authors_DataGrid.DataBind()
        Message.InnerHtml = "The number of rows is: " & 
        MyData.Tables("Authors").Rows.Count.ToString()
    End Sub

    Protected Sub Submit_DataSet(Src As Object, E As EventArgs)
        Dim D As DataServiceVB.DataService = New DataServiceVB.DataService()
        D.Credentials = System.Net.CredentialCache.DefaultCredentials
        Dim MyData As DataSet = D.GetTitleAuthors()
        MyData.Tables("Authors").Rows.RemoveAt(0)
        MyData.Tables("Authors").Rows.RemoveAt(1)
        MyData.Tables("Authors").Rows.RemoveAt(2)
        Dim RowCount As Integer = D.PutTitleAuthors(MyData)
        Authors_DataGrid.DataSource=MyData.Tables("Authors").DefaultView
        Authors_DataGrid.DataBind()
        Message.InnerHtml = "The modified number of rows is: " & RowCount.ToString()
    End Sub
</script>

<body style="font: 10pt verdana">
  <h4>Using Data Access with XML Web services</h4>
  <form runat="server">
      <input type="submit" OnServerclick="Submit_DataSet" value="Remove three rows from the  DataSet" runat="server"/>
      <p>
      <span id="Message" runat="server"/>
      <p>
      <ASP:DataGrid id="Authors_DataGrid" runat="server"
        Width="700"
        BackColor="#ccccff"
        BorderColor="black"
        ShowFooter="false"
        CellPadding=3
        CellSpacing="0"
        Font-Name="Verdana"
        Font-Size="8pt"
        HeaderStyle-BackColor="#aaaadd"
        EnableViewState="false"
      />
    </form>
</body>
</html>

dataclinet.aspx - 源码说明

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

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

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?