data_1.dfm

ERP人力管理系统````````本系统开发工具为Delphi+Sql SERVER 2000,采用ADO技术连接数据库

object Data1: TData1
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 315
  Top = 130
  Height = 339
  Width = 431
  object database1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=erp'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 16
    Top = 8
  end
  object ado_tab: TADOQuery
    Active = True
    Connection = database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from username')
    Left = 72
    Top = 8
  end
  object ado_yhgl: TADOQuery
    Active = True
    Connection = database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from username')
    Left = 72
    Top = 56
    object ado_yhgluser_id: TIntegerField
      DisplayLabel = #29992#25143#32534#21495
      FieldName = 'user_id'
    end
    object ado_yhgluser_name: TStringField
      DisplayLabel = #29992#25143#22995#21517
      FieldName = 'user_name'
      FixedChar = True
      Size = 10
    end
    object ado_yhgluser_job: TStringField
      DisplayLabel = #29992#25143#32844#20301
      FieldName = 'user_job'
      FixedChar = True
      Size = 10
    end
    object ado_yhgluser_power: TStringField
      DisplayLabel = #29992#25143#26435#38480
      FieldName = 'user_power'
      FixedChar = True
      Size = 10
    end
    object ado_yhgluser_password: TStringField
      DisplayLabel = #29992#25143#23494#30721
      FieldName = 'user_password'
      FixedChar = True
      Size = 10
    end
  end
  object datas_yhgl: TDataSource
    DataSet = ado_yhgl
    Left = 16
    Top = 56
  end
  object ado_workshop: TADOQuery
    Connection = database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from workshop')
    Left = 80
    Top = 152
    object ado_workshopworkshop_id: TStringField
      FieldName = 'workshop_id'
      FixedChar = True
      Size = 5
    end
    object ado_workshopworkshop_name: TStringField
      FieldName = 'workshop_name'
      FixedChar = True
      Size = 10
    end
  end
  object data_workshop: TDataSource
    DataSet = ado_workshop
    Left = 24
    Top = 160
  end
  object ado_active: TADOQuery
    Connection = database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from active')
    Left = 88
    Top = 104
    object ado_activeactive_id: TStringField
      DisplayLabel = #27963#21160#21495
      FieldName = 'active_id'
      FixedChar = True
      Size = 5
    end
    object ado_activeactive_name: TStringField
      DisplayLabel = #27963#21160#21517
      FieldName = 'active_name'
      FixedChar = True
      Size = 15
    end
    object ado_activeactive_cost: TFloatField
      DisplayLabel = #27963#21160#25104#26412
      FieldName = 'active_cost'
    end
  end
  object Data_active: TDataSource
    DataSet = ado_active
    Left = 16
    Top = 104
  end
  object backconn: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=master'
    KeepConnection = False
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 144
    Top = 216
  end
  object cback: TADOCommand
    Connection = database1
    Prepared = True
    Parameters = <>
    Left = 16
    Top = 216
  end
  object ADOCommand1: TADOCommand
    Connection = database1
    Prepared = True
    Parameters = <>
    Left = 80
    Top = 216
  end
  object ado_resourse: TADOQuery
    Connection = database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from resourse')
    Left = 40
    Top = 144
  end
  object data_resourse: TDataSource
    DataSet = ado_resourse
    Left = 24
    Top = 184
  end
  object data_zpinf: TDataSource
    DataSet = ado_zpinf
    Left = 160
    Top = 8
  end
  object ado_zpinf: TADOQuery
    Active = True
    Connection = database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from zpinf')
    Left = 208
    Top = 8
    object ado_zpinfdepart_name: TStringField
      FieldName = 'depart_name'
      FixedChar = True
      Size = 10
    end
    object ado_zpinfdepart_job: TStringField
      FieldName = 'depart_job'
      FixedChar = True
      Size = 10
    end
    object ado_zpinfxl: TStringField
      FieldName = 'xl'
      FixedChar = True
      Size = 10
    end
    object ado_zpinfxb: TStringField
      FieldName = 'xb'
      FixedChar = True
      Size = 10
    end
  end
  object data_rsxt: TDataSource
    DataSet = ado_rsxt
    Left = 168
    Top = 56
  end
  object ado_rsxt: TADOQuery
    Active = True
    Connection = database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from rsxt')
    Left = 232
    Top = 56
    object ado_rsxtrs_id: TStringField
      FieldName = 'rs_id'
      FixedChar = True
      Size = 5
    end
    object ado_rsxtrs_name: TStringField
      FieldName = 'rs_name'
      FixedChar = True
      Size = 8
    end
    object ado_rsxtrs_depart: TStringField
      FieldName = 'rs_depart'
      FixedChar = True
      Size = 10
    end
    object ado_rsxtrs_job: TStringField
      FieldName = 'rs_job'
      FixedChar = True
      Size = 8
    end
    object ado_rsxtrs_xueli: TStringField
      FieldName = 'rs_xueli'
      FixedChar = True
      Size = 8
    end
    object ado_rsxtrs_xb: TStringField
      FieldName = 'rs_xb'
      FixedChar = True
      Size = 4
    end
    object ado_rsxtrs_nl: TIntegerField
      FieldName = 'rs_nl'
    end
    object ado_rsxtrs_gl: TIntegerField
      FieldName = 'rs_gl'
    end
    object ado_rsxtrs_zzmm: TStringField
      FieldName = 'rs_zzmm'
      FixedChar = True
      Size = 10
    end
    object ado_rsxtrs_hf: TStringField
      FieldName = 'rs_hf'
      FixedChar = True
      Size = 4
    end
  end
  object frReport1: TfrReport
    Dataset = frDBDataSet1
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    StoreInDFM = True
    RebuildPrinter = True
    Left = 256
    Top = 8
    ReportForm = {
      19000000B7070000190000000001000100FFFFFFFFFF09000000340800009A0B
      00000000000000000000000000000000000000FFFF00000000FFFF0000000000
      00000000000000030400466F726D000F0000FFDC000000780000007C0100002C
      010000040000000200C4000000050042616E643100020100000000B0000000F5
      020000140000003000020001000000000000000000FFFFFF1F00000000000000
      000000000000FFFF000000000002000000010000000000000001000000C80000
      001400000001000000000000020029010000050042616E643200020100000000
      EC000000F5020000140000003000050001000000000000000000FFFFFF1F0000
      0000000000000000000000FFFF00000000000200000001000000000000000100
      0000C800000014000000010000000000000200950100000C005265706F727454
      69746C65310002010000000040000000F5020000540000003000000001000000
      000000000000FFFFFF1F00000000000000000000000000FFFF00000000000200
      0000010000000000000001000000C8000000140000000100000000000000001B
      02000005004D656D6F3100020090000000B0000000600000001400000003000E
      0001000000000000000000FFFFFF1F2E02000000000001000800B2BFC3C5C3FB
      B3C600000000FFFF00000000000200000001000000000500417269616C000A00
      0000000000000000000000000100020000000000FFFFFF000000000200000000
      0000000000B202000005004D656D6F3200020090000000EC0000006000000014
      00000003000E0001000000000000000000FFFFFF1F2E02000000000001001900
      5B61646F5F7A70696E662E226465706172745F6E616D65225D00000000FFFF00
      000000000200000001000000000500417269616C000A00000000000000000000
      0000000100020000000000FFFFFF000000000200000000000000000034030000
      05004D656D6F33000200F0000000B0000000540000001400000003000F000100
      0000000000000000FFFFFF1F2E02000000000001000400D6B0CEF100000000FF
      FF00000000000200000001000000000500417269616C000A0000000000000000
      00000000000100020000000000FFFFFF0000000002000000000000000000CA03
      000005004D656D6F34000200F0000000EC000000540000001400000003000F00
      01000000000000000000FFFFFF1F2E020000000000010018005B61646F5F7A70
      696E662E226465706172745F6A6F62225D00000000FFFF000000000002000000
      01000000000500417269616C000A000000000000000000000000000100020000
      000000FFFFFF00000000020000000000000000005004000005004D656D6F3500
      020044010000B0000000540000001400000003000B0001000000000000000000
      FFFFFF1F2E02000000000001000800D7EEB8DFD1A7C0FA00000000FFFF000000
      00000200000001000000000500417269616C000A000000000000000000000000
      000100020000000000FFFFFF0000000002000000000000000000DE0400000500
      4D656D6F3600020044010000EC000000540000001400000003000B0001000000
      000000000000FFFFFF1F2E020000000000010010005B61646F5F7A70696E662E
      22786C225D00000000FFFF00000000000200000001000000000500417269616C
      000A000000000000000000000000000100020000000000FFFFFF000000000200
      00000000000000006005000005004D656D6F3700020098010000B00000004C00
      00001400000003000B0001000000000000000000FFFFFF1F2E02000000000001
      000400D0D4B1F000000000FFFF00000000000200000001000000000500417269
      616C000A000000000000000000000000000100020000000000FFFFFF00000000
      02000000000000000000EE05000005004D656D6F3800020094010000EC000000
      500000001400000003000B0001000000000000000000FFFFFF1F2E0200000000
      00010010005B61646F5F7A70696E662E227862225D00000000FFFF0000000000
      0200000001000000000500417269616C000A0000000000000000000000000001