Some random numbers generated by VBS and written into a.txt code

Time:2019-11-4
Copy codeThe code is as follows:
Set a=WScript.CreateObject(“WScript.Shell”)
a.Run “notepad”
‘open Notepad
do
Randomize
x= Int((40 * Rnd) + 1)
‘generate a random number from 1 to 40 and assign it to X
WScript.Sleep 1000
a.SendKeys x&”,”
“Analog keyboard, output x
N = n + 1 ‘accumulator
If n = 10 then Wscript. Quit ‘push script if accumulator n is 10
loop
‘save as VBS and see the result

Recommended Today

Web API records the type of server address obtained by deploying IIS

There are many types of server address. The following records are available 1、HttpContext.Current.Server.MapPath(“~/File”) The returned value is D: \ 3project \ code \ mobileservice \ webapi \ file. Local service: this path is the root directory of the disk address where the project is located. Deployment server: the disk folder where the deployment file is […]