Hi
I could not solve this problem.
could someone help me?
Please tell vb.net equivalent of following:
Code:
#region using

using System;
using System.Web;
using BlogEngine.Core.Web.Controls;
using BlogEngine.Core;
using System.Net.Mail;
using System.Threading;

#endregion

/// <summary>
/// Pings all the ping services specified on the 
/// PingServices admin page and send track- and pingbacks
/// </summary>
[Extension("Pings all the ping services specified on the PingServices admin page and send track- and pingbacks", "1.3", "BlogEngine.NET")]
public class SendPings
{

  /// <summary>
  /// Hooks up an event handler to the Post.Saved event.
  /// </summary>
  static SendPings()
  {
        Post.Saved += new EventHandler<SavedEventArgs>(Post_Saved);
		Page.Saved += new EventHandler<SavedEventArgs>(Post_Saved);
  }

  /// <summary>
  /// Sends the pings in a new thread.
  /// <remarks>
  /// It opens a new thread and executes the pings from there,
  /// because it takes some time to complete.
  /// </remarks>
  /// </summary>
  private static void Post_Saved(object sender, SavedEventArgs e)
  {
		if (e.Action == SaveAction.None || e.Action == SaveAction.Delete)
			return;

        IPublishable item = (IPublishable)sender;

		if (item.IsVisibleToPublic)
		{
			Uri url = item.AbsoluteLink;
			ThreadPool.QueueUserWorkItem(delegate { Ping(item, url); });
		}
  }

  /// <summary>
  /// Executes the pings from the new thread.
  /// </summary>
  private static void Ping(IPublishable item, Uri itemUrl)
  {
		try
		{
			System.Threading.Thread.Sleep(500);

			// Ping the specified ping services.
			BlogEngine.Core.Ping.PingService.Send(itemUrl);

			// Send trackbacks and pingbacks.
			if (!BlogSettings.Instance.EnableTrackBackSend && !BlogSettings.Instance.EnablePingBackSend)
				return;

			if (item.Content.ToUpperInvariant().Contains("\"HTTP"))
				BlogEngine.Core.Ping.Manager.Send(item, itemUrl);
		}
		catch (Exception)
		{
		  // We need to catch this exception so the application doesn't get killed.
		}
  }

}

I tried using C# to VB.NET code converter which gave me this:

Code:
Imports System
Imports System.Web
Imports BlogEngine.Core.Web.Controls
Imports BlogEngine.Core
Imports System.Net.Mail
Imports System.Threading

<Extension("Pings all the ping services specified on the PingServices admin page and send track- and pingbacks", "1.3", "BlogEngine.NET")> _
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 Ping, item)
        End If
   End Sub

    Private Shared Sub Ping(ByVal item As IPublishable, ByVal itemUrl As Uri)
        Try
            System.Threading.Thread.Sleep(500)

            ' Ping the specified ping services.
            BlogEngine.Core.Ping.PingService.Send(itemUrl)

            ' Send trackbacks and pingbacks.
            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
the error is
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)'.

Which on build in visual studio 2008 gives an error.

Please help