怎么用VBS脚本来实现自动更改ASP.NET的版本?
'执行Dos命令
Function CmdExecute(str)
On Error Resume Next
dim WshShell,cmd
Set WshShell = CreateObject("WScript.Shell")
cmd="cmd /C " & str
'response.Write(cmd):response.End()
CmdExecute=WshShell.Run(cmd,0,True)
set WshShell=nothing
End Function
'str=str="%systemroot%\Microsoft.NET\Framework\v1.1.4322\aspnet_regiis.exe -s w3svc/200800002 -norestart" 'asp.net1.1版本
str="%systemroot%\Microsoft.NET\Framework\v2.0.50727\aspnet_regiis.exe -s w3svc/200800002 -norestart" 'asp.net2.0 版本
msgbox CmdExecute(str)