首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

这个能用宏替换吗解决方案

2012-03-25 
这个能用宏替换吗用以下语句可以读取word内容WOLE.Documents.OPEN(d:\doc\1.doc)WOLE.Documents(1).Sele

这个能用宏替换吗
用以下语句可以读取word内容


WOLE.Documents.OPEN('d:\doc\1.doc') 
WOLE.Documents(1).Select
WOLE.Selection.Copy
lcString=_CLIPTEXT
WOLE.QUIT
RELEASE WOLE



其中的 d:\1.doc这里能不能用变量?

我的部分代码如下:

-------------------------------
gnDbcnumber = ADIR(gadbf,'d:\doc\*.*') 

FOR nCount = 1 TO gnDbcnumber
  mc=gadbf(nCount,1)
  WOLE.Documents.OPEN(&mc)



运行后提示: 找不到别名

mc的值已成功取到, 但应如何写这个变量呢

[解决办法]
** 这样就行了,我已经做过测试!

sPath = "d:\doc\"
gnDbcnumber = ADIR(gadbf, sPath + '*.*')

FOR nCount = 1 TO gnDbcnumber
mc = sPath + gadbf(nCount,1)
WOLE.Documents.OPEN(mc)
ENDFOR

热点排行