我从sharepoint站点打开了一个ms项目(.mpp)文件。 在保存之前,我想创建一个包含有关此.mpp文件的一些信息的xml文件。它不是一个简单的xml导出,因为包含了一种业务逻辑,所以我只能保存为xml。 无论如何,我想自己在sharpoint网站上写一个文件。
实际上宏是
Private Sub App_ProjectBeforeSave(ByVal pj As Project, ByVal SaveAsUi As Boolean, Cancel As Boolean)
Dim fileName As String
Dim fileNo As Integer
fileName = Application.ActiveProject.Path & "/" & "test.xml"
fileNo = FreeFile
Open fileName For Output As #fileNo
Print #fileNo, "some content"
Close #fileNo
End Sub
变量fileName相等" https://mysite.myserver.intra/Personal/myname/Documents/test.xml" (这很好)
错误讯息是: "运行时错误' 52' 文件名或号码错误
那该怎么办?