santosh singh
New member
- Joined
- Jan 27, 2005
- Messages
- 2
- Programming Experience
- Beginner
Hi,
I'm new to VB.NET..I'm developing a login page..
I'm getting a lot of errors..please help me out..
the errors im getting are...
System.InvalidOperationException: ExecuteReader requires an open andavailable Connection. The connection's current state is Open, Fetching.atSystem.Data.OleDb.OleDbCommand.ValidateConnectionAndTransaction(Stringmethod, Int32& localState) atSystem.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehaviorbehavior, String method) atSystem.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)at System.Data.OleDb.OleDbCommand.ExecuteReader() atbt.index.Page_Load(Object sender, EventArgs e) ind:\inetpub\wwwroot\bt\index.aspx.vb:line 56
the code in the .aspx.vb page is..
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here
If Not IsPostBack Then
Try
Dim MyConn As OleDbConnection = NewOleDbConnection(ConfigurationSettings.AppSettings("strConn"))
Dim strVisitor As String
Dim visitorCmd As OleDbCommand
Dim vRdr As OleDbDataReader
strVisitor = "select max(v_id) from visitor"
visitorCmd = New OleDbCommand(strVisitor, MyConn)
MyConn.Open()
Dim old_visitor As Integer
Dim new_visitor As Integer
vRdr = visitorCmd.ExecuteReader()
While vRdr.Read()
If Not IsDBNull(visitorCmd.ExecuteReader()) Then
old_visitor = vRdr.Item(0)
End If
End While
new_visitor = old_visitor + 1
lblvisitor.Text = new_visitor
MyConn.Close()
Catch ex As Exception
Response.Write(ex)
End Try
End If
End Sub
Please help me out..
Your help will be much appreciated..
thanks a lot.
bye
I'm new to VB.NET..I'm developing a login page..
I'm getting a lot of errors..please help me out..
the errors im getting are...
System.InvalidOperationException: ExecuteReader requires an open andavailable Connection. The connection's current state is Open, Fetching.atSystem.Data.OleDb.OleDbCommand.ValidateConnectionAndTransaction(Stringmethod, Int32& localState) atSystem.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehaviorbehavior, String method) atSystem.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)at System.Data.OleDb.OleDbCommand.ExecuteReader() atbt.index.Page_Load(Object sender, EventArgs e) ind:\inetpub\wwwroot\bt\index.aspx.vb:line 56
the code in the .aspx.vb page is..
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here
If Not IsPostBack Then
Try
Dim MyConn As OleDbConnection = NewOleDbConnection(ConfigurationSettings.AppSettings("strConn"))
Dim strVisitor As String
Dim visitorCmd As OleDbCommand
Dim vRdr As OleDbDataReader
strVisitor = "select max(v_id) from visitor"
visitorCmd = New OleDbCommand(strVisitor, MyConn)
MyConn.Open()
Dim old_visitor As Integer
Dim new_visitor As Integer
vRdr = visitorCmd.ExecuteReader()
While vRdr.Read()
If Not IsDBNull(visitorCmd.ExecuteReader()) Then
old_visitor = vRdr.Item(0)
End If
End While
new_visitor = old_visitor + 1
lblvisitor.Text = new_visitor
MyConn.Close()
Catch ex As Exception
Response.Write(ex)
End Try
End If
End Sub
Please help me out..
Your help will be much appreciated..
thanks a lot.
bye