Re: [MS_AccessPros] How the get the path.

 

Dear Crystal,

Thanks for your reply. The problem is that, the desktop might be some other folder. What I want to get is the path which is not include the folder where the current project locates. Would it be possible? Thanks.

Best Regards,

Kevin

发自 WPS邮箱客戶端

在 "crystal 8 strive4peace2008@yahoo.com [MS_Access_Professionals]" <MS_Access_Professionals@yahoogroups.com>，2019年3月20日 14:24写道：

 

hi Kevin,

'~~~~~~~~~~~~~~~~~~~
Function GetDesktopPath() As String
'170423 crystal
   Dim oShell As Object
   Set oShell = CreateObject("WScript.Shell")
   GetDesktopPath = oShell.SpecialFolders("Desktop")
   Set oShell = Nothing
End Function
'~~~~~~~~~~~~~~~~~~~

have an awesome day,
crystal

free code you can use in your projects
https://msaccessgurus.com/code.htm

On 3/20/2019 12:02 AM, Kevin qingqinga@yahoo.com
[MS_Access_Professionals] wrote:
> Dear All,
>
> With CurrentProject.path, I got this: C:\Users\mrzha\Desktop\FileFolder,
> My question is how to get :"C:\Users\mrzha\Desktop" ? Thanks in advance.
>
> Best Regards,
> Kevin
>
>
>
> ------------------------------------
> Posted by: Kevin <qingqinga@yahoo.com>
> ------------------------------------
>
>
> ------------------------------------
>
> Yahoo Groups Links
>
>
>

__._,_.___

---

Posted by: qingqinga <qingqinga@yahoo.com>

---

Reply via web post

•

Reply to sender

•

Reply to group

•

Start a New Topic

•

Messages in this topic (4)

---

Have you tried the highest rated email app?

With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.

---

Visit Your Group

• Privacy • Unsubscribe • Terms of Use

SPONSORED LINKS

.

__,_._,___