If you are doing your math on the report I would move these calculations to your queries to see if that would improve the reports output. Another item that can slow down a report is with code behind the report, if you can move that to your queries you will increase throughput.
Personally I dont think you can make a broad assuption that you need to move from Access because you have more than 15 users. Yes, lets face it, anytime you upgrade your network, for the most part anyway, you are going to improve the throughput of your database. 10mbps to 100mbps is a factor...
When the remote makes the call (I am assuming that PC initializing the call is set up as the Modem Remote), and provided the other is set up as the Modem Host, what happens when the call comes in to the Host modem, does the system try to answer? Do you hear the connection noise at all?
If I understand (and I am really confused), a real simple solution would be to add a subform to your searching form, the subform would call up the same table as the main form but only allow for adding new records. In other words you would not be setting them up as Parent and Child, you would be...
Perhap you can also try the Shellwait routine with xcopy, it suspends Access until the process completes itself and then passes control back to Access. You can copy the code from Dev Ashish's website and give it a try it might solve your problem.
http://www.mvps.org/access/api/api0004.htm...
Written by Terrry Kraft and found on Dev Ashish's web site I store this routine in all my projects when I am going to shell to programs while in Access, this will cause Access to suspend itself until you are done with any application or DOS batchfile. For exeample, I had to write a routine that...
Another approach would be to use Chr$(34) The ascii equivilent to the quotation mark
DLookUp("[Description]","tblSubAssyListing","[JobNo] = " & [Forms]![frmReportsListing]![Combo8] & " AND SubAssy = " & Chr$(34)& [Forms]![frmReportsListing]![Combo22] &...
I failed to notice your openreport statement and just duplicated it for my example, the following would be the correct syntax for the example.
Private Sub command4_click()
Dim Crit, Docname as String
Crit = "JobNo = " & Me.Combo8.Value
Crit = Crit & " AND SubAssy = '" &...
Try this one, perhaps place it in a global module.
Function Table_isThere(Tbl2Find as String) As Integer
'see if 'Tbl2Find' exists
'returns True if there, False if not
Dim MyDB As Database, I As Integer
Set MyDB = CurrentDB
For I = 0 To MyDB.TableDefs.Count - 1
If...
Wouldn't it be easier just to include your recordset in the Row Source Property of the combo box as the result of a query or temporary table resulting from your recordset?
Bruce Gregory
Wouldn't this get you the same result?
Private Sub command4_click()
Dim Crit as String
Crit = "JobNo = " & Me.Combo8.Value
Crit = Crit & " AND SubAssy = '" & Me.Combo22.Value & "' "
OpenReport "rptManufactured Parts List", ,Crit
end sub
Bruce Gregory
One line that has to go is
Set rscheck = rs("InAssy_Yes")
You have dimensioned rscheck as Boolean and now you are trying to 'Set' it to a recordset? This confuses me.
Bruce Gregory
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.