WZahran
Guest
|
Posted:
Tue May 17, 2005 4:52 pm Post subject:
AddListing an Item to a list by VB.Net page |
|
|
Dears,
I'm trying to add an item programaticly to a specific list using .NET, but I
always get this error "The security validation for this page has timed out."
Please advice
Thank you,
Waleed
Code as follows:
Dim TopologyManager As New TopologyManager
Dim myList As AreaListing
Dim Uri As New Uri("http://SPS2003")
Dim sites As PortalSiteCollection = TopologyManager.PortalSites
Dim PortalContext As PortalContext =
PortalApplication.GetContext(sites(Uri))
Dim newsarea As Area = AreaManager.GetArea(PortalContext, New
Guid("10cc9e53-2be5-414c-b533-ac4f592b5441"))
Dim newsGuid As Guid = AreaManager.GetSystemAreaGuid(PortalContext,
SystemArea.Topics)
Dim subAreas As AreaCollection = newsarea.Areas
Dim Audiences As Guid()
Dim NewListing As Microsoft.SharePoint.Portal.SiteData.AreaListing
Dim _Area As AreaListing
newsarea.Areas.AddArea("myTestArea")
NewListing = newsarea.Listings.AddListing(Title, "",
Portal.SiteData.ListingType.News, "", Audiences)
NewListing.AppearanceDate = PubDate
NewListing.Update() |
|