- 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp)
-- 金字塔软件问题提交 (http://weistock.com/bbs/list.asp?boardid=2)
---- “您似乎将金字塔目录移动到了其它位置，需重新构建金字塔”，怎么回事？ (http://weistock.com/bbs/dispbbs.asp?boardid=2&id=6652)
-- 发布时间：2011/5/26 8:19:55
-- “您似乎将金字塔目录移动到了其它位置，需重新构建金字塔”，怎么回事？
如上图。
上帝看得见，我没有移动过金字塔的安装目录。甚至没有移动过金字塔的任何文件。呵呵
我也重新运行了register.bat，但依然会出现
-- 发布时间：2011/5/26 8:43:12
--
始终不断重复出现?
-- 发布时间：2011/5/26 9:03:15
--
我重新运行一下 register.bat 后，再重新打开，不会出现。
可是第二天开机又出现了
我是搞自动开机，开机运行 vbs文件 ，vbs文件的内容是打开金字塔，出现登录界面后用api的PostMessage发送ENter指令
开机也是如此，用API的PostMessage发送关闭指令，出现退出软件提示窗口后再发送enter
-- 发布时间：2011/5/26 9:06:44
--
那说明你的盘符总是在不断变化
-- 发布时间：2011/5/26 9:23:37
--
盘符变化？
老大看下我的代码：
开机启动金字塔
Wscript.sleep 15000
Set WshShell=WScript.CreateObject("WScript.Shell")
Set Wrap = CreateObject("DynamicWrapper")
Wrap.Register "user32.dll","FindWindow","i=ss","f=s", "r=l"
Wrap.Register "user32.dll","PostMessage","i=llls","f=s", "r=l"
WshShell.Run("D:\\Weisof~1\\WinStock.exe")
WScript.Sleep 10000
WindowHandle = Wrap.FindWindow(vbnullstring, "欢迎使用金字塔")
wrap.PostMessage windowhandle, &H100, &HD,0
wrap.PostMessage windowhandle, &H101, &HD,0
WScript.Sleep 10000
WshShell.run "rundll32.exe user32.dll,LockWorkStation" \'锁屏
关机前 关闭金字塔
Set Wrap = CreateObject("DynamicWrapper")
Wrap.Register "user32.dll","FindWindow","i=ss","f=s", "r=l"
Wrap.Register "user32.dll","PostMessage","i=llls","f=s", "r=l"
WindowHandle = Wrap.FindWindow(vbnullstring, "金字塔决策交易系统 - [动态显示牌]")
dd = wrap.Postmessage(windowhandle,&H10,0,0)
wscript.sleep 3000
WindowHandle1 = Wrap.FindWindow(vbnullstring, "金字塔")
wrap.PostMessage windowhandle1, &H100, &HD,0
wrap.PostMessage windowhandle1, &H101, &HD,0
-- 发布时间：2011/5/26 9:27:30
--
注意观察SETTING目录下的OPTION.INI文件,注意LastSoftPath这行数据的变化
-- 发布时间：2011/5/26 9:28:10
--
ok 去研究一下
-- 发布时间：2011/5/26 12:28:59
--
找到问题了。
我是以这种方法打开金字塔 WshShell.Run("D:\\Weisof~1\\WinStock.exe")
LastSoftPath记录的是D:\\Weisof~1\\
而有时候我手动打开金字塔, LastSoftPath记录的是D:\\Weisof Stock\\
所以就有了上面的提示