VSProject.GetUniqueFilename 方法
在專案內產生唯一的檔名。用來命名新專案項目。
命名空間: VSLangProj
組件: VSLangProj (在 vslangproj.dll 中)
語法
'宣告
'用途
參數
- pDispatch
產生的檔名將以這個值當做副檔名。
- bstrRoot
Project 物件或資料夾 ProjectItem 物件。產生的檔名是這個內容內的唯一檔名。
- bstrDesiredExt
產生的檔名將以這個字串開頭。
傳回值
檔名,是專案或專案資料夾中唯一的檔名。如果第一個參數是 Project 執行個體,則產生的檔名在根專案資料夾內的就不會與其他檔名重複。這個檔案名稱的格式為 Root?.Extension,其中 ? 為一或多個數字 (1、2、3 依此類推)。
備註
這個方法的典型用法是產生新專案項目的名稱。
如果呼叫這個方法時,以 KeyFile 做為根,並用 snk 做為副檔名,則傳回的字串為 KeyFile.snk,前提是 KeyFile.snk 不存在。如果檔案 KeyFile.snk 已存在,則傳回的字串為 KeyFile1.snk。請注意,如果對這個方法進行多次呼叫,則不會從傳回的檔名來建立檔案,所有的呼叫都將傳回相同值。結果僅取決於呼叫方法時存在的檔案。
範例
' This macro displays a file name that is unique in the
' project folder, in the form root?.ext.
' Macro editor
Imports VSLangProj
Imports VSLangProj80
Sub GetUniqueName()
Dim proj As Project
proj = DTE.Solution.Projects.Item(1)
Dim vsproj As VSLangProj.VSProject = _
CType(proj.Object, VSLangProj.VSProject)
MsgBox(vsproj.GetUniqueFilename(proj, "Root", "ext"))
End Sub