u_dm.dfm

c/s系统。 delphi 6+access 运行前先配置数据环境：把db文件夹复制到c：下 要编译请安装第三方控件fastreport2.47 这是我的小小的毕业设计

object Dm: TDm
  OldCreateOrder = False
  Left = 312
  Top = 189
  Height = 356
  Width = 424
  object u_ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db\ERDB.mdb;Pers' +
      'ist Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 56
    Top = 24
  end
  object user: TADOTable
    Connection = u_ADOConnection1
    CursorType = ctStatic
    TableName = 'adb_person'
    Left = 24
    Top = 80
  end
  object u_DataSource1: TDataSource
    DataSet = user
    Left = 88
    Top = 80
  end
  object iptable: TADOTable
    Active = True
    Connection = ip_ADOConnection1
    CursorType = ctStatic
    TableName = 'systemip'
    Left = 112
    Top = 200
    object iptableip: TWideStringField
      FieldName = 'ip'
    end
  end
  object ip_ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db\ip.mdb;Persis' +
      't Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 24
    Top = 200
  end
  object DataSource1: TDataSource
    DataSet = bxb
    Left = 328
    Top = 96
  end
  object b_ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db\temp.mdb;Pers' +
      'ist Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 280
    Top = 24
  end
  object bxb: TADOTable
    Active = True
    Connection = b_ADOConnection1
    CursorType = ctStatic
    TableName = 'bxb'
    Left = 232
    Top = 88
    object bxbDSDesigner: TWideStringField
      DisplayWidth = 10
      FieldName = #36710#36742#21495#30721
      Size = 10
    end
    object bxbDSDesigner2: TWideStringField
      DisplayWidth = 7
      FieldName = #32500#20462#22320#28857
      Size = 5
    end
    object bxbDSDesigner3: TWideStringField
      DisplayWidth = 11
      FieldName = #25253#20462#31995#32479
      Size = 10
    end
    object bxbDSDesigner4: TWideStringField
      DisplayWidth = 10
      FieldName = #25253#20462#37096#20214
      Size = 10
    end
    object bxbDSDesigner5: TWideStringField
      DisplayWidth = 10
      FieldName = #25253#20462#20301#32622
      Size = 10
    end
    object bxbDSDesigner6: TWideStringField
      DisplayWidth = 10
      FieldName = #25925#38556#29305#24449
      Size = 10
    end
    object bxbDSDesigner7: TDateTimeField
      DisplayWidth = 11
      FieldName = #25253#20462#26102#38388
    end
    object bxbDSDesigner8: TWideStringField
      DisplayWidth = 20
      FieldName = #25925#38556#21477
    end
  end
end