form4.frm

a hotel system in PHP will help a lot

VERSION 5.00
Begin VB.Form Form4 
   Caption         =   "HMS  Reports"
   ClientHeight    =   5355
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   8775
   Icon            =   "Form4.frx":0000
   LinkTopic       =   "Form4"
   ScaleHeight     =   5355
   ScaleWidth      =   8775
   StartUpPosition =   1  'CenterOwner
   Begin VB.Frame Frame4 
      Height          =   4455
      Left            =   2040
      TabIndex        =   35
      Top             =   960
      Width           =   6735
      Begin VB.ListBox List3 
         Height          =   3570
         Index           =   0
         ItemData        =   "Form4.frx":030A
         Left            =   120
         List            =   "Form4.frx":030C
         TabIndex        =   40
         Top             =   600
         Width           =   1455
      End
      Begin VB.ListBox List3 
         Height          =   3570
         Index           =   1
         ItemData        =   "Form4.frx":030E
         Left            =   1560
         List            =   "Form4.frx":0310
         TabIndex        =   39
         Top             =   600
         Width           =   1455
      End
      Begin VB.ListBox List3 
         Height          =   3570
         Index           =   2
         ItemData        =   "Form4.frx":0312
         Left            =   3000
         List            =   "Form4.frx":0314
         TabIndex        =   38
         Top             =   600
         Width           =   1215
      End
      Begin VB.ListBox List3 
         Height          =   3570
         Index           =   3
         ItemData        =   "Form4.frx":0316
         Left            =   4200
         List            =   "Form4.frx":0318
         TabIndex        =   37
         Top             =   600
         Width           =   1455
      End
      Begin VB.ListBox List3 
         Height          =   3570
         Index           =   4
         ItemData        =   "Form4.frx":031A
         Left            =   5640
         List            =   "Form4.frx":031C
         TabIndex        =   36
         Top             =   600
         Width           =   975
      End
      Begin VB.Label Label7 
         Caption         =   "Name"
         Height          =   255
         Left            =   360
         TabIndex        =   45
         Top             =   360
         Width           =   615
      End
      Begin VB.Label Label17 
         Caption         =   "Address"
         Height          =   255
         Left            =   1920
         TabIndex        =   44
         Top             =   360
         Width           =   615
      End
      Begin VB.Label Label18 
         Caption         =   "Contact No"
         Height          =   255
         Left            =   3120
         TabIndex        =   43
         Top             =   360
         Width           =   855
      End
      Begin VB.Label Label19 
         Caption         =   "Reservation Date"
         Height          =   255
         Left            =   4200
         TabIndex        =   42
         Top             =   360
         Width           =   1335
      End
      Begin VB.Label Label20 
         Caption         =   "Confirmed"
         Height          =   255
         Left            =   5760
         TabIndex        =   41
         Top             =   360
         Width           =   855
      End
   End
   Begin VB.Data Data3 
      Caption         =   "Data3"
      Connect         =   "Access"
      DatabaseName    =   "D:\ashik\HMS\hotel2.mdb"
      DefaultCursorType=   0  'DefaultCursor
      DefaultType     =   2  'UseODBC
      Exclusive       =   0   'False
      Height          =   300
      Left            =   1320
      Options         =   0
      ReadOnly        =   0   'False
      RecordsetType   =   1  'Dynaset
      RecordSource    =   "reservation"
      Top             =   120
      Visible         =   0   'False
      Width           =   1140
   End
   Begin VB.Frame Frame3 
      Height          =   4455
      Left            =   2040
      TabIndex        =   22
      Top             =   960
      Width           =   6735
      Begin VB.ListBox List2 
         Height          =   3765
         Index           =   5
         ItemData        =   "Form4.frx":031E
         Left            =   5520
         List            =   "Form4.frx":0320
         TabIndex        =   28
         Top             =   480
         Width           =   1095
      End
      Begin VB.ListBox List2 
         Height          =   3765
         Index           =   4
         ItemData        =   "Form4.frx":0322
         Left            =   4680
         List            =   "Form4.frx":0324
         TabIndex        =   27
         Top             =   480
         Width           =   855
      End
      Begin VB.ListBox List2 
         Height          =   3765
         Index           =   3
         ItemData        =   "Form4.frx":0326
         Left            =   3360
         List            =   "Form4.frx":0328
         TabIndex        =   26
         Top             =   480
         Width           =   1335
      End
      Begin VB.ListBox List2 
         Height          =   3765
         Index           =   2
         ItemData        =   "Form4.frx":032A
         Left            =   2160
         List            =   "Form4.frx":032C
         TabIndex        =   25
         Top             =   480
         Width           =   1215
      End
      Begin VB.ListBox List2 
         Height          =   3765
         Index           =   1
         ItemData        =   "Form4.frx":032E
         Left            =   1560
         List            =   "Form4.frx":0330
         TabIndex        =   24
         Top             =   480
         Width           =   615
      End
      Begin VB.ListBox List2 
         Height          =   3765
         Index           =   0
         ItemData        =   "Form4.frx":0332
         Left            =   120
         List            =   "Form4.frx":0334
         TabIndex        =   23
         Top             =   480
         Width           =   1455
      End
      Begin VB.Label Label16 
         Caption         =   "Amount"
         Height          =   255
         Left            =   5760
         TabIndex        =   34
         Top             =   240
         Width           =   735
      End
      Begin VB.Label Label15 
         Caption         =   "Duration"
         Height          =   255
         Left            =   4800
         TabIndex        =   33
         Top             =   240
         Width           =   735
      End
      Begin VB.Label Label14 
         Caption         =   "Checkout date"
         Height          =   255
         Left            =   3480
         TabIndex        =   32
         Top             =   240
         Width           =   1095
      End
      Begin VB.Label Label13 
         Caption         =   "Checkin Date"
         Height          =   255
         Left            =   2280
         TabIndex        =   31
         Top             =   240
         Width           =   1095
      End
      Begin VB.Label Label12 
         Caption         =   "Room "
         Height          =   255
         Left            =   1560
         TabIndex        =   30
         Top             =   240
         Width           =   495
      End
      Begin VB.Label Label11 
         Caption         =   "Name"
         Height          =   255
         Left            =   480
         TabIndex        =   29
         Top             =   240
         Width           =   615
      End
   End
   Begin VB.Frame Frame2 
      Height          =   4455
      Left            =   2040
      TabIndex        =   9
      Top             =   960
      Width           =   6735
      Begin VB.ListBox List1 
         Height          =   3765
         Index           =   5
         ItemData        =   "Form4.frx":0336
         Left            =   2520
         List            =   "Form4.frx":0338
         TabIndex        =   20
         Top             =   480
         Width           =   615
      End
      Begin VB.ListBox List1 
         Height          =   3765
         Index           =   0
         ItemData        =   "Form4.frx":033A
         Left            =   120
         List            =   "Form4.frx":033C
         TabIndex        =   14
         Top             =   480
         Width           =   1335
      End
      Begin VB.ListBox List1 
         Height          =   3765
         Index           =   1
         ItemData        =   "Form4.frx":033E
         Left            =   1440
         List            =   "Form4.frx":0340
         TabIndex        =   13
         Top             =   480
         Width           =   1095
      End
      Begin VB.ListBox List1 
         Height          =   3765
         Index           =   2
         ItemData        =   "Form4.frx":0342
         Left            =   3120
         List            =   "Form4.frx":0344
         TabIndex        =   12
         Top             =   480
         Width           =   1575
      End
      Begin VB.ListBox List1 
         Height          =   3765
         Index           =   3
         ItemData        =   "Form4.frx":0346
         Left            =   4680
         List            =   "Form4.frx":0348
         TabIndex        =   11
         Top             =   480
         Width           =   1095
      End
      Begin VB.ListBox List1 
         Height          =   3765
         Index           =   4
         ItemData        =   "Form4.frx":034A
         Left            =   5760
         List            =   "Form4.frx":034C
         TabIndex        =   10
         Top             =   480
         Width           =   855
      End
      Begin VB.Label Label10 
         Caption         =   "Age"
         Height          =   255
         Left            =   2640