VB - A Program Registration Scheme

[BrailleSchool]

My code is meant for VB and not VBA. Are you using VB6?

I am using VB6 Enterprise Edition

What is the difference between VB and VBA?

[MartinLiss]

VBA is Visual Basic for Applications and is the form of visual basic that you use from within Word, Excel etc.

What did you mean when you said "compile the protect.vbs"?

[BrailleSchool]

VBA is Visual Basic for Applications and is the form of visual basic that you use from within Word, Excel etc.

What did you mean when you said "compile the protect.vbs"?

when i would do F5 when the project is open, or when it would attempt to compile into an exe.

[stilekid007]

Hey Martin....

Can you tell me what I am doing wrong here... I open your project vb file and I press the play button (F5)..

And I get a compile error - can't find project or library...

I am using Win XP and VB 6.0

The underlined line of code is highlighted blue when I get the error..

Public Function GetSerialNumber() As Long
 
    Dim strVolumeBuffer As String
    Dim strSysName As String
    Dim lngSerialNumber As Long
    Dim lngSysFlags As Long
    Dim lngComponentLen As Long
    Dim lngResult As Long
    
    strVolumeBuffer$ = [U]String$[/U](256, 0)
    strSysName$ = String$(256, 0)
    lngResult = GetVolumeInformation("C:\", strVolumeBuffer$, 255, lngSerialNumber, _
            lngComponentLen, lngSysFlags, strSysName$, 255)
                 
    GetSerialNumber = lngSerialNumber
    
End Function

Thank you for taking the time!
Stilekid007

[MartinLiss]

There may be something in your project that's confusing VB. Try

strVolumeBuffer$ = [HL="#FFFF80"]VBA.[/HL]String$(256, 0)

[stilekid007]

Thank you so much marty!

Thats worked! Thats a really nice program...

So I understand if the user doesn't have outlook then it will display a message window saying send an email to blah blah blah...

Is this a correct asumption?

Thanks again man!

[MartinLiss]

Yes, that's the assumption. There are other, more general, ways of sending email and so if you have the need you might want to look into changing the code.