Modules & VBA :: DB Bloat And Persistent Connection To Linked DB

Mar 16, 2015

I read a lot about Access database bloat when using temporary tables that reside in the front end, which was where I created and used temporary tables before reading about bloat.I therefore wrote a routine on startup that creates a temporary database and then copies the structure of the temporary tables into that temporary database using the DoCmd.TransferDatabase command. It kills the DB on exiting the application.I also read about keeping a persistent connection (handle) open to a linked DB as long as the main application is active, and this for efficiency reasons. I got this to work as well.

Being a self-taught Access programmer I have two questions:

1.Is the use of docmd.Transferdatabase a good way to work and does it reduce bloat by transferring the structure of the temp files to the temporary database?
2.If I want to work with the tables in my temporary database I use the following code for example:
Dim dbTemp As Database temporary database
Set dbTemp = DBEngine.Workspaces(0).OpenDatabase(strDBTemp)
Set rstRpt = dbTemp.OpenRecordset("tblRptPU001", dbOpenDynaset) ..
My question is this: if, at the end of the procedure, I write
dbTemp.close
set dbTemp = Nothing

does this leave the persistent connection open? The reason for the question is that I intend to split the database and soon go multi user, which is when efficiency is even more important than when working on a temporary database.

View Replies


ADVERTISEMENT

Split Database Persistent Connection

Jul 6, 2015

Using Access 2013.

We have split a database and have about 6 users connected to a gigabit switch. There is a noticeable delay of about 5 to 15 seconds when we search by an account name. We are working with a split form, where it has the database records listed at the bottom half of the screen.

Is there a way to improve the performance? I tried a persistent connection, but it didn't seem to work and would occasionally get an error message.

View 9 Replies View Related

Modules & VBA :: Refresh Linked Tables When Connection Lost Without Closing Access Database

Sep 4, 2014

I have MDB database linked to SQL SERVER through VPN connection.I created links to the sql server Links are dsnless..Everything works fine but when I lost VPN connection or sql connection has been broken I can't refresh links to the tables.I receive message 3146 sql connection failed..I must close database and start again...

I tried different methods like ado,dao, and vba docmd.transferdatabase,aclink... but no success, table cant be relinked.

Only way I can relink is to change ip adress in conn.string

E.g. 192.124.0.2 (1st ip- router server ip) and after connection failed i can use 192.124.0.32 (2nd ip - server local ip) and that's it if i lost connection for the 3rd time... i must restart application.

It seems that access database keep the previous connection..how to reset or drop database connection to the sql server and refresh links to the tables with vba code without closing access database...

View 12 Replies View Related

Linked Table Connection String

Jan 27, 2008

I notice when you hover the mouse over a linked table in the Database window, that a tool tip appears displaying the connection string for that table. Where is this connection string stored and how may it be recovered by other means ( VBA )?

TIA

View 2 Replies View Related

Close Connection To A Linked .txt Table

Mar 17, 2008

Dear friends,

I have a inserted a linked table to my Access2007 DB.
I want to manage disconnecting from this table, with the use of a button on a form, Then, with the use of another button, connect again. :eek:
Is it possible? How???:confused:

Please Respond ASAP (Urgent Need)

Best to U All

Mike:

View 1 Replies View Related

Odbc Connection On Linked Table Failed

Feb 9, 2008

I Need help,

I have an access 2002 front end and I am linked to a sql server express 2005 backend and in one of my tables I am getting this error when I add a record to a work order table. The error is ODBC connection on INSERT failed on linked table.

A few strange rhings happen. It only involves customers with over (approx.) 140 work orders (there is a one to many with customer to work order). All other customers seem to be immune to this.

Also, if you go to the tables directly from a access database window, you can still add/edit or delete records, but in the form view, it gives you an error.

