Kald af bat fil fra ASP

jeg her fundet det her engang, hvor man kalder ping, så kan man vel også kalde en bat fil.

<%
strIP = "www.abc.dk"
Function ipAdresse(strIP)
        Set net = Server.CreateObject("wscript.network")
        Set sh = Server.CreateObject("wscript.shell")
        sh.run "%comspec% /c ping " & strIP & " > " & server.mappath( strIP & ".txt"),0,true
        Set sh = nothing
        Set fso = createobject("scripting.filesystemobject")
        Set ts = fso.opentextfile(server.mappath( strIP & ".txt"))
        ipAdresse = null
        Do While Not ts.AtEndOfStream
        data = trim(ts.readline)
      If instr(data,"Ping-statistikker for ") Then
      myArr = split(data,"Ping-statistikker for ")
    ipAdresse = myArr(1)
        Exit Do
        End If
        loop
        ts.close
        Set ts = nothing
        'fso.deletefile server.mappath( strIP & ".txt") 'Used to delete the        temp file
        Set fso = nothing
        ipAdresse = trim(split(ipAdresse,":")(0))
        End Function
response.write(ipAdresse(strIP))
%>

det du sådan set behøver er bare:

<%
Set server_shell = Server.CreateObject("wscript.shell")
server_shell.Run "%comspec% /c FILE_TO_EXECUTE"
%>

Jeg får fejlen tilladelse nægtet :(

du skal selvfølgelig sørge for at de rigtige rettigheder er sat på serveren.

IUSR_SERVERNAVN skal have skrive, læse og eksekverings rettigheder

Og hvordan gør jeg det? - jeg har sat webserveren op til at tillade eksekverbare filer i iis.

du finder filen, og højreklikke rpå den, så vælger du egenskaber, og fanebladet sikkerhed, her adder du brugeren IUSR_SERVERVAN, hvis den ikke er der i forvent, og sætter rettighederne.

Det ændrer ikke rigtig noget, får den samme fejl

prøv med:

Dim objShell
Set objShell = Server.CreateObject(\"wscript.Shell\")
Dim strCMD
strCMD = \"C:\\Fil.bat\"
objShell.Run(strCMD,0,true)

taget fra: http://eksperten.dk/spm/27742

du kan også kigge på dette spg:

www.experts-exchange.com/Web/Web_Languages/ASP/Q_20773870.html+use+wscript.shell+in+asp+script&hl=da" target="_blank">http://64.233.183.104/search?q=cache:OgGceVpP4ZIJ:www.experts-exchange.com/Web/Web_Languages/ASP/Q_20773870.html+use+wscript.shell+in+asp+script&hl=da

hmm, det er da rimelig indviklet :) Det ser ud til at det skal køre på klientsiden eller hvad?

Men jeg får denne fejl nu:
Der kan ikke bruges parenteser ved kald af en Sub
/axld/shoppingModule.asp, line 200, column 27
objShell.run(strCMD,0,true)

så skriver du:

objShell.run strCMD,0,true

æv, så får jeg bare tilladelse nægtet igen

jeg skal være ærlig at sige at jeg aldrig selv har rodet med det, jge har bare gemt scriptet hvis jeg en dag fik brug for det, så jeg kan ikke give dig en løsning. Vent og se om ikke der er andre der kommer forbi, og kan svare på det sidste.

Jeg valgte at løse det på en andet måde, så jeg bare linker til batfilen og så må brugerene trykke på kør...Ellers tak for hjælpen