FP2003 / Sharepoint in Vb.Net

[Derek]

Due to restraints in Sharepoint, I am trying to develop some Vb.Net apps to create utilities for managing Sharepoint, outside of the Sharepoint and FP2003 GUI's

I am trying to develop a windows application in VB.Net that would do the following...

Application #1
-This application would be used to get the accurate "Last Modified Date" from the sites in our Sharepoint Portal. This is to manage sites that have not been updated in a while and notify the owners. Trying to do this inside of Sharepoint is cumbersome in that the "Last Modified Date" is not always the correct date as their may be a web under the top level web that has been modified later than the top level (this is usually the case
-This app should go trraverse through ALL of the webs under the root and be able to list items that have not been modified based on criteria provided in the application by the user...for example if I want to see all files/webs/etc that have not been modified in the past 90 days
-This app would also provide a total size of the web at the top most level of the particular web
-I would think that this would be best done by referencing the sharepoint web service in the VB.Net application? Any ideas would help

Application #
-This application would be written in VB.Net as well and have no user interface
-It would need to use the FP2003 object model and EXPORT each web under the root into its' own file(WebPackage)
-Basically mimicking the function inside of FP2003 under Tools->Packages->Export
-The code I have for this is as follows and is not working..
Dim aFolder As WebFolde
Dim fpApp As New FrontPage.Application(
Dim WebName As String = "http://ourserver
Dim myWeb As WebEx = fpApp.Webs.Add(WebName, , , FrontPage.FpWebOpenFlags.fpOpenNoWindow

For Each myWeb In fpApp.Web
For Each aFolder In myWeb.AllFolder
If aFolder.IsWeb And Not aFolder.IsRoot The
If aFolder.Name = "ASC" The
Dim myWebPackage As WebPackag
myWebPackage = myWeb.CreatePackage("test_package"
myWebPackage.Add(fpapp.ActiveWeb.Url, FpDependencyFlags.fpDepsDefault
myWebPackage.Save("c:\test_package", 1
End I
End I
Next aFolde
Next myWe
-When the code is run the file is created but is only 1kb in size therefore the export didn't work

Thanks in advance
-Derek.

 

[Stefan B Rusynko]

You may want to try the WSS newsgroup at: news://msnews.microsoft.com/microsoft.public.sharepoint.windowsservices



| Due to restraints in Sharepoint, I am trying to develop some Vb.Net apps to create utilities for managing Sharepoint, outside of
the Sharepoint and FP2003 GUI's.
|
| I am trying to develop a windows application in VB.Net that would do the following....
|
| Application #1:
| -This application would be used to get the accurate "Last Modified Date" from the sites in our Sharepoint Portal. This is to
manage sites that have not been updated in a while and notify the owners. Trying to do this inside of Sharepoint is cumbersome in
that the "Last Modified Date" is not always the correct date as their may be a web under the top level web that has been modified
later than the top level (this is usually the case)
| -This app should go trraverse through ALL of the webs under the root and be able to list items that have not been modified based
on criteria provided in the application by the user...for example if I want to see all files/webs/etc that have not been modified in
the past 90 days.
| -This app would also provide a total size of the web at the top most level of the particular web.
| -I would think that this would be best done by referencing the sharepoint web service in the VB.Net application? Any ideas would
help.
|
| Application #2
| -This application would be written in VB.Net as well and have no user interface.
| -It would need to use the FP2003 object model and EXPORT each web under the root into its' own file(WebPackage).
| -Basically mimicking the function inside of FP2003 under Tools->Packages->Export.
| -The code I have for this is as follows and is not working...
| Dim aFolder As WebFolder
| Dim fpApp As New FrontPage.Application()
| Dim WebName As String = "http://ourserver"
| Dim myWeb As WebEx = fpApp.Webs.Add(WebName, , , FrontPage.FpWebOpenFlags.fpOpenNoWindow)
|
| For Each myWeb In fpApp.Webs
| For Each aFolder In myWeb.AllFolders
| If aFolder.IsWeb And Not aFolder.IsRoot Then
| If aFolder.Name = "ASC" Then
| Dim myWebPackage As WebPackage
| myWebPackage = myWeb.CreatePackage("test_package")
| myWebPackage.Add(fpapp.ActiveWeb.Url, FpDependencyFlags.fpDepsDefault)
| myWebPackage.Save("c:\test_package", 1)
| End If
| End If
| Next aFolder
| Next myWeb
| -When the code is run the file is created but is only 1kb in size therefore the export didn't work.
|
| Thanks in advance,
| -Derek.

 

[Guest]

Thanks, I will repost there.
-Derek.

-----Original Message-----
You may want to try the WSS newsgroup at: news://msnews.microsoft.com/microsoft.public.sharepoint.wi
ndowsservices



| Due to restraints in Sharepoint, I am trying to

develop some Vb.Net apps to create utilities for managing
Sharepoint, outside of

the Sharepoint and FP2003 GUI's.
|
| I am trying to develop a windows application in VB.Net

that would do the following....

|
| Application #1:
| -This application would be used to get the

accurate "Last Modified Date" from the sites in our
Sharepoint Portal. This is to

manage sites that have not been updated in a while and

notify the owners. Trying to do this inside of Sharepoint
is cumbersome in

that the "Last Modified Date" is not always the correct

date as their may be a web under the top level web that
has been modified

later than the top level (this is usually the case)
| -This app should go trraverse through ALL of the webs

under the root and be able to list items that have not
been modified based

on criteria provided in the application by the

user...for example if I want to see all files/webs/etc
that have not been modified in

the past 90 days.
| -This app would also provide a total size of the web

at the top most level of the particular web.

| -I would think that this would be best done by

referencing the sharepoint web service in the VB.Net
application? Any ideas would

help.
|
| Application #2
| -This application would be written in VB.Net as well and have no user interface.
| -It would need to use the FP2003 object model and

EXPORT each web under the root into its' own file
(WebPackage).

| -Basically mimicking the function inside of FP2003 under Tools->Packages->Export.
| -The code I have for this is as follows and is not working...
| Dim aFolder As WebFolder
| Dim fpApp As New FrontPage.Application()
| Dim WebName As String = "http://ourserver"
| Dim myWeb As WebEx = fpApp.Webs.Add(WebName, , , FrontPage.FpWebOpenFlags.fpOpenNoWindow)
|
| For Each myWeb In fpApp.Webs
| For Each aFolder In myWeb.AllFolders
| If aFolder.IsWeb And Not aFolder.IsRoot Then
| If aFolder.Name = "ASC" Then
| Dim myWebPackage As WebPackage
| myWebPackage = myWeb.CreatePackage("test_package")
| myWebPackage.Add

(fpapp.ActiveWeb.Url, FpDependencyFlags.fpDepsDefault)

| myWebPackage.Save ("c:\test_package", 1)
| End If
| End If
| Next aFolder
| Next myWeb
| -When the code is run the file is created but is only

1kb in size therefore the export didn't work.