直接获取就行了。获取以后，跟你的升级路径来对比

 If 升级路径.Contains(SpecialFolder.MyDocuments) Then

 有点甜老师，这是我要删除的项目程序代码，如何获取我的文档路径并与原路径比较，看得不是很明白，能不能帮忙补充下代码，谢谢。

Dim upathPub As String = ProjectPath & ".." \'需要删除的项目Publish路径,".."表示上一级目录

    Dim s As String = upathPub & "\\update.bat"
    If FileSys.FileExists(s) Then
        FileSys.DeleteFile(s)
    End If
    FileSys.WriteAllText(s,"@echo off" & vbcrlf,True,Encoding.Default)
    FileSys.WriteAllText(s,"@title 自动升级..." & vbcrlf,True,Encoding.Default)
    FileSys.WriteAllText(s,"taskkill /f /im foxtable.exe" & vbcrlf,True,Encoding.Default)
    FileSys.WriteAllText(s,"@cls" & vbcrlf,True,Encoding.Default) \'清除屏幕.清除删除 foxtable.exe 进程后屏幕反馈的信息.
    FileSys.WriteAllText(s,"echo Wscript.Sleep Wscript.Arguments(0) * 1000>Delay.vbs" & vbcrlf,True,Encoding.Default)
    FileSys.WriteAllText(s,"Delay.vbs 3" & vbcrlf,True,Encoding.Default)
    FileSys.WriteAllText(s,"del Delay.vbs" & vbcrlf,True,Encoding.Default)
    FileSys.WriteAllText(s,"@cls" & vbcrlf,True,Encoding.Default) \'清除屏幕.清除升级文件后屏幕反馈的信息.
    FileSys.WriteAllText(s,"rd /s /q " & upathPub & vbcrlf,True,Encoding.Default) \'删除临时文件夹

    Dim Proc As New Process \'定义一个新的Process
    Proc.File = s \'指定要打开的文件
    Proc.Verb = "Open" \'指定动作
    Proc.Start()
    proc.WaitForExit

If upathPub.Contains(SpecialFolder.MyDocuments) Then

End If

甜大师，不好意思，旧问题刚解决，新的问题又冒出，上述程序代码假设检测出项目路径是在我的文档，现在想把upathPub赋值到我的文档里该项目中去，这代码如何写？谢谢。

我试了以下代码情况：

upathPub = SpecialFolder.MyDocuments      这个代码只能定义到我的文档，不能是我的文档里的项目文件夹。

upathPub = SpecialFolder.MyDocuments & ProjectPath & ".."     这个代码运行后报错

End If

 不理解你想做什么

Dim upathPub As String = ProjectPath & ".."

比如上述代码是在升级新狐表项目前，先删除旧的发布项目部份的代码，结果发现狐表项目若在C、D盘时运行正常（可以删除项目），而若将项目放在电脑桌面或我的文档就不能删除旧的发布项目，自然会影响后的正常升级。

因此我想在程序中先增加判定项目是否在特殊目录中，若是在特殊目录里，就把对应的路径设为特殊目录（如我的文档等）

  你这个应该是空格的问题吧？

FileSys.WriteAllText(s,"rd /s /q " & upathPub & vbcrlf,True,Encoding.Default) \'删除临时文件夹

 改成

FileSys.WriteAllText(s,"rd /s /q """ & upathPub & """" & vbcrlf,True,Encoding.Default) \'删除临时文件夹

用甜大师改过的代码运行确实达到我想要的效果，只是不明白正确的代码为什么要加上两个双引用号为什么？还请大师指点下谢谢。