Tag: 事情想复杂

把简单的事情想复杂

原本通过VBSCRIPT调用一个COM组件来获取机器硬件ID码(也就是CPU,内存,硬盘,网络适配器等信息的组合)通过VMPROTECT的API,大概是这样: Dim Obj Set Obj = CreateObject("HelloACM.Application") Msgbox Obj.GetHardwareID 通过 VBSCRIPT 的 MSGBOX函数能把ID显示出来: 但是用户就很难把这个ID拷出来发给我.于是我就在想, 是不是得把这字符串写成文件然后通过调用NOTEPAD记事本打开?或者发邮件,或者复制到粘贴板,或者创建一个IE窗口显示在文本框里,总之,得写一些代码. 后来, 同事说,为什么不用VBSCRIPT里的INPUTBOX,提示用户输入字符串,并把需要的字符串设置成默认的输入.用户就可以复制(CTRL+C)了.简单,好用. Dim Obj Set Obj = CreateObject("HelloACM.Application") InputBox "HardwareID", "HardWareID", Obj.GetHardwareID INPUTBOX是VBSCRIPT内置支持的函数,显示一个文本框,返回用户输入的字符串.第一个参数是提示信息,第二个是标题,第三个是默认值. 把简单的事情想复杂.同事的一句话省了我不少工作(一天的量).讨论真的很重要,千万不要闭门造车. …