Solved

Error trapping on ASP Oracle connection

Posted on 2002-06-21
4
796 Views
Last Modified: 2008-02-01
Currently I have an application with a signon screen where the user inputs logon id and password.  I then validate this against an Oracle table entry.  There is one Oracle ID and password assigned to my app.  Now the DBA is creating an Oracle id and password that matches each of my user id and passwords.  This works fine as long as the userid and password are correct.  However, when either the id or password are wrong I get:

Microsoft OLE DB Provider for ODBC Drivers error '80040e4d'

[Microsoft][ODBC driver for Oracle][Oracle]ORA-01017: invalid username/password; logon denied

I am getting the error on the connection open command. How do trap this error and redisplay my entry screen with the appropriate message?

Thanks.

KC  
0
Comment
Question by:kcsheets
4 Comments
 
LVL 20

Accepted Solution

by:
jitganguly earned 50 total points
Comment Utility
Use on error resume next

on Error Resume Next
' open your connection here
' or execute SQL etc.
' Then trap errors like this

if err.number<> 0 then
  Response.Write "Error in Opening .. and the error is : " & Err.Description
  Response.end
end if


0
 
LVL 46

Expert Comment

by:fritz_the_blank
Comment Utility
You could try putting this at the top of your page:

<%On Error Resume Next%>


and then you can use code such as this to trap errors:

'VBScript errors
If Err.Number > 0 Then
    Response.write("<p><hr>The following VB Errors Occured<p>")
     Response.write("Error Number: " & Err.number & "<br>")
     Response.write("Error Source: " & Err.source & "<br>")
     Response.write("Error Description: " & Err.description & "<br>")
End If


'Connection errors
dim iCounter
if objConnection.Errors.count > 0 then
    Response.write("<p><hr>The following Connection Errors Occured<p>")
    for iCounter = 0 To objConnection.Errors.Count - 1
          Response.write("Error Number: " & objConnection.errors(iCounter).number & "<br>")
          Response.write("Error Description: " & objConnection.errors(iCounter).description & "<br>")
          Response.write("SQL State: " & objConnection.errors(iCounter).SQLState & "<br>")
          Response.write("Native Error: " & objConnection.errors(iCounter).NativeError & "<br>")
    next
end if


In your case, of course, you would not want to print the errors, but rather use conditional logic such that if there were connection errors, you would print an appropriate message for the user.


Fritz the Blank
0
 
LVL 5

Expert Comment

by:kcm76
Comment Utility
using the Err.Number value as querystring to the redirection ASP page as a querystring. Using Select Case statement u can give proper error messages.

main page:
IF Err.Number > 0 then

   response.Redirect "login.asp?Num=" + err.Number
end if


***login.Asp***
Dim varErrorNumber
varErrorNumber = Request.QueryString
Select case varErrorNumber
    case "80040e4d"
        Response.Write "Invalid UserId/Password"
End Select
0
 
LVL 4

Expert Comment

by:Wakie
Comment Utility
It appears this question has been abandoned.

I will leave a recommendation in the Cleanup topic area that this question will be:

- Points to jitganguly -

Please leave any comments here within the next seven days.

DO NOT ACCEPT THIS COMMENT AS AN ANSWER!

Wakie,
EE Cleanup Volunteer.
0

Featured Post

Highfive Gives IT Their Time Back

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

Join & Write a Comment

I have helped a lot of people on EE with their coding sources and have enjoyed near about every minute of it. Sometimes it can get a little tedious but it is always a challenge and the one thing that I always say is:  The Exchange of information …
This demonstration started out as a follow up to some recently posted questions on the subject of logging in: http://www.experts-exchange.com/Programming/Languages/Scripting/JavaScript/Q_28634665.html and http://www.experts-exchange.com/Programming/…
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…

762 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now