Befehlsschaltflächen des Adressbuchs

Gilt für: Access 2013, Office 2013

Die Adressbuchanwendung bietet die folgenden Befehlsschaltflächen:

• Eine Schaltfläche Find, um eine Abfrage an die Datenbank abzusenden.

• Eine Schaltfläche Clear, um die Inhalte aus den Textfelder zu löschen, bevor eine neue Suche gestartet wird.

• Eine Schaltfläche Update Profile, um die Änderungen an einem Mitarbeiterdatensatz zu ändern.

• Eine Schaltfläche Cancel Changes, um Änderungen zu verwerfen.

Find (Schaltfläche)

Clicking the Find button activates the VBScript Find_OnClick Sub procedure, which builds and sends the SQL query. Clicking this button populates the data grid.

Erstellen der SQL-Abfrage

Der erste Teil der Find_OnClick Sub-Prozedur erstellt die SQL-Abfrage einem Begriff zu einem Zeitpunkt durch Anfügen von Textzeichenfolgen an eine globale SQL SELECT-Anweisung. Zunächst wird die Variable auf einer SQL SELECT-Anweisung, die alle Zeilen der Daten aus der Datenquellentabelle anfordert. Im nächsten Schritt überprüft der Unterprozedur jede der vier input Felder auf der Seite.

Da das Programm das Wort im Erstellen der SQL-Anweisungen verwendet, stellen die Abfragen Suchvorgänge nach Teilzeichenfolgen dar und nicht als nach genauen Übereinstimmungen.

Wenn das Feld Nachname den Eintrag "Berge" enthalten, und das Feld Titel den Eintrag "Programmmanager" enthalten, würde beispielsweise die SQL-Anweisung (Wert) lauten:

 
Select FirstName, LastName, Title, Email, Building, Room, Phone from Employee where lastname like 'Berge%' and title like 'Program Manager%' 

If the query was successful, all persons with a last name containing the text "Berge" (such as Berge and Berger) and with a title containing the words "Program Manager" (for example, Program Manager, Advanced Technologies) are displayed in the HTML data grid.

Vorbereiten und Senden der Abfrage

Der letzte Teil der Find_OnClick Sub-Prozedur besteht aus zwei Anweisungen. Der ersten Anweisung wird die SQL-Eigenschaft des RDS.DataControl-Objekt ist gleich der dynamisch erstellte SQL-Abfrage. Die zweite Anweisung bewirkt, dass die RDS.DataControl -Objekts (), um die Datenbank Abfragen, und klicken Sie dann die Ergebnisse der Abfrage im Raster angezeigt.

 
Sub Find_OnClick 
 '... 
 DC1.SQL = myQuery 
 DC1.Refresh 
End Sub 

Update Profile (Schaltfläche)

Durch Klicken auf die Schaltfläche Update Profile aktiviert die VBScript-Unterprozedur Cancel_OnClick RDS.DataControl-Objekt () SubmitChanges und Refresh-Methode.

 
Sub Update_OnClick 
 DC1.SubmitChanges 
 DC1.Refresh 
End Sub 

Wenn DC1. SubmitChanges wird ausgeführt, der Remotedatendienst packt alle Updateinformationen und sendet sie über HTTP an den Server. Das Update ist alles oder nichts; Wenn ein Teil des Updates nicht erfolgreich ist, werden keine Änderungen vorgenommen, und es wird eine status Meldung zurückgegeben. wird ausgeführt, packt der Remotedatendienst alle Updateinformationen und sendet sie über HTTP an den Server. Das Update ist alles oder nichts; Wenn ein Teil des Updates nicht erfolgreich ist, werden keine Änderungen vorgenommen, und es wird eine status Meldung zurückgegeben. DC1. Nach SubmitChanges mit Remote Data Service ist keine Aktualisierung erforderlich, aber sie stellt neue Daten sicher.

Cancel Changes (Schaltfläche)

Durch Klicken auf Cancel Changes aktiviert die VBScript-Unterprozedur Cancel_OnClick RDS.DataControl-Objekts (CancelUpdate-Methode.

 
Sub Cancel_OnClick 
 DC1.CancelUpdate 
End Sub 

Wenn ausgeführt wird, es verwirft alle Änderungen, die ein Benutzer an einem Mitarbeiterdatensatz auf das Datenraster seit der letzten Abfrage oder Aktualisierung vorgenommen hat. Die ursprünglichen Werte werden wiederhergestellt.