A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Access » New Users
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

Split database



 
 
Thread Tools Display Modes
  #1  
Old November 15th, 2004, 11:18 AM
Peter Smith
external usenet poster
 
Posts: n/a
Default Split database

Hi all,

I split my database a while back and have it up at 2 sites with a small
local network at each site. Now I want to add a new table and expand some
others. But - I do my development on A97 at home and the work computers
are A2000.

Since each front end has to link to data at a different relative place on
the network, how best to go about this update since I can't use the link
updater in A2000??

Thanks

- Peter


  #2  
Old November 15th, 2004, 12:39 PM
Nikos Yannacopoulos
external usenet poster
 
Posts: n/a
Default

Peter,

Not sure this will work, but there's a good chance it will, so you may want
to give it a shot. The idea is to change the links through code, which I do
just for convenience when transfering the database between home and work,
but it might solve your other problem also (just copying from an older post
of mine):

I have a similar situation, and have put together the following piece of
code to change my links in seconds, with one move. The trick is that my
Windows user name is differect in each location, so checking it the code can
determine where it's running. Just make sure you put in the correct (office)
username and the correct path for both sites.

Function change_links()
Dim db As Database
Dim tbl As TableDef
Dim cp As String 'current path
Dim np As String 'new path
Dim lnk As String 'link string

Set db = CurrentDb()
usr = Environ("UserName")
If usr = "OfficeUserName" Then
cp = "C:\HomePath\"
np = "\\ServerName\OfficePath\"
Else
cp = "\\ServerName\OfficePath\"
np = "C:\HomePath\"
End If

For i = 0 To db.TableDefs.Count - 1
tbln = db.TableDefs(i).Name
Set tbl = db.TableDefs(tbln)
lnk = tbl.Connect
If Left(lnk, 9) = ";DATABASE" Then
lnk = Replace(lnk, cp, np)
tbl.Connect = ""
tbl.Connect = lnk
tbl.RefreshLink
End If
Next
End Function

HTH,
Nikos

"Peter Smith" wrote in message
...
Hi all,

I split my database a while back and have it up at 2 sites with a small
local network at each site. Now I want to add a new table and expand some
others. But - I do my development on A97 at home and the work computers
are A2000.

Since each front end has to link to data at a different relative place on
the network, how best to go about this update since I can't use the link
updater in A2000??

Thanks

- Peter




 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Joining a Split Database Bill M General Discussion 1 November 9th, 2004 10:29 PM
Split database slow and 2 users cannot use form at same time Chris General Discussion 6 July 10th, 2004 12:39 PM


All times are GMT +1. The time now is 07:38 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 OfficeFrustration.
The comments are property of their posters.