开启通达信 热点追踪 解决方法

开启通达信 热点追踪 解决方法

开启通达信  热点追踪  如图一，实际上需要一个提权操作，如下VBS代码来实现（ 并去掉  .TXT 即可）

复制到TXT文本内，保存时选  ANSI  ，保存好去掉.TXT得到.VBS 文件，放在通达信安装目录即跟tdxw.exe同一目录，运行即可。原来热点追踪没数据，现在就会有了。

源代码如下：

on error resume next
set fso = createobject("scripting.filesystemobject")
set objws = WScript.CreateObject("wscript.shell")

      Set f=fso.OpenTextFile("T0002\user.ini",1)
      str=f.ReadAll
      str=Replace(str,"L2Type=2","L2Type=3")
      f.Close
      Set f=fso.OpenTextFile("T0002\user.ini",2)
      f.Write(str)'将字符串写入
      f.Close

      objws.Run "tdxw.exe",0,0

set fso=nothing
set objws=nothing
Wscript.Quit

运行的时候，你不能真正进入L2，所以还得按图二进入普行吧

别的部分提权操作也可用上面代码实现，复杂的还是财富大数据老师那个 loader 才可以。