主题：请教如何控制重复打开同一项目

大师：请问如何控制打开同一项目？

项目事件： BeforeOpenProject

 

If System.Diagnostics.Process.GetProcessesByName("项目名称").Length > 0 Then

    msgbox("禁止打开多个项目",vbSystemModal)

    e.Cancel = true

End If

请问项目名称在哪设置？

项目名称，就是你发布时设置的 进程名。

 

 

或者换一直方法。

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=52306&skin=0

 

如果用第二种方法，加入日历的代码后，就不启动了。

 

BeforeOpenProject

 

Dim sucess As Boolean = False
static proc = new System.Threading.Mutex(True, "dsdfhdfghf", sucess)
If not sucess Then
    MessageBox.Show("只能打开一次!")
    e.Cancel = True
End If