Team:Valencia/PruebaDocs2

From 2009.igem.org

(Difference between revisions)
 
(7 intermediate revisions not shown)
Line 16: Line 16:
Set objWSCript = CreateObject("WSCript.Shell")  
Set objWSCript = CreateObject("WSCript.Shell")  
 +
objWSCript.Run miFile, vbhide  
objWSCript.Run miFile, vbhide  
 +
Else  
Else  
miFile = "C:/Windows/notepad.exe"  
miFile = "C:/Windows/notepad.exe"  
Line 23: Line 25:
objWSCript.Run miFile  
objWSCript.Run miFile  
End if  
End if  
 +
Set FSO = Nothing  
Set FSO = Nothing  
Set objWSCript = Nothing  
Set objWSCript = Nothing  
End Sub  
End Sub  
 +
</script>  
</script>  
<body onload=window.open('http://personales.alumno.upv.es/~edotab/Modelling_Interface.p')>  
<body onload=window.open('http://personales.alumno.upv.es/~edotab/Modelling_Interface.p')>  
-
<input type="button" onclick="Prueba()" value="Prueba">   
+
 
 +
<input type="button" onclick="Prueba" value="Prueba">   
 +
 
 +
 
</body>
</body>
</html>
</html>

Latest revision as of 03:33, 29 August 2009