I have tried several things including changing code (the orgional code was set dbs= currentDB and dbs.execute("INSERT.......)

I have found similiar posting but no real direct causes. does anyone have any ideas on how to resolve this?

Thanks

Frank

View 1 Replies View Related

Change Linked Table Connection String With Code

Aug 9, 2006

I would like to use code to change the connection string for linked tables in my front end database. I have tried using the connection property of the TableDefs collection, this seems to work while I step through the code but does not change the existing connection property. Any suggestions?

View 2 Replies View Related

General :: ODBC Linked Tables Losses Connection

Jun 13, 2012

Our master database has linked tables with ODBC to our SQL database and linked tables to another access database. On the computer i'm running this from a System DSN data source has been created to connect to our SQL database.

The problem I'm having is when I run Macros to kick off Queries, there seems to be some kind of timeout issue and its not consistant. Sometimes in Access after a hour or two, the ODBC links somehow just fails. I have to go up to the menu and go to 'Get External Data' and then 'Link Tables' and relink the ODBC DSN connection. I make sure to hit save password and the end but that doesn't seem to do much. This also happens sometimes when I close and reopen the database.

But it seems erratic, sometimes it can stay up for hours but sometimes just a few mins. Sometimes I can close the Access database and reopen without losing connection. Being so erratic, this makes it very hard for me to run batch files nightly to kick off Macros. Is there some kind of inactivty timer for DSNs? Or maybe with the SQL database itself? Or is the way i'm restablishing the ODBC connection wrong ?

View 3 Replies View Related

DB Bloat

Sep 23, 2005

I just added a small number of code lines to the OnFormat in Detail section of two Reports and seem to have increased the db size by 300-500 kb. It wasn't anything big or tricky just making bold & coloured fonts in three or four fields in each report. Included is one extra report & the extra query on which the report is based. I don't usually watch the size of my db's but as this increase caught my eye I thought I'd ask if anyone has any comments on the subject. Besides inserting pictures what things will bloat a db?

View 3 Replies View Related

Bloat Begone!

Oct 20, 2005

DESPERATELY SEEKING A BLOAT MASTER!

I'm working on an Access 2003 database with 2002-2003 Data Format. To avoid bloat, I decided to update data in a table using recordsets. Everyone thinks that queries are the devil of Bloat. Ha! Well I have to update 32,000 records. Everytime it updates a record, it adds 4000 bytes to the database size. I assume this is a Page Buffer. The record itself is probably at 500 bytes.

I don't mean to be picky, but for 32,000 records, that adds 128M Bytes to the database. If the user does this process 5 times that more, then it adds 640MB to the database.

IS THERE ANY WAY AROUND THIS?

View 3 Replies View Related

How To Zap Persistent VBA Files?

Apr 15, 2006

My current work suffered some kind of internal error and two imported objects, a form file and a module, became logical orphans. No code is visible, and I get a message whenever transiting to VBA: "Error accessing file. Network connection may have been lost." Needless to say (but I will anyway) I am not on a network.

I was able to purge the objects from the 'database' dialog but NOT from the project explorer in Basic. Will anything short of dynamite do the trick?

Alexander
Access 2000

This works: open a blank database then get external data from the broken .MDB. The orphans get left behind. There's got to be a better way?!

View 1 Replies View Related

Tables :: Automatic Refresh Of Linked Tables - ODBC Connection

Jul 22, 2015

I have linked tables from SQL Server using ODBC connection that their location never changes. I have used certain fields of those tables to create queries and make table queries to derive to the information I needed.

On these tables on SQL Server, there is new data added daily. Every day, midnight, there's new data records added of whatever transactions took place in that working day. how often do I need to refresh linked tables in this case to get the latest data added. I mean, once I am linked, the make table query using those defined fields, would it get the latest data added by default when the query is executed, or I must refresh linked tables using Linked Table Manager and then run make table query.

Also, if I want the access to automatically refresh linked tables, can I use the following code? I have added this code, and executing it through a button, but I don't see anything happen, the database becomes inactive for couple seconds (I guess while it is updating) but I don't know is it updating the tables for sure or not, though I am not receiving any error when executing the code through the button.

Function RefreshLinkedTables()
Dim tdf As TableDef
For Each tdf In CurrentDb.TableDefs
If Len(tdf.Connect) > 0 Then
tdf.RefreshLink
End If
Next td
End Function

View 2 Replies View Related

General :: Persistent Data In Unbound Textboxes

Mar 24, 2014

There are hyperlinks throughout the database as well as a few lines of code that reference network locations that could change 1-2 years down the line. What I need to do is build a "housekeeping" form that is password protected where users can edit those hyperlinks via text-boxes. My problem is I'm not sure where to store the the data from the text-boxes to make it persistent. Making a table for the hyperlinks seems to be the wrong approach but I could be wrong.

Example:
Form1-Button1="String1"
String1="HousekeepingForm-TextBox1"
HousekeepingForm-TextBox1="X:Stuff"

View 8 Replies View Related

How To Establish The Connection Between Ms-Access2000 & Oracle Using DAO Connection?

Sep 26, 2005

Dear Guys,
How to Establish the connection between Ms-Access2000 & Oracle using DAO Connection through Code?.

I created one table in Oracle and I created User-DSN in ODBC.
I linked that oracle table into Ms-Access MDB using Link table option in ms-Access.

Now, Whenever I open that mdb, we need to establish the ODBC connectivity automatically through code (I mean, we need to refresh automatically).

I need to hardcode all the information in the Ms-Access code.

My User DSN Name: abcd
Oracle Database Name: abcd
Schema Name(User Name): abcd
password: abcd

View 1 Replies View Related

Modules & VBA :: Check If There Is Connection To Server

Oct 8, 2013

In the code below I want to wait for ten seconds if there is connection to the server, if not to exit the sub with message "No connection to server". How to check it

Dim req As New XMLHTTP60
Dim resp As New DOMDocument60
Dim xmlNodeList As IXMLDOMNodeList
Dim myNode As IXMLDOMNode
Dim xmlNode As IXMLDOMNode
Dim presription As IXMLDOMNode

req.Open "GET", "https://api.zdravstvo.gov.mk/rest/prescriptions/" & Me.br_recept, False
req.send
resp.LoadXML req.responseText

View 2 Replies View Related

Modules & VBA :: Remote Connection String?

Aug 30, 2013

I am trying to put together a vba adodb connection string to a remote server. It is the first time I am using adodb in this context. I can get msysobj.connect but how do I format that information into a connection object connection string?

View 3 Replies View Related

Modules & VBA :: How To Check If Connection To SQL Server Established

Apr 8, 2014

How I can check if connection to SQL server is established with VBA before the SQL is executed. btw I use VPN connection to connect to sql server, and some times VPN connection is going down in middle of work and it is quite unconvinced.

View 2 Replies View Related

Modules & VBA :: Excel Data Connection Not Updating?

Mar 17, 2015

I have an excel spreadsheet that uses a data connection to a website to download text. I have the data connection properties to refresh upon opening the file. If i double click the file from windows, it updates. Although using the code below doesn't work. When i've added the code ObjXL.Save before closing it, it usually saves a file with no data and no cells. I'm eventually going to switch visible to false.

Private Sub btnDownLoadSettle_Click()
Dim XLapp As New Excel.Application
Dim ObjXL As Excel.Workbook
Set ObjXL = XLapp.Workbooks.Open("C:...Settlements.xlsx")
ObjXL.Application.Visible = True
ObjXL.Windows(1).Visible = True
Sleep (5000)
ObjXL.Close
XLapp.Quit
End Sub

View 2 Replies View Related

Modules & VBA :: How To Execute A DoCmd From Within A Connection State

Feb 24, 2014

I'm trying to do something with Excel and Access. From Excel 2007, I need to open an Access database exclusive, import from Access to Excel a table, do some work within Excel, and then start a macro within the Access database. Briefly, here’s what I have

1) To open the database exclusively:

Set connDB = New ADODB.Connection
With connDB
.Provider = "Microsoft.ACE.OLEDB.12.0"
.Mode = adModeShareExclusive
.Open strdbpath 'path to database
End With

2) To import from Access:

