sqldatasetdoublefill.aspx

asp.net技术内幕的书配源码

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

<%
Dim dstNorthwind As DataSet
Dim conNorthwind As SqlConnection
Dim dadNorthwind As SqlDataAdapter

' Create the DataSet
dstNorthwind = New DataSet()

' Open database connection
conNorthwind = New SqlConnection( "Server=localhost;UID=sa;PWD=secret;Database=Northwind" )
conNorthwind.Open()

' Add two tables
dadNorthwind = New SqlDataAdapter( "Select * From Categories", conNorthwind )
dadNorthwind.Fill( dstNorthwind, "Categories" )
dadNorthwind.SelectCommand = New SqlCommand( "Select * From Products", conNorthwind )
dadNorthwind.Fill( dstNorthwind, "Products" )

' Close the connection
conNorthwind.Close()
%>
Categories and Products tables added to DataSet!