[ledstrom]

Yes, här kommer lite kod som visar principen. Jag undrar om det går och låsa funktionen på något sätt så att den inte kan köras flera gånger, men det känns som en fullösning och sätta in någon typ utav Shared Variabel som håller koll på det, sen har jag varit inne på om det går och lösa med Threading ocskå

Public Class ListnerHandler
Public Sub New()
AddHandler HTMLPage.Saved, AddressOf CleanUp
End Sub

Public Sub CleanUp(ByVal Obj As CustomizedEventArgs)
Obj.Sender.XHTML = "Fixed"
Obj.Sender.Save()
End Sub
End Class



Public Class HTMLPage
Public Shared Event Saved(ByVal EA As CustomizedEventArgs)
Protected Sub OnSaved()
RaiseEvent Saved(New CustomizedEventArgs(Me))
End Sub

Private _XHTML As String
Public Property XHTML() As String
Get
Return _XHTML
End Get
Set(ByVal value As String)
_XHTML = value
End Set
End Property


Public Sub Save()
''' Do the magic
OnSaved()
End Sub

End Class

Public Class CustomizedEventArgs
Inherits EventArgs

Public Sender As HTMLPage

Public Sub New(ByVal CurrentSender As HTMLPage)
Sender = CurrentSender
End Sub
End Class