VB.NET 2005 Event Handling

[Redline]

I'm working on a small program to integrate alerts from one, into the other. So far I'm able to get everything to work, except for event handling. I'd like to receive event notifications asynchronously from program A, and send that alert message off as a TCP packet to program B.

I'm able to connect to the daemon process for program A, but either I'm not receiving alerts, or I didn't setup event handling right. Here is the relevant code:

    Private mGateway As IGateway
    Private mAlertEventHandler As AlertEventHandler
    Private mAlertEventImageHandler As AlertWithImagesEventHandler

    Private mAlertCount As UInteger = 0
    Private connectTime As UInteger = 0

    Private Sub frmMain_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        mGateway = ObjectVideoClientFactory.GetGateway()
        mAlertEventHandler = New AlertEventHandler(AddressOf OnNewAlert)
        mAlertEventImageHandler = New AlertWithImagesEventHandler(AddressOf OnNewAlert)

    End Sub

    Private Sub OnNewAlert(ByVal sender As Object, ByVal e As ObjectVideo.ClientSDK.AlertEventArgs)
        Dim alert As ObjectVideo.ClientSDKCommon.Alert = e.ReceivedAlert

        mAlertCount = mAlertCount + 1
        MsgBox("Alert #" + mAlertCount + " " + alert.Message)

    End Sub

[SeyelentEco]

You'll probably need to post more code.

[Redline]

There isn't really any more code. Not any more that is relevant anyway. This is the connect code used to connect to the daemon

    Private Sub cmdConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdConnect.Click
        If mGateway.IsConnected Then Return
        Me.Cursor = Cursors.WaitCursor
        Try
            mGateway.Connect()
        Catch ex As Exception
            lblConnectStatus.Text = "Error in Connection Process"
            MsgBox(ex.Message)
        End Try

        If mGateway.IsConnected Then
            lblConnectStatus.Text = "Connected to Daemon"
            timerOne.Enabled = True
        Else
            lblConnectStatus.Text = "Could not connect"
        End If
        Me.Cursor = Cursors.Default
    End Sub

Really though, all I need is to find out if I setup event handling properly. I've never needed to write code for event handling in any language, so I really just winged it...

[sde]

question: why are you using vb and not c#? .. just curious cause i didn't think you had a vb background and c# would feel more natural with a php background.

[Redline]

VB was one of the first languages I learned, but that was back in my freshman year of highschool.

I decided on VB over C# because I wasn't quite understanding a lot of the syntax of C#. I suppose I could take another look at it though

[sde]

yeah, definately take another look at it. it is a c-based language, so it will be a lot little like PHP and Javascript.

it's strictly typed, so you do need to get used to declaring what type of variable you are creating.

it's using the same .NET objects that you would use in VB.NET, but the language itself was written for .NET, so you will never get caught in an instance where you are using legacy code which I think VB.NEt still supports.

i think the job market for c# is a little better as well. another good thing to have on the resume.

[Redline]

Do you know of another good place for tutorials on C#? The ones here were helpful, but I could use a few more if you know of some other sites offhand

[SeyelentEco]

Yeah, I'm a C# developer myself, and the event handling looks okay, but I can't be 100% sure because VB.NET might do some stuff different. The thing is, I don't see how the event "OnNewAlert" is ever going to fire. I don't see what code might trigger that event.