Remote IISRESET from website

Forums

My Profile

Inbox

Address Book

My Subscription

My Forums

Remote IISRESET from website

Logged in as: Guest

arrSession:exec spGetSession 2,2,51383

	Active Users: There are 0 members and 0 guests.
	Users viewing this topic: none

Printable Version

All Forums >> [Scripting] >> WSH & Client Side VBScript >> Remote IISRESET from website
Do you like VisualBasicScript.com? Link to us and help spread the word about our forum. Thanks!

Page: [1]

Message

<< Older Topic Newer Topic >>

Remote IISRESET from website - 8/31/2007 12:40:39 AM

4scriptmoni

Posts: 208
Score: 0
Joined: 5/3/2007
Status: offline

I am in trying to write a script that will be called from a website, taking the servername parameter and would
do an iisreset...
is it possible to impersonate ?
i have security problems , here is the code i have...

_____________________________

Enterprise Microsoft Scripts
Exchange, Login/Logout Monitor,TS, Monitoring, Security, AD, etc...
http://www.felipeferreira.net

Post #: 1

RE: Remote IISRESET from website - 9/27/2007 2:54:30 AM

4scriptmoni

Posts: 208
Score: 0
Joined: 5/3/2007
Status: offline

Anybody has anything simillar...
I have still not been able to do this.

I tried also some code i found in the internet...

'if request.querystring("RestartSpool") = true then
  'On Error Resume Next
  Dim ServiceName, ClientName, strPassword
  ServiceName="Spooler"
  ClientName ="tstweb01b01"   
  strPassword = "123333"
  strUser = "DOMAIN\USER"
  runat="server"
  Response.write    "Restaring Services" & request.querystring
  Set WshShell = CreateObject("Wscript.Shell")
  Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
  Set objSWbemServices = objSWbemLocator.ConnectServer(ClientName, "root\cimv2",strUser, strPassword)

If Err.Number <> 0 Then

Response.write "WMI Connection was not successful. " & Chr(13) & Err.Description, 10, Err.Source & " on " & ClientName, 48

Else

Set colOperatingSystems = objSWbemServices.ExecQuery ("select * from Win32_Service where Name='" & ServiceName & "'")
      For each Service in colOperatingSystems
      Service.StopService()

Do while service.interrogateservice() <> 6
      'WScript.Echo(service.interrogateservice())
      WScript.Sleep(100)
      Loop

Service.StartService()
      Next

If Err.Number <> 0 Then

Response.write "Restarting service was not successful. " & Chr(13) & Err.Description, 10, Err.Source & " on " & ClientName, 48

Else

Response.write "Print Spooler restarted successfully on " & ClientName, 10, "Successful.", 64

End If

'end if

'<--<input type="inputbox" name="Server"></>-->
</script>
<html>
<head>

<title>Restart Spooler Service</title>

</head>

<Body>

</form>

</body>
</html>

also tried:

Still no success... nobody has never done something like this?

< Message edited by 4scriptmoni -- 9/27/2007 4:39:14 AM >

_____________________________

Enterprise Microsoft Scripts
Exchange, Login/Logout Monitor,TS, Monitoring, Security, AD, etc...
http://www.felipeferreira.net

(in reply to 4scriptmoni)

Post #: 2

RE: Remote IISRESET from website - 10/4/2007 3:00:56 PM

dm_4ever

Posts: 2663
Score: 46
Joined: 6/29/2006
From: Orange County, California
Status: offline

Just a guess...but permissions seem to be the issue. What happened when you tried using SWbemLocator and supplying alternate credentials?

_____________________________

dm_4ever

My philosophy: K.I.S.S - Keep It Simple Stupid
Read Me: http://www.visualbasicscript.com/m_24727/tm.htm
Frequently Asked Stuff: http://www.visualbasicscript.com/m_47117/tm.htm

(in reply to 4scriptmoni)

Post #: 3

RE: Remote IISRESET from website - 10/5/2007 3:01:13 AM

CondoPC

Posts: 118
Score: 0
Joined: 7/23/2007
Status: offline

If permissions are an issue, you should not be putting credentials in your code. You should be running the code as a service account that has credentials to make the chhanges. If in an ASP page, you should have an app pool configured and running as the service account. If justa website, and it is running on Server 2003 SP1 or higher, you will also need to configure the anonymous access credentials as the service account.

(in reply to dm_4ever)

Post #: 4

If you found our site useful please link to us <a href="http://www.visualbasicscript.com">VisualBasicScript.com</a>.

All Forums >> [Scripting] >> WSH & Client Side VBScript >> Remote IISRESET from website

Page: [1]

Jump to:

New Messages	No New Messages
Hot Topic w/ New Messages	Hot Topic w/o New Messages
Locked w/ New Messages	Locked w/o New Messages

Post New Thread

Reply to Message

Post New Poll

Submit Vote

Delete My Own Post

Delete My Own Thread

Rate Posts