<%@ Assembly Name="ByteFX.MySqlClient" %> <%@ Import Namespace="ByteFX.Data.MySQLClient" %> <% Dim con As MySqlConnection = New MySqlConnection ("Database=Test;Data Source=localhost;User Id=;Password=") con.Open Dim sel As MySqlCommand = New MySqlCommand ("SELECT * FROM T1", con) Dim rdr As MySqlDataReader = sel.ExecuteReader While rdr.Read %> <% End While rdr.Close con.Close %>
F1 F2
<%=rdr(0)%> <%=rdr(1)%>