Dim strConnect As String
        strConnect = System.Web.Configuration.WebConfigurationManager.ConnectionStrings("ConnectionString2").ConnectionString.ToString
        Dim conn As New MySqlConnection(strConnect)
        Dim cmd As New MySqlCommand
        Dim reader As MySqlDataReader
        Dim mySQL As String
        Dim NPage As String = "1,2,3,4,5,6"
        conn.Open()
        cmd.Connection = conn
        mySQL = "SELECT NPage FROM pickeyparts WHERE NPage IN(@NPage)"
        cmd.CommandText = mySQL
        cmd.Parameters.AddWithValue("NPage", NPage)
        reader = cmd.ExecuteReader()
        While reader.Read()
            str = str & " " & reader.Item(0)
        End While
        reader.Close()
        conn.Close()