<%@ Page Language="VB" %>
Function AllPublishers() As System.Data.SqlClient.SqlDataReader
Dim connectionString As String = "server='(local)\NetSDK'; trusted_connection=true; Database='pubs'"
Dim sqlConnection As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection(connectionString)
Dim queryString As String = "SELECT [publishers].* FROM [publishers]"
Dim sqlCommand As System.Data.SqlClient.SqlCommand = New System.Data.SqlClient.SqlCommand(queryString, sqlConnection)
sqlConnection.Open
Dim dataReader As System.Data.SqlClient.SqlDataReader = sqlCommand.ExecuteReader(System.Data.CommandBehavior.CloseConnection)
Return dataReader
End Function
Sub Page_Load(sender As Object, e As EventArgs)
Page.DataBind()
End Sub
" DataTextField="pub_name" DataValueField="pub_id">
" DataTextField="pub_name" DataValueField="pub_id">
" DataTextField="pub_name" DataValueField="pub_id">
" DataTextField="pub_name" DataValueField="pub_id">
">
Publisher List:
<%# DataBinder.Eval(Container.DataItem, "pub_name") %> (ID: <%# DataBinder.Eval(Container.DataItem, "pub_id") %>) <%# DataBinder.Eval(Container.DataItem, "city") %>, <%# DataBinder.Eval(Container.DataItem, "state") %>, <%# DataBinder.Eval(Container.DataItem, "country") %>
">
ID:
'>
Name:
'>
Address:
'>
,
'>
,
'>
List of publishers: