Hi
I have a problem with this
Public Class SendPings
Shared Sub New()
AddHandler Post.Saved, AddressOf Post_Saved
AddHandler Page.Saved, AddressOf Post_Saved
End Sub
Private Shared Sub Post_Saved(ByVal sender As Object, ByVal e As SavedEventArgs)
If e.Action = SaveAction.None OrElse e.Action = SaveAction.Delete Then
Exit Sub
End If
Dim item As IPublishable = DirectCast(sender, IPublishable)
If item.IsVisibleToPublic Then
Dim url As Uri = item.AbsoluteLink
ThreadPool.QueueUserWorkItem(AddressOf [B][U]Ping[/U][/B], item)
End If
End Sub
Private Shared Sub Ping(ByVal item As IPublishable, ByVal itemUrl As Uri)
Try
System.Threading.Thread.Sleep(2000)
BlogEngine.Core.Ping.PingService.Send(itemUrl)
If Not BlogSettings.Instance.EnableTrackBackSend AndAlso Not BlogSettings.Instance.EnablePingBackSend Then
Exit Sub
End If
If item.Content.ToUpperInvariant().Contains("""HTTP") Then
BlogEngine.Core.Ping.Manager.Send(item, itemUrl)
End If
Catch generatedExceptionName As Exception
' We need to catch this exception so the application doesn't get killed.
End Try
End Sub
End Class
I get a error
Method 'Private Shared Sub Ping(item As BlogEngine.Core.IPublishable, itemUrl As System.Uri)' does not have a signature compatible with delegate 'Delegate Sub WaitCallback(state As Object)'.
can help me?