如何在vb.net中显示来自数据库的数据

Question

如何从vb.net的数据库表中检索数据。 当我试着我不明白它仅创建一个空白页 任何输出而我的代码是：

<% @Import Namespace="System.Data" %> 
<% @Import Namespace="System.Data.SqlClient" %> 
<script runat="server"> 
sub Page_Load() 
Dim con As New SqlConnection 
Dim cmd As New SqlCommand 

con.ConnectionString = ///my connection string/// 
con.Open() 
cmd.Connection = con 
cmd.CommandText = "select * from det" 
Dim lrd As SqlDataReader = cmd.ExecuteReader() 
End sub   

</script> 
<form runat="server"> 
<asp:Repeater id="customers" runat="server"> 

<HeaderTemplate> 
<table border="1" width="100%"> 
<tr bgcolor="#b0c4de"> 
<th>ID</th> 
<th>Name</th> 
<th>Address</th> 
<th>Age</th> 
<th>Gender</th> 
</tr> 
</HeaderTemplate> 

<ItemTemplate> 
<tr bgcolor="#f0f0f0"> 
<td><%#DataBinder.Eval(Container.DataItem, "id")%> </td> 
<td><%#DataBinder.Eval(Container.DataItem, "name")%> </td> 
<td><%#DataBinder.Eval(Container.DataItem, "address")%> </td> 
<td><%#DataBinder.Eval(Container.DataItem, "age")%> </td> 
<td><%#DataBinder.Eval(Container.DataItem, "gender")%> </td> 

</tr> 
</ItemTemplate> 

<FooterTemplate> 
</table> 
</FooterTemplate> 

</asp:Repeater> 
</form> 

而且我没有得到任何输出或者错误太 如何解决这一???

Answer 1

您检索数据，但不能用它做任何事情：

sub Page_Load() 

    Dim con As New SqlConnection 
    Dim cmd As New SqlCommand 

    con.ConnectionString = ///my connection string/// 
    con.Open() 
    cmd.Connection = con 
    cmd.CommandText = "select * from det" 

    customers.DataSource = cmd.ExecuteReader() //here we bind data to repeater. 
    customers.DataBind(); 

End sub   

此外，我会建议使用代码隐藏文件，并把你的代码存在，因为它是方式更清晰。

Answer 2

Public Sub OnPageLoad() 
     Dim con As New SqlConnection 
     Dim cmd As New SqlCommand 

     con.ConnectionString = String 
     cmd.Connection = con 
     cmd.CommandText = "SELECT * FROM TABLE_NAME" 
     con.Open() 
     customers.DataSource = cmd.ExecuteNonQuery() 
     customers.DataBind() 
     con.Close() 
End Sub