切换dos并dir的vbs

复制代码 代码如下:
<script language=vbscript>
Dim oShell
Set oShell = WScript.CreateObject ("WSCript.shell")
oShell.run "cmd /K CD c:\ & dir"
Set oShell = Nothing
</script>