da_un.dfm

一个就业管理系统

object da: Tda
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 203
  Top = 195
  Height = 348
  Width = 489
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:\'#20316#19994'\'#23601#19994#31995#32479'\data\clz' +
      'z.mdb;Persist Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 16
    Top = 8
  end
  object temp: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      
        'select st.id,st.co as '#36523#20221#35777',st.na as '#22995#21517',sex.na as '#24615#21035',st.bir as '#20986#29983#24180 +
        #26376',cl.na  as '#29677#32423',st.age as '#24180#40836',st.high as '#36523#39640', st.eyel as '#35270#21147#65288#24038#65289',st.e' +
        'yer as '#35270#21147#65288#21491#65289',st.addr as  '#20303#22336',st.tel as '#30005#35805',st.htel as '#25163#26426',jy.na as ' +
        #23601#19994#21333#20301',st.photo'
      'from st,sex,jy,cl'
      'where st.sex=sex.id and st.cl=cl.id and st.jy=jy.id')
    Left = 104
    Top = 8
  end
  object ADOTable1: TADOTable
    Connection = ADOConnection1
    Left = 32
    Top = 56
  end
  object da_temp: TDataSource
    DataSet = temp
    Left = 104
    Top = 64
  end
  object st_q: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'cl'
        Attributes = [paNullable]
        DataType = ftWideString
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    SQL.Strings = (
      
        'select st.co,st.id,st.na as '#22995#21517',sex.na as '#24615#21035',st.sex,st.bir,st.age' +
        ',st.high,st.eyel,st.eyer,st.addr,st.tel,st.htel,st.photo,st.jy'
      'from st,sex'
      'where st.sex=sex.id and st.cl=:cl')
    Left = 192
    Top = 8
  end
  object da_st: TDataSource
    DataSet = st_q
    Left = 192
    Top = 64
  end
  object jy_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select id,na as '#21333#20301#21517#31216
      'from jy')
    Left = 232
    Top = 8
  end
  object da_jy: TDataSource
    DataSet = jy_q
    Left = 232
    Top = 64
  end
  object pa_q: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select na as '#19987#19994#21517#31216',id'
      'from pa')
    Left = 280
    Top = 8
  end
  object da_pa: TDataSource
    DataSet = pa_q
    Left = 280
    Top = 64
  end
  object cl_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <
      item
        Name = 'pid'
        Attributes = [paNullable]
        DataType = ftWideString
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    SQL.Strings = (
      'select id,paid,na as '#29677#32423#21517#31216' from cl'
      'where paid=:pid')
    Left = 320
    Top = 8
  end
  object da_cl: TDataSource
    DataSet = cl_q
    Left = 320
    Top = 64
  end
  object ADOQuery2: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 144
    Top = 112
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 136
    Top = 160
  end
  object ADOQuery3: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 240
    Top = 104
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 240
    Top = 160
  end
  object stupa_q: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from pa')
    Left = 272
    Top = 104
  end
  object da_stupa: TDataSource
    DataSet = stupa_q
    Left = 272
    Top = 160
  end
  object stucl_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <
      item
        Name = 'pid'
        Attributes = [paNullable]
        DataType = ftWideString
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    SQL.Strings = (
      'select * from cl where paid=:pid')
    Left = 312
    Top = 104
  end
  object da_stucl: TDataSource
    DataSet = stucl_q
    Left = 312
    Top = 160
  end
  object sex_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from sex')
    Left = 352
    Top = 104
  end
  object da_sex: TDataSource
    DataSet = sex_q
    Left = 352
    Top = 160
  end
  object stujy_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from jy')
    Left = 400
    Top = 104
  end
  object da_stujy: TDataSource
    DataSet = stujy_q
    Left = 400
    Top = 160
  end
  object serjy_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from jy')
    Left = 80
    Top = 120
  end
  object da_serjy: TDataSource
    DataSet = serjy_q
    Left = 80
    Top = 176
  end
  object sercl_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from cl')
    Left = 8
    Top = 120
  end
  object da_sercl: TDataSource
    DataSet = sercl_q
    Left = 8
    Top = 176
  end
  object main_q: TADOQuery
    Connection = ADOConnection1
    AfterOpen = main_qAfterOpen
    Parameters = <>
    SQL.Strings = (
      
        'select st.id,st.co as '#36523#20221#35777',st.na as '#22995#21517',sex.na as '#24615#21035',st.bir as '#20986#29983#24180 +
        #26376',cl.na  as '#29677#32423',st.age as '#24180#40836',st.high as '#36523#39640', st.eyel as '#35270#21147#65288#24038#65289',st.e' +
        'yer as '#35270#21147#65288#21491#65289',st.addr as  '#20303#22336',st.tel as '#30005#35805',st.htel as '#25163#26426',jy.na as ' +
        #23601#19994#21333#20301',st.photo'
      'from st,sex,jy,cl'
      'where st.sex=sex.id and st.cl=cl.id and st.jy=jy.id')
    Left = 176
    Top = 248
  end
  object da_main: TDataSource
    DataSet = main_q
    Left = 224
    Top = 248
  end
  object main_pa_q: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    AfterOpen = main_pa_qAfterOpen
    Parameters = <>
    SQL.Strings = (
      'select na,id'
      'from pa')
    Left = 8
    Top = 248
  end
  object main_jy_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select id,na'
      'from jy')
    Left = 72
    Top = 248
  end
  object main_cl_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <
      item
        Name = 'pid'
        Attributes = [paNullable]
        DataType = ftWideString
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    SQL.Strings = (
      'select id,na '
      'from cl'
      'where paid=:pid')
    Left = 128
    Top = 248
  end
  object temp1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      
        'select st.id,st.co as '#36523#20221#35777',st.na as '#22995#21517',sex.na as '#24615#21035',st.bir as '#20986#29983#24180 +
        #26376',cl.na  as '#29677#32423',st.age as '#24180#40836',st.high as '#36523#39640', st.eyel as '#35270#21147#65288#24038#65289',st.e' +
        'yer as '#35270#21147#65288#21491#65289',st.addr as  '#20303#22336',st.tel as '#30005#35805',st.htel as '#25163#26426',jy.na as ' +
        #23601#19994#21333#20301',st.photo'
      'from st,sex,jy,cl'
      'where st.sex=sex.id and st.cl=cl.id and st.jy=jy.id')
    Left = 304
    Top = 248
  end
  object temp2: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      
        'select st.id,st.co as '#36523#20221#35777',st.na as '#22995#21517',sex.na as '#24615#21035',st.bir as '#20986#29983#24180 +
        #26376',cl.na  as '#29677#32423',st.age as '#24180#40836',st.high as '#36523#39640', st.eyel as '#35270#21147#65288#24038#65289',st.e' +
        'yer as '#35270#21147#65288#21491#65289',st.addr as  '#20303#22336',st.tel as '#30005#35805',st.htel as '#25163#26426',jy.na as ' +
        #23601#19994#21333#20301',st.photo'
      'from st,sex,jy,cl'
      'where st.sex=sex.id and st.cl=cl.id and st.jy=jy.id')
    Left = 336
    Top = 248
  end
  object temp3: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      
        'select st.id,st.co as '#36523#20221#35777',st.na as '#22995#21517',sex.na as '#24615#21035',st.bir as '#20986#29983#24180 +
        #26376',cl.na  as '#29677#32423',st.age as '#24180#40836',st.high as '#36523#39640', st.eyel as '#35270#21147#65288#24038#65289',st.e' +
        'yer as '#35270#21147#65288#21491#65289',st.addr as  '#20303#22336',st.tel as '#30005#35805',st.htel as '#25163#26426',jy.na as ' +
        #23601#19994#21333#20301',st.photo'
      'from st,sex,jy,cl'
      'where st.sex=sex.id and st.cl=cl.id and st.jy=jy.id')
    Left = 368
    Top = 248
  end
  object infocl_q: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select *'
      'from cl')
    Left = 264
    Top = 216
  end
  object da_infocl: TDataSource
    DataSet = infocl_q
    Left = 264
    Top = 272
  end
end