なぜこれが機能しないのかわかりません。
ログオンした人が適切なセキュリティを持っていることを確認しています。そうでない場合は、別のページにリダイレクトしたいと考えています。
それらが適切なセキュリティを持っている場合、ページ上の残りのコードは引き続き実行されます。
コードをステップ実行すると、response.redirect が実行されますが、ページは引き続き読み込まれます。
strSQL = "Select * from tblSecurity Where SFID = '" & Right(My.User.Name, 4) & "' and (SecurityLevel = '900' or SecurityLevel = '850')"
ds = objData.SQLExecuteDataset(strSQL, CommandType.Text)
If ds.Tables(0).Rows.Count = 0 Then
Response.Redirect("~/NotAuthorized.aspx", False)
End If