ขอ Code Login ไป MySQL ของ VB.NET หน่อยคับขอบคุณคับ

<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="MySql.Data.MySqlClient"%>
<%@ Page Language="VB" %>
<script runat="server">
	Dim objConn As New MySqlConnection
	Dim objCmd As New MySqlCommand
	Dim strConnString,strSQL As String
    
    Sub btnLogin_Click(sender As Object, e As EventArgs)  
	
		strConnString = "Server=localhost;User Id=root; Password=root; Database=mydatabase; Pooling=false"
		objConn.ConnectionString = strConnString
		objConn.Open()

		Dim intNumRows As Integer
		strSQL = "SELECT COUNT(*) FROM member WHERE Username = '"& Me.txtUsername.Text &"' AND [Password] = '"& Me.txtPassword.Text &"' "		
		objCmd = New MySqlCommand(strSQL, objConn)
		intNumRows = objCmd.ExecuteScalar()

		IF intNumRows > 0 Then
			Session("strUser") = Me.txtUsername.Text
			Response.Redirect("Page1.aspx")
		Else	
			Me.pnlLogin.Visible = False
			Me.lblStatus.Visible = True
			Me.lblStatus.Text = "Username/Password is wrong."
		End IF

		objConn.Close()
		objConn = Nothing

    End Sub
</script>

<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="MySql.Data.MySqlClient"%>
<%@ Page Language="C#" %>
<script runat="server">
MySqlConnection objConn = new MySqlConnection();
MySqlCommand objCmd = new MySqlCommand();
string strConnString;
string strSQL;

public void btnLogin_Click(object sender, EventArgs e)
{

	strConnString = "Server=localhost;User Id=root; Password=root; Database=mydatabase; Pooling=false";
	objConn.ConnectionString = strConnString;
	objConn.Open();

	int intNumRows = 0;
	strSQL = "SELECT COUNT(*) FROM member WHERE Username = '" + this.txtUsername.Text + "' AND [Password] = '" + this.txtPassword.Text + "' ";
	objCmd = new MySqlCommand(strSQL, objConn);
	intNumRows = objCmd.ExecuteScalar();

	if (intNumRows > 0) {
		Session("strUser") = this.txtUsername.Text;
		Response.Redirect("Page1.aspx");
	} else {
		this.pnlLogin.Visible = false;
		this.lblStatus.Visible = true;
		this.lblStatus.Text = "Username/Password is wrong.";
	}

	objConn.Close();
	objConn = null;

}
</script>