Results 1 to 4 of 4

Thread: [RESOLVED] Application - Error Handling

  1. #1

    Thread Starter
    Addicted Member sinner0636's Avatar
    Join Date
    Sep 2009
    Posts
    233

    Resolved [RESOLVED] Application - Error Handling

    Hi i new to vb coded in Rb for while and was wondering well iv been seeing the

    Code:
    On Error Resume Next
    is a quick dirty way of handling your errors in your app not recommended to use
    well how would u go about processing errors in VB

    Like in RB they have Catch Try Blocks you can use with your errors try trap them any error handing functions examples would be nice thanks

    Code:
    Dim f as FolderItem
    f.Delete
    Exception err
    If err IsA NilObjectException then
     err.message="NilObjectException!"
     MsgBox err.message
    else
     Raise err
    end if
    Code:
    IllegalCastException Runtime Error	
    InvalidParentException Error	
    KeyChainException Error	
    KeyNotFoundException Error	
    NilObjectException Runtime Error	
    OLEException Error	
    OutOfBoundsException Error	
    OutOfMemoryException Error	
    Raise Statement	
    RbScriptAlreadyRunningException error	
    RegistryAccessErrorException Error	
    RegExException Error	
    RegExSearchPatternException Error	
    RuntimeException Class	
    ShellNotRunningException Error	
    StackOverFlowException Error	
    TypeMismatchException Error

  2. #2
    PowerPoster RhinoBull's Avatar
    Join Date
    Mar 2004
    Location
    New Amsterdam
    Posts
    24,132

    Re: Application - Error Handling

    Quote Originally Posted by sinner0636 View Post
    Hi i new to vb coded in Rb for while and was wondering well iv been seeing the
    Code:
    On Error Resume Next
    That won't let you catch the error itself - for that you need to create "error handler":
    Code:
    Private Sub Command1_Click()
    
    On Error GoTo ErrHandler
    
        'your main code goes here
    
        Exit Sub
    
    ErrHandler:
    
        MsgBox Err.Descrion
    
        Select Case Err.Number
            Case 13 'Type mismatch
            Case Else
        End Select
    
        Err.Clear
        'you may exit or resume here - decision is yours
    
    End Sub

  3. #3
    PowerPoster RhinoBull's Avatar
    Join Date
    Mar 2004
    Location
    New Amsterdam
    Posts
    24,132

    Re: Application - Error Handling

    Btw, here is the list for most trappable errors in VB6:
    Trappable Errors


    Trappable errors can occur while an application is running. Some trappable errors can also occur during development orcompile time. You can test and respond to trappable errors using the On Error statement and the Err object. Unused error numbers in the range 1 – 1000 are reserved for future use by Visual Basic.

    Code Message
    3 Return without GoSub
    5 Invalid procedure call
    6 Overflow
    7 Out of memory
    9 Subscript out of range
    10 This array is fixed or temporarily locked
    11 Division by zero
    13 Type mismatch
    14 Out of string space
    16 Expression too complex
    17 Can't perform requested operation
    18 User interrupt occurred
    20 Resume without error
    28 Out of stack space
    35 Sub, Function, or Property not defined
    47 Too many DLL application clients
    48 Error in loading DLL
    49 Bad DLL calling convention
    51 Internal error
    52 Bad file name or number
    53 File not found
    54 Bad file mode
    55 File already open
    57 Device I/O error
    58 File already exists
    59 Bad record length
    61 Disk full
    62 Input past end of file
    63 Bad record number
    67 Too many files
    68 Device unavailable
    70 Permission denied
    71 Disk not ready
    74 Can't rename with different drive
    75 Path/File access error
    76 Path not found
    91 Object variable or With block variable not set
    92 For loop not initialized
    93 Invalid pattern string
    94 Invalid use of Null
    97 Can't call Friend procedure on an object that is not an instance of the defining class
    98 A property or method call cannot include a reference to a private object, either as an argument or as a return value
    298 System DLL could not be loaded
    320 Can't use character device names in specified file names
    321 Invalid file format
    322 Can’t create necessary temporary file
    325 Invalid format in resource file
    327 Data value named not found
    328 Illegal parameter; can't write arrays
    335 Could not access system registry
    336 Component not correctly registered
    337 Component not found
    338 Component did not run correctly
    360 Object already loaded
    361 Can't load or unload this object
    363 Control specified not found
    364 Object was unloaded
    365 Unable to unload within this context
    368 The specified file is out of date. This program requires a later version
    371 The specified object can't be used as an owner form for Show
    380 Invalid property value
    381 Invalid property-array index
    382 Property Set can't be executed at run time
    383 Property Set can't be used with a read-only property
    385 Need property-array index
    387 Property Set not permitted
    393 Property Get can't be executed at run time
    394 Property Get can't be executed on write-only property
    400 Form already displayed; can't show modally
    402 Code must close topmost modal form first
    419 Permission to use object denied
    422 Property not found
    423 Property or method not found
    424 Object required
    425 Invalid object use
    429 Component can't create object or return reference to this object
    430 Class doesn't support Automation
    432 File name or class name not found during Automation operation
    438 Object doesn't support this property or method
    440 Automation error
    442 Connection to type library or object library for remote process has been lost
    443 Automation object doesn't have a default value
    445 Object doesn't support this action
    446 Object doesn't support named arguments
    447 Object doesn't support current locale setting
    448 Named argument not found
    449 Argument not optional or invalid property assignment
    450 Wrong number of arguments or invalid property assignment
    451 Object not a collection
    452 Invalid ordinal
    453 Specified not found
    454 Code resource not found
    455 Code resource lock error
    457 This key is already associated with an element of this collection
    458 Variable uses a type not supported in Visual Basic
    459 This component doesn't support the set of events
    460 Invalid Clipboard format
    461 Method or data member not found
    462 The remote server machine does not exist or is unavailable
    463 Class not registered on local machine
    480 Can't create AutoRedraw image
    481 Invalid picture
    482 Printer error
    483 Printer driver does not support specified property
    484 Problem getting printer information from the system. Make sure the printer is set up correctly
    485 Invalid picture type
    486 Can't print form image to this type of printer
    520 Can't empty Clipboard
    521 Can't open Clipboard
    735 Can't save file to TEMP directory
    744 Search text not found
    746 Replacements too long
    31001 Out of memory
    31004 No object
    31018 Class is not set
    31027 Unable to activate object
    31032 Unable to create embedded object
    31036 Error saving to file
    31037 Error loading from file

  4. #4

    Thread Starter
    Addicted Member sinner0636's Avatar
    Join Date
    Sep 2009
    Posts
    233

    Re: Application - Error Handling

    Thanks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width