%@ Assembly Name="ByteFX.MySqlClient" %>
<%@ Import Namespace="ByteFX.Data.MySQLClient" %>
F1 |
F2 |
<%
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
%>
<%=rdr(0)%> |
<%=rdr(1)%> |
<%
End While
rdr.Close
con.Close
%>