VBML for VB6

What is VBML?

4Nov01 - Line number at procedure level or module level - more friendly for Source Safe. Added new global variables - CurrentUser, CurrentDate, CurrentTime.VBML is a new way of using code templates and marking up VB6 files. It allows you to do things like:

• Have templated collection classes which allow you to 'fill in the blanks' intelligently.
• Create standard Method templates in any format.
• Create standard templates for Classes, Modules, Forms etc.
• Block Search replace.
• Add/Remove Tracing, Error handling dynamically

Here is a sample script that allows you to create a VB6 Class module:

VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
END
Attribute VB6_Name = "{ModuleName}"
Attribute VB6_GlobalNameSpace = False
Attribute VB6_Creatable = False
Attribute VB6_PredeclaredId = False
Attribute VB6_Exposed = False
Option Explicit
Option Base 0
Option Compare Text

{*[' ]Description[
]}

Private Const MODULE_NAME As String = "{ModuleName}"

'<vbmlPrivateVariables>
Private Err as New CErr
'</vbmlPrivateVariables>

Tags such as this '<vbmlPrivateVariables> which you can define can be used by any of the scripts to insert into particular areas of a file. Typically you could use this to make sure that Property methods always add a suitable variable.

 

Here is a sample code fragment than can be used to add error handling to your VB6 Project

<vbml_Methods Ignore="On Error " Scope="Module" Action="Insert">
On Error Goto ErrHandler
</vbml_Methods>

<vbml_Methods Ignore="ErrHandler" Scope="Module" Action="Append">
Exit {$$ThisMethodFnType}

ErrHandler: Err.Raise Err.Number, MODULE_NAME & ".{$$ThisMethodName}", _
MODULE_NAME & ".{$$ThisMethodName} Line=" & erl & vbcrlf & Err.Description
</vbml_Methods>

This would take all methods in a module such as this - which didn't have error handling :

Public Sub CallHome()
     Debug.Print "Hi"
End Sub

And turn it into this:

Public Sub CallHome()
    On Error Goto ErrHandler
         Debug.Print "Hi"
         Exit Sub
ErrHandler:
    Err.Raise Err.Number, MODULE_NAME & ".CallHome", MODULE_NAME & ".CallHome Line=" & erl &  vbcrlf & Err.Description
End Sub

To read the HTML version of the manual (100Kb)  look at VBML Manual

Download Instructions

1. Please read the Licensing and Disclaimer before downloading.
2. To download the trial version (<2Mb) click here to download self-extracting zip
3. Download the Samples
4. Run Setup.Exe.
5. Unpack the samples into the same directory as VBML went to.

The download does not include the VB6 (sp4/5) runtime or the MSO9.dll (office toolbar & stuff). Both of these should already be installed on your system.

The trial version includes a few sample templates and fragments to show what you can do.

After 60 days this Trial version will stop working.

Licensing - Trial Version

This is not free software. Subject to the terms below, you are hereby licensed to use this software for evaluation purposes without charge for a period of up to 60 day. If you wish to continue to use the software beyond the trial period you will need to purchase a License.

The Trial version may be distributed freely provided that it is distributed complete with all supporting files and that no charge is made for distribution.

Licensing - Registered Version

You may access the registered version of VBML through a network, provided that you have obtained individual licenses for the software covering all workstations that will access the software through the network. For instance, if 8 different workstations will access VBML on the network, each workstation must have its own VBML license, regardless of whether they use VBML at different times or concurrently. No registered user may alter or modify the software. You cannot give anyone else permission to modify the software.

One registered copy of VBML (1 Seat) may either be used by a single person who uses the software personally on one or more computers, or installed on a single workstation used non-simultaneously by multiple people, but not both.

Legal Disclaimer

THIS SOFTWARE AND THE ACCOMPANYING FILES ARE SOLD "AS IS" AND WITHOUT WARRANTIES AS TO PERFORMANCE OR MERCHANTABILITY OR ANY OTHER WARRANTIES WHETHER EXPRESSED OR IMPLIED. Because of the various hardware and software environments into which VBML may be put, NO WARRANTY OF FITNESS FOR A PARTICULAR PURPOSE IS OFFERED.

ANY LIABILITY OF THE SELLER WILL BE LIMITED EXCLUSIVELY TO PRODUCT REPLACEMENT OR REFUND OF PURCHASE PRICE.

Pricing