unit2.dfm

老师随机点到

object DM: TDM
  OldCreateOrder = False
  OnDestroy = DataModuleDestroy
  Left = 192
  Top = 111
  Height = 291
  Width = 468
  object CNNSQL: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=test;Persist Security Info=True;Use' +
      'r ID=SQLTestDB;Initial Catalog=SQLDB;Data Source=127.0.0.1'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 40
    Top = 24
  end
  object qrySQLStus: TADOQuery
    Connection = CNNSQL
    Parameters = <>
    SQL.Strings = (
      'Select * From Students')
    Left = 328
    Top = 32
  end
  object cmdGlobal: TADOCommand
    Connection = CNNSQL
    Parameters = <>
    Left = 120
    Top = 32
  end
  object tblSQLStus: TADOTable
    Connection = CNNSQL
    TableName = 'Students'
    Left = 232
    Top = 32
  end
  object CNNExcel: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=04'#35745#26412'34.xls;Extended' +
      ' Properties=Excel 8.0;Persist Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 48
    Top = 160
  end
  object qryTmp: TADOQuery
    Connection = CNNSQL
    Parameters = <>
    Left = 408
    Top = 40
  end
  object tblExelStus: TADOTable
    Connection = CNNExcel
    CursorType = ctStatic
    TableName = '[Sheet1$]'
    Left = 128
    Top = 160
    object tblExelStusDSDesigner: TWideStringField
      DisplayWidth = 15
      FieldName = #23398#21495
      Size = 255
    end
    object tblExelStusDSDesigner2: TWideStringField
      DisplayWidth = 15
      FieldName = #22995#21517
      Size = 255
    end
    object tblExelStusDSDesigner3: TWideStringField
      DisplayWidth = 15
      FieldName = #29677#32423
      Size = 255
    end
  end
end