business_restor.dfm

EasyGasDpr 瓶装液化气 钢瓶 SQL,用户名：SYSTEM 密码：空

object restoredlg: Trestoredlg
  Left = 373
  Top = 199
  Width = 345
  Height = 261
  BorderIcons = []
  Caption = #25968#25454#36824#21407
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Bevel1: TBevel
    Left = 8
    Top = 4
    Width = 321
    Height = 173
    Shape = bsFrame
  end
  object Label1: TLabel
    Left = 12
    Top = 184
    Width = 30
    Height = 12
    Caption = #27880#24847':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 12
    Top = 200
    Width = 144
    Height = 12
    Caption = #24674#22797#31243#24207#24517#39035#22312#26381#21153#22120#25191#34892
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Edit2: TLabeledEdit
    Left = 16
    Top = 64
    Width = 173
    Height = 18
    Ctl3D = False
    EditLabel.Width = 48
    EditLabel.Height = 12
    EditLabel.Caption = #29992#25143#21517#31216
    ParentCtl3D = False
    TabOrder = 1
    OnKeyDown = Edit1KeyDown
  end
  object Edit3: TLabeledEdit
    Left = 192
    Top = 64
    Width = 125
    Height = 18
    Ctl3D = False
    EditLabel.Width = 48
    EditLabel.Height = 12
    EditLabel.Caption = #29992#25143#23494#30721
    ParentCtl3D = False
    PasswordChar = '*'
    TabOrder = 2
    OnKeyDown = Edit1KeyDown
  end
  object BitBtn1: TBitBtn
    Left = 176
    Top = 188
    Width = 70
    Height = 25
    Caption = #30830#23450
    ModalResult = 1
    TabOrder = 4
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 260
    Top = 188
    Width = 70
    Height = 25
    Caption = #21462#28040
    TabOrder = 5
    OnClick = BitBtn2Click
    Kind = bkCancel
  end
  object Edit4: TLabeledEdit
    Left = 16
    Top = 104
    Width = 301
    Height = 18
    Ctl3D = False
    EditLabel.Width = 168
    EditLabel.Height = 12
    EditLabel.Caption = #25991#20214#20301#32622'['#26381#21153#22120#19978#30340#25991#20214#36335#24452']'
    ParentCtl3D = False
    TabOrder = 3
    OnKeyDown = Edit1KeyDown
  end
  object Edit1: TLabeledEdit
    Left = 16
    Top = 24
    Width = 137
    Height = 18
    Ctl3D = False
    EditLabel.Width = 78
    EditLabel.Height = 12
    EditLabel.Caption = #26381#21153#22120'IP/'#21517#31216
    ParentCtl3D = False
    TabOrder = 0
    OnKeyDown = Edit1KeyDown
  end
  object WINSA: TCheckBox
    Left = 164
    Top = 24
    Width = 141
    Height = 17
    Caption = #20351#29992'WINDOWS'#23433#20840#35748#35777
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 6
    OnClick = WINSAClick
  end
  object DBPATH: TLabeledEdit
    Left = 20
    Top = 144
    Width = 297
    Height = 18
    Ctl3D = False
    EditLabel.Width = 222
    EditLabel.Height = 12
    EditLabel.Caption = #25968#25454#23384#25918#20301#32622'['#26381#21153#22120#19978#30340#36335#24452','#24517#39035#23384#22312']'
    ParentCtl3D = False
    TabOrder = 7
    Text = 'C:\'
    OnExit = DBPATHExit
    OnKeyDown = Edit1KeyDown
  end
  object ADOC: TADOConnection
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 236
    Top = 12
  end
  object ADOCOMM: TADOCommand
    CommandText = 
      '  With RestDatabase.Dialog do'#13#10'  begin'#13#10'    try'#13#10'    ADOCOMM.com' +
      'mandtext:='#39'RESTORE DATABASE EASY_BUSINESS FROM DISK = '#39'+#39+File' +
      'name+#39+'#39' WITH MOVE '#39'+#39+'#39'EASY_BUSINESS_data'#39'+#39+'#39' TO '#39'+#39+'#39 +
      'EASY_BUSINESS1.mdf'#39'+#39+'#39', MOVE '#39'+#39+'#39'EASY_BUSINESS_log'#39'+#39+'#39' ' +
      'TO '#39'+#39+'#39'EASY_BUSINESS1.ldf'#39'+#39;'#13#10'    ADOCOMM.Execute;'#13#10'    fi' +
      'nally'#13#10'    end;'#13#10'  end;'#13#10
    Connection = ADOC
    Parameters = <
      item
        Name = 
          '='#39'RESTORE DATABASE EASY_BUSINESS FROM DISK = '#39'+#39+Filename+#39+' +
          #39' WITH MOVE '#39'+#39+'#39'EASY_BUSINESS_data'#39'+#39+'#39' TO '#39'+#39+'#39'EASY_BUSI' +
          'NESS1.mdf'#39'+#39+'#39', MOVE '#39'+#39+'#39'EASY_BUSINESS_log'#39'+#39+'#39' TO '#39'+#39+' +
          #39'EASY_BUSINESS1.ldf'#39'+#39'
        Size = -1
        Value = Null
      end>
    Left = 268
    Top = 12
  end
  object ActionList1: TActionList
    Left = 204
    Top = 12
    object OPE: TFileOpen
      Caption = #25171#24320#25991#20214
      Hint = #35831#36873#25321#35201#24674#22797#30340#25968#25454#24211
      ImageIndex = 7
      OnAccept = OPEAccept
    end
  end
end