Wie VBScript in HTML Rückmeldung anzeigen - Druckerinstallation?
Hi,
ich habe in der Firma ein Script entworfen mit dem die Mitarbeiter die kompletten Netzwerkdrucker sehen und verbinden können.
Nachdem ich dies allerdings etwas in Form gebracht habe bekomme ich keine Rückmeldung über die erfolgreiche installation ):
Wahrscheinlich leigt es an den Tabellen. Wie kann ich die Meldung am Ende anzeigen lassen?
Hier ein Auszug aus meinem Script:
ich habe in der Firma ein Script entworfen mit dem die Mitarbeiter die kompletten Netzwerkdrucker sehen und verbinden können.
Nachdem ich dies allerdings etwas in Form gebracht habe bekomme ich keine Rückmeldung über die erfolgreiche installation ):
Wahrscheinlich leigt es an den Tabellen. Wie kann ich die Meldung am Ende anzeigen lassen?
Hier ein Auszug aus meinem Script:
<head>
<title>Druckerinstallation</title>
<HTA:APPLICATION
APPLICATIONNAME="Druckerinstallation"
SCROLL="no"
SINGLEINSTANCE="yes"
WINDOWSTATE="normal">
</head>
<script language="vbscript">
Window.resizeTo 600, 400
Sub Printer1
Set objNetwork = CreateObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection "\\IP-Server\Drucker1"
DataArea.InnerHTML = "Drucker im Raum 154 wurde erfolgreich installiert"
End Sub
Sub Printer2
Set objNetwork = CreateObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection "\\IP-Server\Drucker2"
DataArea.InnerHTML = "Drucker im Raum 157 wurde erfolgreich installiert"
End Sub
Sub Printer3
Set objNetwork = CreateObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection "\\IP-Server\Drucker3"
DataArea.InnerHTML = "Drucker im Raum 166 wurde erfolgreich installiert"
End Sub
Sub Printer4
Set objNetwork = CreateObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection "\\IP-Server\Drucker4"
DataArea.InnerHTML = "Drucker im Raum 166 wurde erfolgreich installiert"
End Sub
</script>
<body bgcolor=white>
<h1>Druckerinstallation<br></br></h1>
<p><u>Wähle einen Drucker aus:</u></p>
<table bgcolor=white height=0 width=100%><tr><th align=left>
<input type="button" style="width:220px;" value="Drucker1" name="run_button" onClick="Printer1"><p>
<p>
</th>
<th align=left>
<input type="button" style="width:220px;" value="Drucker2" name="run_button" onClick="Printer2"><p>
<p>
</th></tr>
<tr><th align=left>
<input type="button" style="width:220px;" value="Drucker3" name="run_button" onClick="Printer3"><p>
<p>
</th>
<th align=left>
<input type="button" style="width:220px;" value="Drucker4" name="run_button" onClick="Printer4"><p>
<p>
</th></tr>
<span id = "DataArea"></span>
</table>
<br>
</body>
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 370792
Url: https://administrator.de/contentid/370792
Ausgedruckt am: 17.11.2024 um 11:11 Uhr
2 Kommentare
Neuester Kommentar
Hi,
nur so ins Blaue:
Zweiter Ansatz: Messagebox?
E.
Edit:
Oder DataArea.Write "...." ?
nur so ins Blaue:
DataArea.InnerHTML = "Drucker im Raum 166 wurde erfolgreich installiert"
"Drucker im Raum 166 wurde erfolgreich installiert" ist kein HTML. Deshalb erster Ansatz: Nimm InnerText statt InnerHTML.Zweiter Ansatz: Messagebox?
msgbox "Drucker im Raum 166 wurde erfolgreich installiert"
E.
Edit:
Oder DataArea.Write "...." ?