⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 temp.aspx

📁 asp入门到精通的源代码
💻 ASPX
字号:
🔍 
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDB" %>
<html>
<script language="VB" runat="server">
    sub Page_Load(obj as Object, e as EventArgs) 
       'create connection
       dim Conn as new OleDbConnection( _
          "Provider=Microsoft.Jet.OLEDB.4.0;" & _
          "Data Source=H:\ASPNET\data\banking.mdb")

       'create DataSet and OleDbDataAdapter
       Dim ds as new DataSet("MyDataSet")
       Dim objCmd as new OleDbDataAdapter("SELECT * FROM " & _
          "tblUsers WHERE UserID < 10", Conn)

       'fill DataSet
       objCmd.Fill(ds, "tblUsers")

       'change some data
       ds.Tables("tblUsers").Rows(2)(3) = "ASPVille"

       dim dr as DataRow = ds.Tables("tblUsers").NewRow()
       dr(0) = "Greg"
       dr(1) = "Smith"
       dr(2) = "434 Maple Apt B"
       dr(3) = "Minneapolis"
       dr(4) = "MN"
       dr(5) = "12588"
       dr(6) = "5189876259"
       ds.Tables("tblUsers").Rows.Add(dr)

       'provide SQL command and active connection
       objCmd.UpdateCommand = new OleDbCommand
       objCmd.UpdateCommand.CommandText = "Update tblUsers " & _
          "SET City='ASPVille' WHERE UserID=3"
       objCmd.UpdateCommand.Connection = Conn

       'provide another SQL command and active connection
       objCmd.InsertCommand = new OleDbCommand
       objCmd.InsertCommand.CommandText = "Insert INTO " & _
          "tblUsers (FirstName, LastName, Address, City, " & _
          "State, ZIP, Phone) VALUES ('Greg', 'Smith', " & _
          "'434 Maple Apt B', 'Minneapolis', 'MN', '12588', " & _
          "'5189876259'"
       objCmd.InsertCommand.Connection = Conn

    end sub
    
</script>

<body>

   <form runat="server">
   
      <asp:DataGrid id="DataGrid1" runat="server" 
         BorderColor="black" 
         GridLines="Vertical" 
         AutoGenerateColumns="False">

         <Columns>

            <asp:TemplateColumn HeaderText="Name">
               <ItemTemplate>
                  <asp:Label id="Name" runat="server" 
                     Text='<%# Container.DataItem("FirstName") & " " & _
                        Container.DataItem("LastName") %>'/>
               </ItemTemplate>
            </asp:TemplateColumn>

            <asp:BoundColumn HeaderText="Address" DataField="Address" />

            <asp:BoundColumn HeaderText="City" DataField="City"/>

            <asp:BoundColumn HeaderText="State" DataField="State" />

            <asp:BoundColumn HeaderText="Zip" DataField="Zip" />
            
            <asp:EditCommandColumn
               EditText="Edit"
               CancelText="Cancel"
               UpdateText="Update"
               ItemStyle-Wrap="false"
               HeaderText="Edit"
               HeaderStyle-Wrap="false"/>
            
         </COlumns>



      </asp:DataGrid>

   </form>
   
</body>
</html>

⌨️ 快捷键说明

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