By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
455,556 Members | 1,672 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 455,556 IT Pros & Developers. It's quick & easy.

Directoryservices adding virtual directory error

P: n/a
I am recieving the following error: Unknown error (0x80005000) when trying
to add a virtual directory. Any help would be appreciated, my code follows.

Thanks

Glenn

Sub create(ByVal strComputer As String, ByVal strProject As String)

Dim strIISPath As String
strIISPath = "IIS:\\P88728\W3SVC\1\ROOT\"
Dim objIISDE As DirectoryEntry
Dim objIISDC As DirectoryEntries
Dim objVDir As DirectoryEntry
objIISDE = New DirectoryServices.DirectoryEntry(strIISPath)
objIISDC = objIISDE.Children
objVDir = objIISDC.Add("test", objIISDE.SchemaClassName())
objVDir.CommitChanges()
objVDir.Properties("Path")(0) = "c:\temp"
objVDir.CommitChanges()

End Sub
Nov 20 '05 #1
Share this Question
Share on Google+
2 Replies


P: n/a
Hi Glenn,

You'd be surprised at the power of Google. I entered 0x80005000 into the
search bar and got
http://support.microsoft.com/?kbid=324433

Simple when you know how. ;-)

Regards,
Fergus
Nov 20 '05 #2

P: n/a
Thanks for the response. unfortunatly, that does not fix the issue. A
little more on my environment: I'm testing this on an XP Pro SP1 Box, there
is no Message Queing going on. I am also running this just on one box at
this point. Thanks.

Glenn
"Fergus Cooney" <fi******@tesco.net> wrote in message
news:%2****************@TK2MSFTNGP12.phx.gbl...
Hi Glenn,

You'd be surprised at the power of Google. I entered 0x80005000 into the search bar and got
http://support.microsoft.com/?kbid=324433

Simple when you know how. ;-)

Regards,
Fergus

Nov 20 '05 #3

This discussion thread is closed

Replies have been disabled for this discussion.