home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1994 #1
/
monster.zip
/
monster
/
PROG_BAS
/
NETLIST.ZIP
/
NETDET.FRM
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1993-11-17
|
2KB
|
48 lines
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