主题：请教：上传附件问题

Dim fl As String = "C:\foxtable\商业版\CaseStudy\自定义用户管理.foxdb"

Syscmd.Project.Open(fl, ProjectFile, "其它参数")

 

----------------------

 

AfterOpenPojrct事件

 

If OpenFileargs.Count = 2 Then '如果传递了两个参数

    msgbox(openFileargs(0))

    msgbox(openFileargs(1))

End If

好的老师，我研究一下。

大红袍老师，昨晚向您请教了三个问题，一个是附件上传的问题，一个是项目间调用的问题，都已解决，谢谢。但复制表结构的问题，仍不能实现，按您说的思路，我已下载安装了补丁程序，但运行后操作仍是点击后不动的状态，请再给指导下。

已解决，通过导入和导出的方法，再次谢谢大红袍老师。