Songhay System Funky KB: Access 2.x http://www.songhaysystem.com/kb/subject/acc2 The Funky Knowledge Base at songhaysystem.com. The subject of this channel is Access 2.x. Mon, 19 Aug 2002 20:10:27 GMT Code: Changing the Connect Properties of All Tables And Queries http://www.songhaysystem.com/kb/number/893193804/subject/acc2 Article Excerpt: Sub basChangeConnect (argSession As String) ' 'NOTE: This procedure contains line break characters 'for readability. These characters are not supported 'in Access Basic. ' Set m_dbDAO = DBEngine(0)(0) Select Case argSession Case "Product… Mon, 19 Aug 2002 20:10:27 GMT Bryan Wilhite Code: dbAvailable() -- Checking for Exclusivity http://www.songhaysystem.com/kb/number/188/subject/acc2 Article Excerpt: Function dbAvailable (strDatabase As String) As Integer ' 'This function checks to see if a database can 'be opened exclusively. ' 'NOTE: This procedure contains line break characters 'for readability. These characters are not supported 'in Access Basic. … Tue, 15 Aug 2000 03:52:00 GMT Bryan Wilhite Code: txtCopies_Exit() -- Data Validation on Exit http://www.songhaysystem.com/kb/number/189/subject/acc2 Article Excerpt: Sub txtCopies_Exit (Cancel As Integer) ' 'NOTE: This procedure contains line break characters 'for readability. These characters are not supported 'in Access Basic. ' ' 'This sub checks txtCopies for smart-ass values. 'We don't want txtCopies … Thu, 09 Sep 1999 22:36:59 GMT Bryan Wilhite Code: RepairCompact() http://www.songhaysystem.com/kb/number/187/subject/acc2 Article Excerpt: Function RepairCompact (strDatabase As String) As Integer ' 'NOTE: This procedure contains line break characters 'for readability. These characters are not supported 'in Access Basic. ' ' 'This function repairs databases. It is recommended to comp… Thu, 09 Sep 1999 22:29:49 GMT Bryan Wilhite Code: Passing Data between SQL And Access Tables http://www.songhaysystem.com/kb/number/154/subject/acc2 Article Excerpt: I have had problems using stored delete/update queries that involve changing data in SQL tables. The query would run without returning any error. It would also indicate SQL table rows have been deleted or changed. But when the SQL table is re-opened the r… Thu, 09 Sep 1999 22:25:59 GMT Bryan Wilhite Code: Error Handling Base Structure on the Procedure Level. http://www.songhaysystem.com/kb/number/193/subject/acc2 Article Excerpt: Function MyFunction () As Integer ' 'NOTE: This procedure contains line break characters 'for readability. These characters are not supported 'in Access Basic. ' ' 'Write any local declarations here. ' On Error GoTo MyFunction_Err ' … Thu, 09 Sep 1999 22:20:21 GMT Bryan Wilhite Code: a Delay with DoEvents http://www.songhaysystem.com/kb/number/605362455/subject/acc2 Article Excerpt: 'Note that Access Basic does not have a Date data type. 'Dates are stored as double-precision, floating point 'numbers. For more information please see the following 'Microsoft Knowledge Base Articles: 'Q130514: "ACC: Storing, Calculating, and Comparing '… Mon, 30 Nov 1998 16:59:56 GMT Bryan Wilhite PROBLEM: "Can't Execute a Non-Action Query" Error with Pass-Through Queries http://www.songhaysystem.com/kb/number/904850341/subject/acc2 Article Excerpt: A compiled Pass-Through Query in the QueryDefs collection of a DAO database can be referenced in code like the following: Set qdDAO = dbDAO.QueryDefs("qsptTaz3Test00") qdDAO.Execute DB_FAILONERROR where "qsptTaz3Test00" is the name of the compil… Thu, 03 Sep 1998 19:19:21 GMT Bryan Wilhite Sizing the Form Window to Fit the Form http://www.songhaysystem.com/kb/number/195/subject/acc2 Article Excerpt: In order for the following sub-routine to work, a custom menu must be assigned to the form with the DoMenuItem action Size Window to Fit Form. Sub Form_Load () ' 'Among other things, this event uses the custom menu 'to size the Window via old… Fri, 07 Aug 1998 20:36:58 GMT Bryan Wilhite PROBLEM: The Print Dialog Box Lists the Name of the Report Object and Not a User-Friendly Name http://www.songhaysystem.com/kb/number/902521619/subject/acc2 Article Excerpt: When a report---say rptSales---is printed, the print dialog may show the user "Now Printing 'rptSales' to LPT1" if there is no caption property specified in the report. The name rptSales is useful to the developer but not the user! Specify a more user-fr… Fri, 07 Aug 1998 20:36:01 GMT Bryan Wilhite Code: the "Are You Sure?" Message http://www.songhaysystem.com/kb/number/897328220/subject/acc2 Article Excerpt: 'To review the constants used here, review 'the Access Basic online help for MsgBox. If MsgBox("Are you sure?", 4 + 256 + 32) = 7 Then 'Prepare to exit procedure. Exit Sub End If Mon, 08 Jun 1998 17:55:14 GMT Bryan Wilhite Code: Shading Alternating Groups of Rows in a Report http://www.songhaysystem.com/kb/number/185/subject/acc2 Article Excerpt: The rows produced in the detail (Section(0)) of an MS Access report can be formatted on the fly using code in the Format event of the report. The "secret" is the economical use of the modulo function: Sub Detail2_Format (Cancel As Integer, FormatCount As… Wed, 11 Feb 1998 21:57:07 GMT Bryan Wilhite Code: Selected API Calls. http://www.songhaysystem.com/kb/number/192/subject/acc2 Article Excerpt: '------------------------------------------------------------------------ ' ' MODULE ' ' Windows API Utilities ' ' PURPOSE ' ' Provides routines for manipulating Microsoft Access forms and ' windows through the Window API. ' ' NOTES ' ' Most of th… Wed, 11 Feb 1998 21:38:22 GMT Bryan Wilhite Storing a Query Without Its Underlying Table(s) http://www.songhaysystem.com/kb/number/180/subject/acc2 Article Excerpt: By saving a stored query in SQL View you can store a query without its underlying tables. This is often useful when you need to keep queries in a temporary database used as a "palette" for a database under development. Tue, 10 Feb 1998 23:48:42 GMT Bryan Wilhite