|
分類:[.NET 全般]
こんにちわ。
お世話になります！
現在、クライアントから取得したIPアドレスとDBの登録が一致した場合のみフォームを
出力するアプリケーションを作成しているのですがDBの登録がなくてもエラーのフォームに移行してしまいます。
どこが違うのでしょうか？教えて下さい。
ASP.NETを勉強し始めて間もないのでまだまだ勉強不足ですが宜しくお願い致します。
ASP.NET2.0のVBで作成しております。
Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports Microsoft.VisualBasic
Imports System.Text
Partial Class INDEX
Inherits System.Web.UI.Page
Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
'------------- IPアドレス取得 --------------
Dim ipAddr As String
ipAd = Request.UserHostAddress
'------------- SQL Server Connection --------------
Dim myDataReader As SqlDataReader
Dim mySqlConnection As SqlConnection
Dim mySqlCommand As SqlCommand
mySqlConnection = New SqlConnection("Server=Name;database=Source;UID=id;PWD=pw")
mySqlCommand = New SqlCommand("SELECT * FROM IPdb WHERE IPAddress='" & ipAd & "' AND sub='True'")
mySqlConnection.Open()
mySqlCommand.Connection = mySqlConnection
myDataReader = mySqlCommand.ExecuteReader(CommandBehavior.CloseConnection)
Do While (myDataReader.Read())
Loop
If Not (myDataReader Is Nothing) Then
Else
'登録がなければエラー画面へ
Response.Redirect("LoginError.aspx")
End If
myDataReader.Close()
mySqlConnection.Close()
End Sub
End Class
|