batman 当前离线
考官
荣誉版主
filmname = InputBox("请输入电影名") Set ws = CreateObject("wscript.shell") filmname = escape(filmname) ws.Run "http://7sousou.cn/search/?wd=TITLE%7C%7C%7C" & filmname, 1, True Set ws = Nothing复制代码
TOP