X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/957ddcd3f14516cd0c013bf244f8ab1eecbeaf03..0c2ff3268deebf7a4ccc059a3142ca129353f9e2:/examples/gras/mmrpc/test_rl.vbs

diff --git a/examples/gras/mmrpc/test_rl.vbs b/examples/gras/mmrpc/test_rl.vbs
deleted file mode 100644
index 3b44c23406..0000000000
--- a/examples/gras/mmrpc/test_rl.vbs
+++ /dev/null
@@ -1,20 +0,0 @@
-Dim oShell
-Dim iExitCode
-
-Set oShell = WScript.CreateObject ("WSCript.shell")
-	
-iExitCode = oShell.run("cmd /K " & GetCurrentDirectory() & "bin\mmrpc_server  4002",1,False)
-WScript.Sleep 1000
-iExitCode = oShell.run("cmd /K " & GetCurrentDirectory() & "bin\mmrpc_client 127.0.0.1 4002",1,False)
-
-Set oShell = Nothing
-
-'This function returns the current directory of the script 
-Function GetCurrentDirectory()
-	
-	Dim sScriptFullName 
-	
-	sScriptFullName = WScript.ScriptFullName
-	GetCurrentDirectory = mid(sScriptFullName,1,InStrRev(sScriptFullName,"\"))
-	
-End Function