这个能用宏替换吗
用以下语句可以读取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