strArr = sdn.Split(" ")

For count As Integer = 0 To strArr.Length - 1

sd(count) = strArr(count)

Next

For i As Integer = 0 To strArr.Length - 1

If Not sd(3) = String.Empty Then

Try

cnn.Open()

cmdt.Parameters.AddWithValue("@ranke", sdn)

mainadv.DataSource = cmdt.ExecuteReader(CommandBehavior.CloseConnection)

mainadv.DataBind()

cnn.Open()

cmdb.Parameters.AddWithValue("@rankes", sd(1) & " " & sd(2))

mainadv1.DataSource = cmdb.ExecuteReader(CommandBehavior.CloseConnection)

mainadv1.DataBind()

cnn.Open()

cmdb1.Parameters.AddWithValue("@rankesd", sd(1) & " " & sd(2) & " " & sd(3))

mainadv3.DataSource = cmdb1.ExecuteReader(CommandBehavior.CloseConnection)

mainadv3.DataBind()

cmdm.Parameters.AddWithValue("@ranks", sd(0))

cnn.Open()

mainadv2.DataSource = cmdm.ExecuteReader(CommandBehavior.CloseConnection)

mainadv2.DataBind()

Catch ex As Exception

End Try