Toon posts:

[ASP] services van windows starten/stoppen

Pagina: 1
Acties:

donderdag 4 maart 2004 13:32

Acties:

Verwijderd

Topicstarter
Ik ben bezig met een projectje dat ik via het internet een service van mijn server wil stoppen of starten. Dit wil ik gaan doen met een freeware tool pslist en pskill

Sysinternals

Nu komt het probleem als ik met asp pslist wil uitvoeren krijg ik een error.

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45

<html>
<head><title>Computernamen in het doamein Office.zx.nl</title>
</head>

<body>
<blockquote>
<H3>ASPExec Dir Test</H3>
<%

  function Subst (strValue, strOldValue, strNewValue)
    intLoc = InStr(strValue, strOldValue)
    While intLoc > 0
      if intLoc > 1 then
        if intLoc = Len(strValue) then
          strValue = Left(strValue, intLoc-1) & strNewValue
        else
          strValue = Left(strValue, intLoc -1) & strNewValue & Right(strValue, Len(strValue)-(intLoc-Len(strOldValue)+1))
        end if
      else
        strValue = strNewValue & Right(strValue, Len(strValue)-1)
      end if
      intLoc = InStr(strValue, strOldValue)
    Wend
    Subst = strValue
  end function

  function FixUpItems (strItem)
    if strItem <> "" then
      strItem = Subst(strItem, "<", "&lt;")
      strItem = Subst(strItem, ">", "&gt;")
      FixUpItems = strItem
    else
      FixUpItems = "<br>"
    end if
  end function

  Set Executor = Server.CreateObject("ASPExec.Execute")
  Executor.Application = "c:\opt\scripts\run.bat"
  Executor.Parameters = ""
  strResult = FixUpItems(Executor.ExecuteDosApp)
  Response.Write "<pre>" & strResult & "</pre>"
%>
</blockquote>
</body>
</html>


in c:\opt\scripts\run.bat staat het volgende.

code:
1
2
3
4
5
6

@echo off
echo ***********************
echo * Harald van der Laan *
echo ***********************
echo.
pslist \\zx-susserver -u <username> -p <password>


Dan krijg ik dit te zien als ik hem uitvoer.
PsList 1.23 - Process Information Lister
Copyright (C) 1999-2002 Mark Russinovich
Sysinternals - www.sysinternals.com

Failed to take process snapshot on ZX-SUSSERVER
Heeft iemand hier ervaring mee of moet ik het gewoon ander oplossen.

[ Voor 27% gewijzigd door Verwijderd op 04-03-2004 13:41 ]

donderdag 4 maart 2004 14:28

Acties:

Verwijderd

Je kan natuurlijk ook zelf een COM object ontwikkelen in VB die services voor je start en stopt. Is niet erg ingewikkeld of veel werk. Mocht je hier niet komen.

donderdag 4 maart 2004 14:31

Acties:

Verwijderd

Het ligt meer aan je batch denk ik. Probeer hem is gewoon te starten zonder ASP. Werkt het dan wel?
Reageer