|
Home
Products
Purchase
Support
Company
|
|
Auto-Error
Auto-Error is actually 2 applications in one. The Auto-Error VB
Error Scripting Application is designed to process VB project files
(forms, modules, etc.) to include line numbers on every line of
code and add VB error headers and footers to every function, sub
an property statement. The optional Auto-Error VB Error Handling
Component can be referenced in
your vb project/.exe and adds powerful internal visual basic error
handling processing and diagnostics.
Together these 2 tools provide an advanced and efficient solution
to the problem of processing vb errors in your applications.
|
|
|
|
New in current version - Post error information to your WEB server
If you want to make your Application able to post errors to web, you should only
add initialization of 2 properties to class initialization module:
URL property (String value) - sets an URL of a page that will receive data from the application
PostAvailable property (Boolean) - sets whether Post button will be displayed on the Error reporting form
Sample Initial Values:
.PostAvailable = True
.URL = "http://localhost/bugs/report.asp"
Sibental.COM provides a full sample of system, which is able to store errors on the web server. System is written on ASP/VBScript, Database - Access 2000. Source can be found in Auto-Error home
folder in subfolder "webbugs".
System consists of :
- bug_base.mdb - Access 2000 database for storing error data. This
DB is simple: one table named tbl_bugs(id as AutoNumber, ErrDetail as Memo, AppInfo as Memo, SysInfo as Memo, submit_date as Date/Time)
- report.asp module - this module receives Error Data from applicatiopn
and inserts it into the database. Note that in current version only 3 parameters
are submitted by component: ErrDetail, AppInfo and SysInfo.
- bugs_grid.asp module - this module created to view your bug database
online.
- bug.asp, page_top.asp, page_bottom.asp - these modules are auxiliary
to bugs_grid.asp
- dbconnect.asp module - this module initializes database connection
values. Basically, you should only modify strConn and state where
MDB file is situated
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=DRIVE:\PATH\bug_base.mdb;Persist Security Info=False"
Copy webbugs folder to your localhost wwwroot folder or publish it to remote server, then initialize
URL value and PostAvailable properties and go ahead - your application is able to post error information
to the web!
Feel free to modify this sample system the way you like!
Error Scripting Application Features
- See screenshots of a usefull interface
- Template based error code generation! Keyword variables like
%PROC_NAME% and %AUTHOR% allow for user defined custom
error templates.
- Automatically records procedure input
parameters including param name, datatype and value.
- Scripts all VB5 and VB6 objects including
forms, classes, controls etc
- Options include removing Comments and
White space in processed code among a ton of other customizable
options.
- Allows for the Line numbers and Error
handling code to be removed from a project to return it to it's
original state.
- Automatically adds code to support
execution tracing - Push and Pop.
- Automatically adds reference to Error Handler Object DLL
- In place point and click viewing of files
with a professional editor.
- Error handling script designed to work
with the Error Handling component.
- Allows choice of project files to script
and the ability to exclude individual procedures from scripting.
- Can track files in a project that exist
outside of the project file directory, wherever they exist on the
network and can build all of the files to a single directory,
modifying the project file to reference them in their new
location.
- Project file analysis: displays the total
lines of code, comments and white space for each file and
calculates the comment per line of code ratio for the project.
- Moves binary .frx and .ctx files as well as standard VB objects.
- Allows you to rebuild a project and strip out all comments and/or white space.
Error Handling Component
- Sophisticated and powerful error
diagnostics presented to your users in an easy to understand
interface.
- Handles all application errors, DAO, RDO
and ADO errors. It will also process ADO error collections. (DAO
and RDO error collections not currently supported).
- Error detail includes Line numbers,
application information (version, build, etc.), procedure name,
input parameters and much more.
- Generates Error log file and Trace log
file. The destination path of Error and Trace logs is
customizable.
- Supports Execution tracing which can be
turned on or off.
- Ships with it's own interface that can be
turned on or off. This interface allows access to the actual .log
Error and Trace files.
- Automatically emails the basic error detail.
Automatically copies Error Log display to clipboard to let user
cut and paste contents directly into email message. SMTP email
supported too!
- Writes to NT Event log.
- Powerful Auto-Error test driver demonstrates use of component
and includes code to write output to MS SQL Server, MS Access
and Oracle database.
Download the powerful component test driver:
This test driver illustrates expert usage of the error component
and includes a class for persisting errors to a database.
|
Code Before and After Processing with Auto-Error
Before |
| |
Public Function LoanApplication(ByVal intSal
As Integer, ByVal lngLoan As Long) As Boolean
Dim intInstallmentPerMonth As Integer
intInstallmentPerMonth = (lngLoan \ intMon)
intInstallmentPerMonth =
intInstallmentPerMonth +
Round(intInstallmentPerMonth * intRate)
If intInstallmentPerMonth > intSal \ 5 Then
LoanApplication = False
Else
LoanApplication = True
End If
End Function |
... and After |
| |
Public Function LoanApplication(ByVal intSal As Integer, ByVal
lngLoan As Long) As Boolean
' ********************************* ' err%
' This code was written by: John Doe ' err%
' On: 12/20/2001 6:04:32 PM ' err%
' Copyright(c) Doe Inc ' err%
' basAppSpecific ' err%
' ********************************* 'err%
7 g_objErr.Push "basAppSpecific.LoanApplication"'err%
8 g_objErr.AddParam "intSal", "Integer", intSal'err%
9 g_objErr.AddParam "lngLoan", "Long", lngLoan'err%
10 On Error GoTo PROC_ERR 'err%
11 Dim intInstallmentPerMonth As Integer
12 intInstallmentPerMonth = (lngLoan \ intMon)
13 intInstallmentPerMonth = intInstallmentPerMonth + Round(intInstallmentPerMonth * intRate)
14 If intInstallmentPerMonth>intSal\5 Then<
15 LoanApplication = False
16 Else
17 LoanApplication = True
18 End If
PROC_EXIT'err%
19 g_objErr.Pop'err%
20 Exit Function'err%
PROC_ERR'err%
g_objErr.HandleError Err.Number, Err.Description Erl 'err%
End Function
|
|
|
Success stories
"I bought it beause it does in 15 seconds
on my VB projects what it would take me days to do. Congratulations
on automating my mundain VB tasks. It is the best $180 I have ever
spent. It will save far more than it ever cost. Thanks again!!!!"
Erik Anderson
Owners Auto Mart
"Thanks for the great error handler, beats
the old system I was using by a mile. ... Have had some more time
with the other tools and they are great too. I can assure you, I
am one happy customer!"
Michael Sim, MCP, AACS
Bluefish software pty limited
|