Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
31 lines (20 sloc) 623 Bytes
<job id="Create New Optimization">
<script language="VBScript" src="../Route4Me.vbs"/>
<script language="VBScript">
WScript.Quit main()
Function main()
Dim r4m
Dim jFile
' Please put real value in route_date
WScript.Echo "Please, press OK and wait..."
url="https://www.route4me.com/api.v4/optimization_problem.php"
apikey="11111111111111111111111111111111"
url=url&"?api_key="&apikey
jFile="create_new_optimization_data.json"
Set r4m=New Route4Me
r4m.HttpPostRequest2 url,jFile
main=1
WScript.Echo "Finished..."
End Function
</script>
</job>