创建一个字段catfile，记录ACD文件名
cfile=alltrim(catfile)
lpszfile="路径\文件名"
DECLARE INTEGER ShellExecute IN Shell32.DLL INTEGER HWND,STRING,STRING lpszFile,STRING,STRING,INTEGER

就能打开CAD文件

能否讲得明白点，本人才刚学VFP太多不懂，谢谢楼上的老师!!!

我想您大概是想通过VFP的数据表，对CAD图纸进行登记，查阅用的吧。
这在利用数据表对文件进行管理方面都经常用到。

1. 创建好CAD 图纸文件，并保存到指定的文件夹
2. 建立一个数据表，最简单的包括两个字段：摘要（这为以后查找文件提供方便）， 文件名（记录CAD文件名）
   例如： aaa.摘要,aaa.文件名
          摘要字段的第一个记录内容：汽车化油器
                    第二个记录内容：汽车离合器
          文件名字段的第一个记录内容：huayouqi.dwg (汽车化油器的图纸文件名及扩展名)
          文件名字段的第二个记录内容：liheqi.dwg(汽车离合器的图纸文件名及扩展)
3.创建表单，包括GRID控件
  .grid1.text1.click 事件：
   
   cfile=alltrim(文件名)
   lpszfile="路径\cfile"
   DECLARE INTEGER ShellExecute IN Shell32.DLL INTEGER HWND,STRING,STRING    lpszFile,STRING,STRING,INTEGER

就能打开指针对应的 CAD 文件

 

3楼正解
还有一个类似帖子供参考：
[url=http://bbs.pfan.cn/post-312624.html]http://bbs.pfan.cn/post-312624.html[/url]

[em1]感谢！学习啊！