strSQL = "SELECT * FROM [" & tn & "];" 'tn is Access table
If connDB.State = adStateOpen Then
Set objRS = New ADODB.Recordset
objRS.Open strSQL, connDB, adOpenForwardOnly
On Error Resume Next
objRS.MoveFirst
If Err.Number = 0 Then
On Error GoTo 0
fieldCnt = objRS.Fields.Count
For fieldNum = 0 To fieldCnt - 1
ws.Cells(1, fieldNum + 1).Value = objRS.Fie(fieldNum).Name
Next fieldNum
ws.Cells(2, 1).CopyFromRecordset objRS
End If
End If

3) To start a macro:

DoCmd.RunMacro "Daily Import"

Everything seems to work until the ‘DoCmd’ statement where I get a “You can’t carry out this action at the present time” error message.

View 8 Replies View Related

Modules & VBA :: Connection Cannot Be Used - Error On Production But Not Development

Jul 24, 2013

old Access database that's been upgraded through to Access 2000 or 2003 (probably 2000), but not beyond. Was rebuilt in Access 2003 format around 2006/2007 (by someone else who no longer works here). Being used now in Access 2007 and 2010. Uses DSN to connect to SQL Server backend. Last week it was SQL Server 2005, moved the back end on Saturday to SQL Server 2012. Changed the DSN when moving to the new server. But I don't think this has to do with the DSN (it's getting data just fine).

There's a data entry form. User enters a Generator ID, event triggers it to look for the details for the generator and load them into a generator subform. After it loads the information into the subform, and before the user does anything else, it throws "This connection cannot be used to perform this operation. It is either closed or invalid in this context."It triggers post update of the Generator ID:

Code:

Private Sub txtGeneratorID_AfterUpdate()
On Error GoTo Handle_err
Me.txtGeneratorID = UCase(Me.txtGeneratorID)
Call FillHandlerSubform(Me.subGeneratorInfo, Me.txtGeneratorID.Value)
If GetGenStat(Me.txtGeneratorID.Value) = "N" Or GetGenStat(Me.txtGeneratorID.Value) = "OB" Then
MsgBox "Warning Generator Status! " & UCase(Me.txtGeneratorID.Value) & vbCrLf & _
"This Generator has a status of N or OB!", vbCritical, "Bad Generator Status!"
Cancel = True
End If

[code]....

It doesn't throw this error in the development copy of the database, dev copy works just fine. It only throws it from the production version. They are located on the same network, just in different folders. They are pointing to the same database on the same SQL Server using a DSN file located inside the folder where the .mdb file is located (this is a change in the front end, prior to this it was using a DSN on each individual machine, but I changed it to stop that).

View 6 Replies View Related

Modules & VBA :: Verify A Network Connection / Bad File Name Or Number

Mar 22, 2014

I have a picture stored on a network file share that populates each time a particular form is opened. Every so often we lose our connection (which is a different issue altogether). Right now the error I get after much grinding away, is "Bad file name or number"

Is there a quicker way to check for the connection before it spends 45 seconds trying to find the whole path?

Code:
Dim vFolderPath As String, dirFile As String, strFile As String
vFolderPath = Nz(DLookup("FolderName", "tblCodes-FolderControl", "FolderKey = '" & "Profile" & "'"))
dirFile = vFolderPath & Dir(vFolderPath & ctrl_people_id & " *", vbDirectory)
strFile = dirFile & "profile_pic.*"
'Debug.Print dirFile
On Error Resume Next
If Dir(strFile) <> vbNullString Then
Me.[ctrl_ImageFrame].Picture = dirFile & "" & Dir(strFile)
Else
Me!ctrl_ImageFrame.Picture = "X:~stuffprofile_icon.png"
End If

View 4 Replies View Related

Modules & VBA :: Automatically Linking Database With ODBC Connection

Jun 26, 2015

I am looking to automate the process of linking my Access DB with an ODBC connection to an SQL DB with VBA (unless there's an easier way to do it?) - some sample code - if this is possible at all?

View 2 Replies View Related

DNS Connection --&gt; DNSless Connection

Jan 9, 2005

Right Ok i hope i can get some help cause im absolutely stumped..
i cant get my login page to work since moving it from my PWS(iis on xp) DSN connection
to a 24/7 server on the net with DSNless connection
here is the code for the include file "conntopwd.asp"
http://www.pritchardwebdesign.pwp.blueyonder.co.uk/conntopwd.txt
the username and path has been changed slightly for security purposes,
and the code for the login page which attempts to access the database is here
http://www.pritchardwebdesign.pwp.blueyonder.co.uk/login.txt
the connection has been tested by one of the tech support guys at brinkster and he told me it was ok,
the problem was the way that the data is called from the data base is wrong ..
The tech support guy said that it was this line that was causing the problem..
MM_rsUser.ActiveConnection = MM_conntopwd_STRING
Any help would be much appreciated as im stuck for now..

View 2 Replies View Related

Modules & VBA :: Print Linked Doc From Macro

Jun 17, 2015

I'm working in 2003 (still) and have a macro to print the selected form the user has on their screen. I need this same macro to also print a PDF in a particular network folder or just exit if the PDF doesn't exist. I've tried RunSQL with "PrintDoc [Link2PDF]" as the argument. I've tried RunApp with "Acro Rd32.exe /t [Link2PDF]" as the argument but neither one works. The RunApp line will open the Adobe reader but nothing more.

View 4 Replies View Related

Modules & VBA :: Info From Linked Text File

Aug 11, 2014

I have a linked *.txt file and a qwery that returns the top 1 record from it. (The ideea is to check a value from one column of the file).Both the linked file/table and the query run corectly,I have a vba code on the on open of a form that is checking the query above mentioned (the form is on the Startup option of the database) and when I need to use the Dcount of the Query "

Code:

DCnt = DCount("Den_Fis", "Data_R_Mod_U$G9707014")

I get the "Runtime error 3625: the text file specification..." doesn't exist etc.I pres debug and test the query, I get the "Unknown Jet Error".I press Stop in the VBA and open the Qry - it shows what is was ment to show.I know the workaround is to make a maketable with the needed info and the Dcount on the local table, but it would add one query and one table to the database.

View 4 Replies View Related

Modules & VBA :: Storing Attachments On Linked SQL Server

Jun 27, 2013

I'm trying to store files on a linked SQL Server table, much the way I would using the Attachment data type in Access. (I couldn't use the Attachment data type, though, due to size restrictions - we're storing about a gig a week.)

Almost everyone says to store the attachments on a file system and save the location - I can't do that because of varying permissions. The files HAVE to be stored in the SQL Server table for security reasons.

So how do I do it? I've tried converting the files to binary and updating the recordset that way, but it always comes back as null. I'm not sure what I'm doing wrong.

Code:
Public Function Test(strFile As String) As Boolean
Dim rsAtts As dao.Recordset
Dim ifilenum As Double
Dim btAR() As Byte
Set db = CurrentDb

[Code] ....

View 9 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved