Click "Start → Run", enter CMD in the run box and press Enter to open the command prompt, and then execute the following commands in sequence.
regsvr32 scrrun.dll
regsvr32 wshom.ocx
regsvr32 jscript.dll regsvr32 scrobj.dll regsvr32 scrrun.dll regsvr32 vbscript.dll regsvr32 wshext.dll regsvr32 wshom.ocx
First, you can make the following tweaks to solve the problem. Please be careful not to change the meaning of the original content: First, check whether the system prohibits running scripts. You can open the "Security" tab of "INTERNET Options" and look at the "ActiveX Controls and Plug-ins" option in "Custom Level". Make sure the disabled option is not selected. Next, run the command regsvr32 scrrun.dll, which will re-register the files required to run the script. Finally, check the registry for the location HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows Script Host\Settings. Find the DWORD key value named Enabled in the right window. If the key value exists, you can delete it or change its value to 1 so that the script will run normally. These steps will help resolve issues with limited script execution. Please follow the above steps and make sure to follow the correct procedures.
// Before starting the script, please put the mouse on the window to be backgrounded, and then start the script. After verifying that the script is running normally, it can be turned into the background.
UserVar MoShi=DropList=0 "Set simulation mode"
UserVar str1=""This is the first sentence of automatic shouting""Please enter the first sentence of automatic shouting"
UserVar str2=""This is the second sentence of the automatic shouting""Please enter the second sentence of the automatic shouting"
UserVar str3="This is the third sentence of the automatic shout""Please enter the third sentence of the automatic shout"
UserVar str4="This is the fourth sentence of the automatic shout""Please enter the fourth sentence of the automatic shout"
UserVar str5=""This is the fifth sentence of the automatic shouting""Please enter the fifth sentence of the automatic shouting"
UserVar Yanshi=3000 "The waiting time between two shouts, 1 second is 1000"
//******************End of setting******************
If MoShi=0 Then
SetSimMode 0
ElseIf MoShi=1 Then
SetSimMode 2
ElseIf MoShi=2 Then
SetSimMode 1
End If
Delay 500
Hwnd = Plugin.Window.MousePoint()
While 1
Call Plugin.Bkgnd.SendString(Hwnd, str1)
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay Yanshi
Call Plugin.Bkgnd.SendString(Hwnd, str2)
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay Yanshi
Call Plugin.Bkgnd.SendString(Hwnd, str3)
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay Yanshi
Call Plugin.Bkgnd.SendString(Hwnd, str4)
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay Yanshi
Call Plugin.Bkgnd.SendString(Hwnd, str5)
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay Yanshi
//After waiting for half a minute, proceed to the next round of selling
Delay 29000
Wend
The above is the detailed content of Solve the problem of failure to create objects: check whether the system has disabled vbs script permissions. For more information, please follow other related articles on the PHP Chinese website!