Create a discussion topic in SharePoint 2010 using Powershell

I have a Discussion list in which i need to add a new topic in SharePoint 2010 using Powershell.


Powershell Script:
  1. $site=Get-SPSite "http://serverName/sites/VJTesting/"  
  2.   
  3. $web=$site.OpenWeb()  
  4.   
  5. $list=$web.Lists.TryGetList("Team Discussion")  
  6.   
  7. if($list -ne $null)  
  8.   
  9. {  
  10.   
  11.      $newTopic = [Microsoft.SharePoint.Utilities.SPUtility]::CreateNewDiscussion($list, "Topic6");  
  12.   
  13.      # In the "body" column you can add the HTML content so that you can add images and add the styles for the contents.  
  14.   
  15.      # To get the HTML content - Go to the "Discussion" list, then click on "Add new Discussion".  
  16.   
  17.      # In the body column add the contents and images.  
  18.   
  19.      # In the ribbon interface, click on "Editing Tools" and then click on "Format text" tab.  
  20.   
  21.      # In the "Markup" group you could see "HTML" option.  
  22.   
  23.      # Click on the down arrow and then click on "Edit HTML Source".  
  24.   
  25.      # Copy the HTML source.  
  26.   
  27.      $newTopic["Body"] = "<div class='ExternalClassF7F26CE68055477797898F1D2250E309'><div class='ExternalClass37FC140BAA764AAD9DAB0F050FD45712' style='color: #ec008c; text-decoration: underline'><p><strong>"My new Topic."<img alt='DISCUSS.GIF' src='/sites/VJTesting/SiteAssets/Lists/Team%20Discussion/EditForm/DISCUSS.GIF' style='margin: 5px'/><br/><br/></strong>?</p></div></div>";  
  28.   
  29.      $newTopic.Update();        
  30.   
  31.      Write-Host -ForegroundColor Green $newTopic.Title " discussion topic is created successfully"  
  32.   
  33. }  
  34.   
  35. else  
  36.   
  37. {  
  38.   
  39.       Write-Host -ForegroundColor Yellow "List does not exists."    
  40.