sexx

给你发短消息怎么没联系我阿。。。估计你用的是IE8，所以会出现那个错误

现在修改了下，估计IE8也可以用了，试成功了说一下

[ 本帖最后由 sexx 于 2011-1-18 17:48 编辑 ]

sexx

ie9太新了。。暂时没有好的解决办法，只有临时的办法：

在第20行附近搜索

1. ie.document.body.innerhtml=div1&"1. 选择地图文件(*.rsw)<br><br><input type='file' id='x'/>"&div2
   
2. 
   
3. set ielement = ie.document.getelementbyid("x")
   
4.         ielement.click
   
5.         ielement.select
   
6.         prog = ie.document.selection.createRange.text

复制代码

删除之(共6行)
替换为

1. prog = inputbox("输入文件路径,如 d:\1\2.rsw"&vbCrLf&"同一目录只输入文件名即可")

复制代码

[ 本帖最后由 sexx 于 2011-1-20 12:45 编辑 ]

sexx