Ejecutar un programa en el server

[vgaray]

Este código te servirá para ejecutar algún programa localizado en el servidor.

<%
If ComponenteInstalado("WScript.Shell") Then
Dim wsh
Set wsh = createobject("WScript.Shell")
wsh.run("c:\winnt\notepad.exe")
Else
Response.Write "Actualmente no puedes 'correr' un programa ejecutable en el servidor usando el componente 'WScript.Shell'"
End if
%>
<%
Function ComponenteInstalado(ProgId)
Dim tmpObject
On Error Resume Next
Set tmpObject = Server.CreateObject(ProgId)
If Err.Number = 0 Then
ComponenteInstalado = True
Else
ComponenteInstalado = False
End If
Set tmpObject = Nothing
End Function
%>


---------------------
Tan libre como gratuito!!!

[jcarlossb]

Pues muchas gracias, parece muy interesante

[Aston]

¡Fantástico vgaray, como siempre! Un saludo.:)

<a href="http://www.laventanita.net/" target="_blank">
<img src="http://www.breogan.org/images/Aston.gif" border="0" alt="La Ventanita.net - Lo imprescindible en la red"></a>

[yomero]

a probarlo !!, Gracias

Saluditos

[ElAprendiz]

no entendi mucho,
1- si ejecuta un programa instalado en el servidor
2- ejecuta un programa que este en el cliente( ej. archivos pdf en el navegador)
3. ejecuta un programa que este en el cliente
fuera del navegador


<center><IMG SRC="http://www.550m.com/usuarios/altolacruz/elaprendiz.gif" ALT="Visitame en AlSurNet.com -- E-Learning E-Commerce Multimedia E-business--"></center>

[Yoston]

Prueba otra alternativa..creando tu propia
DLL
que ejecute elementos en el servidor...

echale un
<a href='ir.asp?http://www.forosdelweb.com/mensaje.asp?id=80841' target='_blank'>http://www.forosdelweb.com/mensaje.asp?i...</a>

Chausito... :cantar:

[dajacevit]

Ok, excelente, viendo post del maestro VGARAY,son excelentes,como siempre.

A probarlo!!!!