Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
Discussion GroupsFormsForms ProgrammingQueriesModules / DAO / VBAReports / PrintingMacrosDatabase DesignSecurityConversionImporting / LinkingSQL Server / ADPMultiuser / NetworkingReplicationSetup / ConfigurationDeveloper ToolkitsActiveX ControlsNew UsersGeneral 1General 2
Access DirectoryToolsTutorialsUser Groups
Related Topics
SQL ServerOther DB ProductsMS OfficeMore Topics ...

MS Access Forum / General 2 / April 2008

Tip: Looking for answers? Try searching our database.

Absolute location of an Access Database.

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Chrisso - 14 Apr 2008 12:25 GMT
Hello

I need to get the absolute location of an Access Database.

At the moment I can call CurrentDB.Name but this gives me the mapped
drive name:

  W:\Public\CODAC

Where I really need the actual server address:

   \\Brd-dc-01\Dept\Public\CODAC

Can I get this from Access?

Chrisso
jacksonmacd - 14 Apr 2008 13:17 GMT
Found via Google:
http://www.xtremevbtalk.com/showthread.php?t=146146

>Hello
>
[quoted text clipped - 12 lines]
>
>Chrisso

--
jackmacMACdonald@telusTELUS.net
remove uppercase letters for true email
http://www.geocities.com/jacksonmacd/ for info on MS Access security
Rob Parker - 14 Apr 2008 14:29 GMT
The code at http://www.mvps.org/access/api/api0003.htm will let you convert
CurrentDB.Name to a UNC string.

Using that code, here's a function which I use to convert a mapped drice
path to a UNC path.

'---------------------------------------------------------------------------------------
' Procedure : UNCFolder
' Last Edit : 03 Apr 2006
' Author    : Rob Parker
' Purpose   : Convert a network path to a UNC path
'---------------------------------------------------------------------------------------
'
Public Function UNCFolder(strFolder As String) As String
 Dim strDrive As String

 strDrive = Left(strFolder, 3)
 If fDriveType(strDrive) = "Network drive" Then
   UNCFolder = fGetUNCPath(Left$(strDrive, Len(strDrive) - 1))
   'fGetUNCPath returns a null-terminated string - need to parse to null
before concatenating rest of folder string
   UNCFolder = Mid$(UNCFolder, 1, InStr(UNCFolder, vbNullChar) - 1)
   UNCFolder = UNCFolder & Mid$(strFolder, 3)
 Else
   UNCFolder = strFolder
 End If
End Function

HTH,

Rob

> Hello
>
[quoted text clipped - 12 lines]
>
> Chrisso
a a r o n . k e m p f @ g m a i l . c o m - 14 Apr 2008 14:44 GMT
wow.. good stuff.

Of course-- you don't really need to use that linked tables BS--
Linked tables are a complete waste of time.

you really shoud be using SQL Server-- then you wouldn't worry about
linked tables.

-Aaron

> Hello
>
[quoted text clipped - 12 lines]
>
> Chrisso
Rob Parker - 15 Apr 2008 13:49 GMT
Aaron, please go away and stop wasting time and space here with your SQL/ADP
campaign, which for most of the people seeking advice here is absolutely
inappropriate.

Rob

wow.. good stuff.

Of course-- you don't really need to use that linked tables BS--
Linked tables are a complete waste of time.

you really shoud be using SQL Server-- then you wouldn't worry about
linked tables.

-Aaron

On Apr 14, 4:25 am, Chrisso <chris75sut...@gmail.com> wrote:
> Hello
>
[quoted text clipped - 12 lines]
>
> Chrisso
a a r o n . k e m p f @ g m a i l . c o m - 15 Apr 2008 19:48 GMT
it's a free country ain't it?

This is _MY_ newsgroup-- not yours.

It is no longer reccomended that you kids use Linked Table BS.  It has
not been reccomended like this for a decade.

You can go and take your arguments elsewhere.

This newsgroup is the 'Default Newsgroup for MS Access' and because
'ADP is the most prevalent database format ever since 2000' then _YOU_
can go elsewhere.

-Aaron

On Apr 15, 5:49 am, "Rob Parker"
<NOSPAMrobppar...@optusnet.com.au.REMOVETHIS> wrote:
> Aaron, please go away and stop wasting time and space here with your SQL/ADP
> campaign, which for most of the people seeking advice here is absolutely
[quoted text clipped - 32 lines]
>
> - Show quoted text -
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.