我使用的是MS Project 2007,xp系统,下面的代码出错,抛出了异常.使用的vb6.0环境
    On Error Resume Next
    Set mspApp = CreateObject("MSProject.Application")    If Err.Number = 0 Then
        On Error GoTo 0
        On Error GoTo MSPError        mspApp.DisplayAlerts =False
        mspApp.FileOpen name:=TmpFilName, ReadOnly:=False, _
                        FormatID:="MSProject.MPT" 'TmpFilName是一个mpt文件                       
        mspApp.OrganizerMoveItem Type:=7, FileName:=MPTFileName, _
                                 ToFileName:="GLOBAL.MPT", name:=MPTFileName
'        上面的代码出现了问题,Err.number=1100,不知道为什么,MPTFileName是一个不带扩展名的名字.
'上面的方法不知道各个参数是干什么用的,希望有人能够解答,再顺便解决一下异常问题,希望能详细一点        
        mspApp.FileClose
        mspApp.FileOpen name:=strExpFileName, ReadOnly:=False, _
                        FormatID:="MSProject.CSV", map:=MPTFileName
        mspApp.Visible = True
        mspApp.DisplayAlerts = True    End If上面的程序的问题怎么解决.
错误号已经查过了,网上根本找不到.

解决方案 »

  1.   

    你要用这个对象,连里面的函数咋用也不知道,怎不出问题?
    不知道可以网上搜索一下使用手册啊。
      

  2.   

    我知道这个函数的用法,查了好久的,网上你找找试试.
    主要的问题是几个版本的运行代码,都有变化了.
    这都是第二个类似的问题,我在网上找不到答案才发帖的.
    我也是从你那个阶段过来的,只是喊,其实根本解决不了问题.
    只能说没人遇到这种情况了,你的回答没有任何帮助.