---
title: "ASP med VBscript"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/136902-asp-med-vbscript"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "niNe"
published: "2005-11-03T15:53:54.000Z"
updated: "2005-11-09T07:47:34.000Z"
replies: 11
views: 647
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/136902-asp-med-vbscript"
---

# ASP med VBscript

## #1 — niNe, 2005-11-03T15:53Z

Tjo

Sitter o knåpar lite på en site där man ska kunna klicka på en knapp/bild och då ska cmd öppnas och den ska pinga ett visst ip. 

Körde enligt följande modell:

```
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd.exe /c c: & ping 127.0.0.1 & pause"
```

 

Detta fungerade ju dock inte.... Får object required på Set wshellraden...

Varför går det inte att köra dessa kommandon via en ASP-VBscriptsite?!

Permalänk: https://www.webforum.nu/p/136902

## #2 — Travoni, 2005-11-03T16:12Z

Byt ut: WScript.CreateObject
mot: Server.CreateObject

Dock måste du ha rättigheter på servern för att köra shell-commandon

Permalänk: https://www.webforum.nu/p/1698649

## #3 — niNe, 2005-11-04T07:21Z

Jag måste göra något fel... Byter ut den mot Server.CreateObject men den länkar ändå bara tillbaks till förstasidan... Kör full access på IISen och har både scripts och executables aktiverat...

Permalänk: https://www.webforum.nu/p/1698824

## #4 — @nders, 2005-11-04T07:25Z

Vad menar du med "länkar tillbaks till förstasidan"?
Exakt vad hade du tänkt skulle hända?

Om du nu skulle lyckas exekvera raden i fråga så kommer du nog inte att märka det. Det är ju inte så att ASP-sidan slänger upp ett cmd-fönster...

**Edit:** Om du vill att klienten ska pinga, så är kan du väl prova att lägga koden på klientsidan i \<script\>, utan att blanda in ASP.

Permalänk: https://www.webforum.nu/p/1698825

## #5 — niNe, 2005-11-04T07:59Z

Ah, ska prova det..

Permalänk: https://www.webforum.nu/p/1698828

## #6 — niNe, 2005-11-04T09:35Z

Om jag nu ska lägga den i en \<script\>tagg, hur går jag till väga för att köra den med en länk?

Koden jag vill köra ligger längst upp i tråden...

Det jag vill ska hända är att jag har en söksida, där jag kan söka efter serverar eller klientmaskiner i nätet, och sedan pinga dessa direkt genom sidan. Vill ju då ha ett aktivt CMDfönster eller något annat som jag ser så jag ser att den fungerar.

Permalänk: https://www.webforum.nu/p/1698867

## #7 — emission, 2005-11-04T10:01Z

<http://www.4guysfromrolla.com/webtech/102998-1.shtml>

Permalänk: https://www.webforum.nu/p/1698879

## #8 — yohpops, 2005-11-04T12:33Z

Se nedan inlägg.

Permalänk: https://www.webforum.nu/p/1698939

## #9 — yohpops, 2005-11-04T12:35Z

Kan detta hjälpa?

```
<html>
<title>Ping</title>
<head>
</head>
<body>
<%
	serverID = Request.QueryString("serverID")
	strServer = Request.QueryString("serverName")
strserverIP=Request.QueryString("serverIP")

		if instr(1,strServer," ")>=0 and strserverIP<>"" then
		if instr(1,strserverIP,",")>0 then
			strserverIP = left(strserverIP,instr(1,strserverIP,",")-1)
		end if
		strServer=strserverIP
	end if
	if strServer <> "" then
		Set objShell = CreateObject("WScript.Shell")
		Set objScriptExec = objShell.Exec("ping -n 4 -w 1000 " & strServer)
		strPingResults = LCase(objScriptExec.StdOut.ReadAll)
		Response.Write replace(replace(replace(strPingResults,vbcrlf,"<br>"),"	","&nbsp;&nbsp;&nbsp;&nbsp;")," ","&nbsp;")
		Set objScriptExec = nothing
		Set objShell = nothing
	else
		Response.Write "No Server."
	end if
%>
<br><input type="button" value="Close" onclick="vbscript:window.close">
</body>
</html>
```

Permalänk: https://www.webforum.nu/p/1698940

## #10 — niNe, 2005-11-06T12:55Z

Din kod verkar vara något åt det hållet som jag vill ha det... Tyvärr händer ju ingenting när jag kör det... ping.asp?serverIP=192.168.0.1 osv osv... Den bara står o laddar i evigheter....

Permalänk: https://www.webforum.nu/p/1702708

## #11 — Travoni, 2005-11-07T06:56Z

Testa att lägga till: 
\<% Response.Buffer=false %\>

Högst upp på sidan.

Permalänk: https://www.webforum.nu/p/1703015

## #12 — niNe, 2005-11-09T07:47Z

Löste problemet... Dock inte med detta script utan ett från ett annat forum. 

Hade inte skapat en mapp med skrivrättigheter på webbservern :O

Permalänk: https://www.webforum.nu/p/1704099

---

Tråden på webben: https://www.webforum.nu/amne/asp/136902-asp-med-vbscript