This sample automatically calculates the Start Bit of an ImportSpec by adding the Start Bit and Length of the previous record.
Download
Access 2000 (25 KB): CalculateSpec2k.zip
BMS Business Management System company is a developed company on software programming the try to create database application to enhance business productivity see our website :www.bmsco-eg.com
Tuesday, 26 January 2010
Books.mdb (intermediate)
Books.mdb" and it's companion database "Books_be.mdb", make up a simple personal book inventory database. It uses the "BoilerPlate.mdb" sample to create a complete application.
Note: Put both databases in the same physical directory. If you do, the front-end (Books.mdb) will always find the tables in the back-end (Books_be.mdb).
Download
Access 97 (80 KB): Books97.zip
Access 2000 DAO (102 KB): Books2k.zip
Note: Put both databases in the same physical directory. If you do, the front-end (Books.mdb) will always find the tables in the back-end (Books_be.mdb).
Download
Access 97 (80 KB): Books97.zip
Access 2000 DAO (102 KB): Books2k.zip
BoilerPlate.mdb (intermediate)
This sample is a useful template for an application.
It has a number of standard forms for maintaining reference tables, viewing reports, checking database locations, and users logged on.
The tables, MainDataEntry form, and reports are just to show how the template works
This sample is a useful template for an application.
It has a number of standard forms for maintaining reference tables, viewing reports, checking database locations, and users logged on.
The tables, MainDataEntry form, and reports are just to show how the template works
Download
Access 97 (191 KB): BoilerPlate2_97.zip
Access 2000 DAO (115 KB): BoilerPlate2k.zip
It has a number of standard forms for maintaining reference tables, viewing reports, checking database locations, and users logged on.
The tables, MainDataEntry form, and reports are just to show how the template works
This sample is a useful template for an application.
It has a number of standard forms for maintaining reference tables, viewing reports, checking database locations, and users logged on.
The tables, MainDataEntry form, and reports are just to show how the template works
Download
Access 97 (191 KB): BoilerPlate2_97.zip
Access 2000 DAO (115 KB): BoilerPlate2k.zip
Wednesday, 20 January 2010
AutomatingPowerpoint.mdb (intermediate)
A simple example of automating the creation of a Powerpoint Presentation from Access.
Download
Access 2000 (544 KB): AutomatingPowerpoint2k.zip
Download
Access 2000 (544 KB): AutomatingPowerpoint2k.zip
AuditTrail.mdb (intermediate)
This sample illustrates one way to produce a simple audit trail table containing: machine name, login name, user name (access security), record number, field name, original value, new value, and a date/time stamp. It tracks all changes made to a record in either the form or subform. It also tracks when new records are inserted and when records are deleted and the values of the deleted fields. It does not work properly for deleting if Cascade Deletes is set. It will show the deletes from the main form, but not the subform. Code is contained in Module1 and is called from each text box on each form. There are no doubt many improvements that can be made. This is just for illustration purposes.
Download
Access 97 (58 KB): AuditTrail97.zip
Access 2000 DAO (59 KB): AuditTrail2k.zip
Download
Access 97 (58 KB): AuditTrail97.zip
Access 2000 DAO (59 KB): AuditTrail2k.zip
AppendValuesToExcel.mdb
This sample demonstrates how to append data from a database to an Excel Spreadsheet using Office Automation to find the next empty row in the spreadsheet.
The overall process:
1) Define Access and Excel object variables
2) Open Excel sheet as an Excel Object
3) Find the last row of data
4) Write data from Access query to Spreadsheet
5) Save and close spreadsheet
Look in the "basExport" module for the relevant code.
Note: This requires a spreadsheet called "ExportSpreadsheet.xls" (included with the sample) exist in the same directory as the application. Also requires references set to DAO 3.6 and Excel
Download Access 2000-2003 Version: AppendValuesToExcel.zip
The overall process:
1) Define Access and Excel object variables
2) Open Excel sheet as an Excel Object
3) Find the last row of data
4) Write data from Access query to Spreadsheet
5) Save and close spreadsheet
Look in the "basExport" module for the relevant code.
Note: This requires a spreadsheet called "ExportSpreadsheet.xls" (included with the sample) exist in the same directory as the application. Also requires references set to DAO 3.6 and Excel
Download Access 2000-2003 Version: AppendValuesToExcel.zip
AmbiguousOuterJoins.doc ( beginner )
The Outer Join can be a powerful tool for querying data in Microsoft Access. When you have only two tables, there is usually no problem. When there are more than two tables, however, using an Outer Join becomes more complicated. Sometimes Access allows it, and sometimes it gives you the not-very-descriptive "Ambiguous Outer Join" error.
Download
Access 2000 (79 KB): AmbiguousOuterJoins2k.zip
Download
Access 2000 (79 KB): AmbiguousOuterJoins2k.zip
ActionQueriesInCode.mdb (beginner)
There are a variety of circumstances under which you might want to run a query in VBA code. You may want to just display the results of a Select query to the screen at the push of a button. You may want to run an Action Query in a code module as part of another process. Illustrates how to suppress confirmation messages when running an Action query in VBA code. Documentation included.
Download
Access 2000 (96 KB): ActionQueriesInCode2k.zip
Download
Access 2000 (96 KB): ActionQueriesInCode2k.zip
Sunday, 17 January 2010
Animation.mdb ( intermediate )
This sample shows how to implement a variety of simple animations in an Access Form.
Download
Access 97 (65 KB): Animation97.zip
Access 2000 (79 KB): Animation2k.zip
Download
Access 97 (65 KB): Animation97.zip
Access 2000 (79 KB): Animation2k.zip
Saturday, 16 January 2010
Student Search on Database
| Student Search on Database |
Searching for a record based on a text box value in a form: There are times, when developing your Microsoft Access databases, that you may wish to allow your users to search for a record in the form that contains a certain value which will be entered into a textbox. Below shows the example Microsoft Access form containing an unbound text box and command button (Search) which will enable the user to enter a value to be searched on. Form containing the unbound text search facility. To perform the search you will need to enter a value (this search is based on the student number primary key) into the unbound text. The code below is attached to the command button - cmdSearch. This code checks for a value (if no value is entered or no match found it will then return one message and set the focus back to the search field. If a value is found it will return the appropriate record and will give a message then clear the search control.
|
for more information and support
Send Email from Access to Outlook
Download the Access Visual Basic Outlook API to open up an email message from an Access form.
You can use this VB code to automatically fill in the subject and body text of the email. The download also demonstrates the ability to attach an external document to the Outlook email.
Here is a snapshot of the code contained in the database example download:
Private Sub Command20_Click()
Dim mess_body As String
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.BodyFormat = olFormatRichText
.To = Me.Email_Address
.Subject = Me.Mess_Subject
.HTMLBody = Me.Mess_Text
If Left(Me.Mail_Attachment_Path, 1) <> "<" Then
.Attachments.Add (Me.Mail_Attachment_Path)
End If
'.DeleteAfterSubmit = True 'This would let Outlook send the note without storing
it in your sent bin
.Send
End With
'MsgBox MailOutLook.Body
Exit Sub
email_error:
MsgBox "An error was encountered." & vbCrLf & "The error message is: " & Err.Description
Resume Error_out
Error_out:
End Sub
Dim mess_body As String
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.BodyFormat = olFormatRichText
.To = Me.Email_Address
.Subject = Me.Mess_Subject
.HTMLBody = Me.Mess_Text
If Left(Me.Mail_Attachment_Path, 1) <> "<" Then
.Attachments.Add (Me.Mail_Attachment_Path)
End If
'.DeleteAfterSubmit = True 'This would let Outlook send the note without storing
it in your sent bin
.Send
End With
'MsgBox MailOutLook.Body
Exit Sub
email_error:
MsgBox "An error was encountered." & vbCrLf & "The error message is: " & Err.Description
Resume Error_out
Error_out:
End Sub
ActionQueriesInCode.mdb (beginner)
| ActionQueriesInCode.mdb (beginner) |
| There are a variety of circumstances under which you might want to run a query in VBA code. You may want to just display the results of a Select query to the screen at the push of a button. You may want to run an Action Query in a code module as part of another process. Illustrates how to suppress confirmation messages when running an Action query in VBA code. Documentation included. |
for more information and support
CreateQueries5.mdb (advanced)
| CreateQueries5.mdb (advanced) |
This set of samples illustrate how to create a flexible query generator for your users. It is similar to CreateQueries4.mdb, but no longer limits the query to 3 criteria. Because the information for the criteria is stored in a table, there are multi-user considerations. If you use the Singe-User edition in a multi-user environment, users will be over-writing each other's queries. Therefore the Multi-User Edition creates a temporary database on the user's C: drive to store the Where Criteria. The Basic query generator shows just the basics of getting the unlimited Where Clause to work. The Advanced query generator allows you to choose a table or a query for the FROM clause, allows you to select which fields to show in the Field List, and allows parentheses in the Where clause. To use: Each form is self-contained with all the code needed. Just copy the form you want and the two tables: CriteriaTable and TableFields into your application. Access 2000 DAO (89 KB): CreateQueries5-2k.zip |
for more information and support
Wednesday, 6 January 2010
Access 2007: The Missing Manual
Compared to industrial-strength database products such as Microsoft's SQL Server, Access is a breeze to use. It runs on PCs rather than servers and is ideal for small- to mid-sized businesses and households. But Access is still intimidating to learn. It doesn't help that each new version crammed in yet another set of features; so many, in fact, that even the pros don't know where to find them all. Access 2007 breaks this pattern with some of the most dramatic changes users have seen since Office 95. Most obvious is the thoroughly redesigned user interface, with its tabbed toolbar (or "Ribbon") that makes features easy to locate and use. The features list also includes several long-awaited changes. One thing that hasn't improved is Microsoft's documentation. To learn the ins and outs of all the features in Access 2007, Microsoft merely offers online help.
Access 2007: The Missing Manual was written from the ground up for this redesigned application. You will learn how to design complete databases, maintain them, search for valuable nuggets of information, and build attractive forms for quick-and-easy data entry. You'll even delve into the black art of Access programming (including macros and Visual Basic), and pick up valuable tricks and techniques to automate common tasks -- even if you've never touched a line of code before. You will also learn all about the new prebuilt databases you can customize to fit your needs, and how the new complex data feature will simplify your life. With plenty of downloadable examples, this objective and witty book will turn an Access neophyte into a true master.
free download here
Access 2007: The Missing Manual was written from the ground up for this redesigned application. You will learn how to design complete databases, maintain them, search for valuable nuggets of information, and build attractive forms for quick-and-easy data entry. You'll even delve into the black art of Access programming (including macros and Visual Basic), and pick up valuable tricks and techniques to automate common tasks -- even if you've never touched a line of code before. You will also learn all about the new prebuilt databases you can customize to fit your needs, and how the new complex data feature will simplify your life. With plenty of downloadable examples, this objective and witty book will turn an Access neophyte into a true master.
free download here
Subscribe to:
Posts (Atom)
Receipt Management: Stop Losing Paper Receipts Forever
Paper receipts fade, tear, and get lost. Here's how the Petty Cash app solves the receipt problem permanently. The Paper Problem Therma...
-
This sample demonstrates how to append data from a database to an Excel Spreadsheet using Office Automation to find the next empty row in th...
-
Microsoft Office Access , previously known as Microsoft Access , is a relational database management system from Microsoft that combines t...