Setting default page in deployment

[QDL]

Hello everyone,

is there a way to programmaticall y set the default document from a
deployment project for ASP.NET. My default page is named default.htm and I'd
like to set it as the topmost default document in IIS site properties using
the deployment project, is this possible? Tried to google but found no
answer.

TIA
Paolo

[Cowboy \(Gregory A. Beamer\)]

You can do this by exporting the IIS settings and actually installing them
on the server in question. I do not have a working example right now, but
will see if I have anything written up on it.

--
Gregory A. Beamer
MVP; MCP: +I, SE, SD, DBA
http://gregorybeamer.spaces.live.com

*************** *************** *************** ****
Think outside of the box!
*************** *************** *************** ****
"QDL" <qd*@qdl.qdlwro te in message
news:45******** *************** @reader3.news.t in.it...

Hello everyone,

is there a way to programmaticall y set the default document from a
deployment project for ASP.NET. My default page is named default.htm and
I'd like to set it as the topmost default document in IIS site properties
using the deployment project, is this possible? Tried to google but found
no answer.

TIA
Paolo

[QDL]

You can do this by exporting the IIS settings and actually installing them

on the server in question. I do not have a working example right now, but
will see if I have anything written up on it.

Thanx Cowboy for answering, will appreciate if you have a sample but anyway,
you pointed me the right way... I thought there was something in the
Deployment project to obtain that but I was wrong...

Thanx
Paolo

[QDL]

I answer myself as I found the way and may be helpful to some1:

1. In deployment project add CustomAction for OnCommit specify
InstallerClass= True and add parameter /vdir="[TARGETVDIR]"

2. Add an installer class to your aspnet project and insert this override:

Private Const EnableDefaultDo c = &H40000000&

Protected Overrides Sub OnCommitted(ByV al savedState As
System.Collecti ons.IDictionary )
Dim folderRoot, vdir As DirectoryEntry
Dim vdirname As String

Try
vdirname = Me.Context.Para meters("vdir")

folderRoot = New DirectoryEntry( "IIS://localhost/W3SVC/1/Root")
folderRoot.Refr eshCache()

vdir = folderRoot.Chil dren.Find(vdirn ame, folderRoot.Sche maClassName)

vdir.Properties ("DirBrowseFlag s").Value =
vdir.Properties ("DirBrowseFlag s").Value Or EnableDefaultDo c
vdir.Properties ("DefaultDoc"). Value = "default.ht m"

vdir.CommitChan ges()
folderRoot.Comm itChanges()
Catch ex As Exception
Finally
If (Not vdir Is Nothing) Then
vdir.Close()
End If

If (Not folderRoot Is Nothing) Then
folderRoot.Clos e()
End If
End Try
End Sub

This will enable default documents and add default.htm as the only default
document. Of course can be changed.

Hope someone will be helped by this

Paolo