MachDet
Machine Details
ppppp
Q}Ux3
Details5
Data1%
c:\users\wrb\phone.mdb
Data1
Label2_Click
	Form_Load
PrevButton_Click
	PhoneList
PDetails
SQLStmt
Data1p
DatabaseName
RecordSource
PList
UpdateButton_Click9
First
NumberW
	FaxNumber
Called
	qryPhone2
Where
InVar
MousePointer
Data1_Validate
Action
MhTool1_Click
	Recordset
EditMode
DBName
Form_Load
   'SQLStmt$ = "SELECT [Last Name],[First Name],[TCP Address],[TCP Name],From qryPhone2 Where Name Like '" + PList.PhoneList.Text + "'"
InVar$ = PList.PhoneList.Text,
PList.Hide
Unload PList
Data1.DatabaseName = DBNamex
Data1.RecordSource = "SELECT [Name],[Last],[First],[Keys],[Number],[FaxNumber],[Called] From [qryPhone2] where [Name] Like '" + InVar$ + "'"
Data1.Refresho
Data1.Recordset.Edit
PrevButton_Click
 PList.Showd
 PDetails.Hide
 Unload PDetails
UpdateButton_Click