serverbathdm.dfm

东华休闲山庄洗浴、餐饮、客房管理系统

object Bath: TBath
  OldCreateOrder = False
  OnCreate = RemoteDataModuleCreate
  OnDestroy = RemoteDataModuleDestroy
  Left = 520
  Top = 213
  Height = 522
  Width = 409
  object qryRoom: TADOQuery
    Connection = conDBRoom
    Parameters = <>
    Left = 248
    Top = 56
  end
  object dspRoom: TDataSetProvider
    DataSet = qryRoom
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 56
  end
  object conDBRoom: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\Do' +
      'cuments and Settings\Administrator\'#26700#38754'\HotelManager\Server\DataBa' +
      'se\room.mdb;Mode=Share Deny None;Extended Properties="";Persist ' +
      'Security Info=False;Jet OLEDB:System database="";Jet OLEDB:Regis' +
      'try Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type' +
      '=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bu' +
      'lk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Data' +
      'base Password="";Jet OLEDB:Create System Database=False;Jet OLED' +
      'B:Encrypt Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=' +
      'False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:S' +
      'FP=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 24
    Top = 8
  end
  object dsRoomConsume: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from consume'
    Parameters = <>
    Left = 40
    Top = 440
  end
  object dspRoomConsume: TDataSetProvider
    DataSet = dsRoomConsume
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 440
  end
  object dsRoomLog: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from log'
    Parameters = <>
    Left = 248
    Top = 200
  end
  object dspRoomLog: TDataSetProvider
    DataSet = dsRoomLog
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 200
  end
  object dsRoomRoomPeople: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from roompeople'
    Parameters = <>
    Left = 40
    Top = 56
  end
  object dspRoomRoomPeople: TDataSetProvider
    DataSet = dsRoomRoomPeople
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 56
  end
  object dsRoomRoomSelect: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from roomselect'
    Parameters = <>
    Left = 40
    Top = 104
  end
  object dspRoomRoomSelect: TDataSetProvider
    DataSet = dsRoomRoomSelect
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 104
  end
  object dsRoomGuest: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from guest'
    Parameters = <>
    Left = 248
    Top = 248
  end
  object dspRoomGuest: TDataSetProvider
    DataSet = dsRoomGuest
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 248
  end
  object dsRoomReserve: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from reserve'
    Parameters = <>
    Left = 40
    Top = 392
  end
  object dspRoomReserve: TDataSetProvider
    DataSet = dsRoomReserve
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 392
  end
  object dsRoomXFXMSelect: TADODataSet
    Connection = conDBRoom
    CursorType = ctStatic
    CommandText = 'select * from xfxm,xmlx'#13#10'where xfxm.xfxm_lxbh=xmlx.Xmlx_bh'
    Parameters = <>
    Left = 40
    Top = 152
  end
  object dspRoomXFXMSelect: TDataSetProvider
    DataSet = dsRoomXFXMSelect
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 152
  end
  object dsRoomHouseTemp: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from housetemp'
    Parameters = <>
    Left = 40
    Top = 200
  end
  object dspRoomHouseTemp: TDataSetProvider
    DataSet = dsRoomHouseTemp
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 200
  end
  object dsRoomHouseTest: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from housetest'
    Parameters = <>
    Left = 40
    Top = 248
  end
  object dspRoomHouseTest: TDataSetProvider
    DataSet = dsRoomHouseTest
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 248
  end
  object dsRoomYJGL: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from yjgl'
    Parameters = <>
    Left = 248
    Top = 296
  end
  object dspRoomYJGL: TDataSetProvider
    DataSet = dsRoomYJGL
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 296
  end
  object dsRoomBKJZ: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from bkjz'
    Parameters = <>
    Left = 248
    Top = 344
  end
  object dspRoomBKJZ: TDataSetProvider
    DataSet = dsRoomBKJZ
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 344
  end
  object dsRoomHouse: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from house'
    Parameters = <>
    Left = 248
    Top = 152
  end
  object dspRoomHouse: TDataSetProvider
    DataSet = dsRoomHouse
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 152
  end
  object dsRoomRoom: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from room'
    Parameters = <>
    Left = 248
    Top = 104
  end
  object dspRoomRoom: TDataSetProvider
    DataSet = dsRoomRoom
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 104
  end
  object dsRoomRoomtype: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from roomtype'
    Parameters = <>
    Left = 40
    Top = 296
  end
  object dspRoomRoomtype: TDataSetProvider
    DataSet = dsRoomRoomtype
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 296
  end
  object dsRoomXFXM: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from xfxm'
    Parameters = <>
    Left = 248
    Top = 440
  end
  object dspRoomXFXM: TDataSetProvider
    DataSet = dsRoomXFXM
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 440
  end
  object dsRoomXMLX: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from xmlx'
    Parameters = <>
    Left = 248
    Top = 392
  end
  object dspRoomXMLX: TDataSetProvider
    DataSet = dsRoomXMLX
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 392
  end
  object dsRoomGuestSource: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from guestsource'
    Parameters = <>
    Left = 40
    Top = 344
  end
  object dspRoomGuestSource: TDataSetProvider
    DataSet = dsRoomGuestSource
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 152
    Top = 344
  end
  object dsUser: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from users'
    Parameters = <>
    Left = 176
    Top = 8
  end
  object dspUser: TDataSetProvider
    DataSet = dsUser
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 224
    Top = 8
  end
  object dsGroups: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from groups'
    Parameters = <>
    Left = 272
    Top = 8
  end
  object dspGroups: TDataSetProvider
    DataSet = dsGroups
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 328
    Top = 8
  end
  object dsDepart: TADODataSet
    Connection = conDBRoom
    CommandText = 'select * from depart'
    Parameters = <>
    Left = 80
    Top = 8
  end
  object dspDepart: TDataSetProvider
    DataSet = dsDepart
    ResolveToDataSet = True
    Options = [poAllowCommandText]
    Left = 128
    Top = 8
  end
end