wmac222
04-05-2005, 02:13 PM
I have developed a no-brainer web page that my users can select the printer they want installed and whether or not it will be their default printer. When they click the 'Install Printer' button, I would like the following VB script to be executed, any suggestions on how I can run this script from the 'called' <form action=xxx.asp method=post> ASP page?
*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!
Dim objNetwork, bnDefaultPrinter
bnDefaultPrinter = Request.Form ("DefaultPrinter")
Set objNetwork = CreateObject("Wscript.Network")
objNetwork.RemovePrinterConnection "\\[server name]\[printer name]"
objNetwork.AddWindowsPrinterConnection "\\[server name]\[printer name]"
If bnDefaultPrinter = 0 Then
objNetwork.SetDefaultPrinter "\\[server name]\[printer name]"
End if
!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*
Thanks for the assist!
*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!
Dim objNetwork, bnDefaultPrinter
bnDefaultPrinter = Request.Form ("DefaultPrinter")
Set objNetwork = CreateObject("Wscript.Network")
objNetwork.RemovePrinterConnection "\\[server name]\[printer name]"
objNetwork.AddWindowsPrinterConnection "\\[server name]\[printer name]"
If bnDefaultPrinter = 0 Then
objNetwork.SetDefaultPrinter "\\[server name]\[printer name]"
End if
!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*!*
Thanks for the assist!