⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dataenvironment1.dsr

📁 本系统实现了对实验室设备的增删改查等基本的功能
💻 DSR
📖 第 1 页 / 共 3 页
字号:
         RealName        =   "Param1"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      BeginProperty P2 
         RealName        =   "Param2"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset6 
      CommandName     =   "Cmdlend"
      CommDispId      =   1054
      RsDispId        =   1058
      CommandText     =   "select * from Lend_Info_VIEW where Lend_Date between ? and ?"
      ActiveConnectionName=   "cntloginfo"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   9
      BeginProperty Field1 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   129
         Name            =   "Equip_ID"
         Caption         =   "Equip_ID"
      EndProperty
      BeginProperty Field2 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Type_Name"
         Caption         =   "Type_Name"
      EndProperty
      BeginProperty Field3 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   129
         Name            =   "Lab_Name"
         Caption         =   "Lab_Name"
      EndProperty
      BeginProperty Field4 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Lend_Unit"
         Caption         =   "Lend_Unit"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Lend_Tel"
         Caption         =   "Lend_Tel"
      EndProperty
      BeginProperty Field6 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "Lend_Date"
         Caption         =   "Lend_Date"
      EndProperty
      BeginProperty Field7 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "Return_Date"
         Caption         =   "Return_Date"
      EndProperty
      BeginProperty Field8 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "Type_ID"
         Caption         =   "Type_ID"
      EndProperty
      BeginProperty Field9 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "Lab_ID"
         Caption         =   "Lab_ID"
      EndProperty
      NumGroups       =   0
      ParamCount      =   2
      BeginProperty P1 
         RealName        =   "Param1"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      BeginProperty P2 
         RealName        =   "Param2"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset7 
      CommandName     =   "Cmdin"
      CommDispId      =   1059
      RsDispId        =   1063
      CommandText     =   "select * from Buy_Info_VIEW where Equip_Date between ? and ?"
      ActiveConnectionName=   "cntloginfo"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   10
      BeginProperty Field1 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   129
         Name            =   "Equip_ID"
         Caption         =   "Equip_ID"
      EndProperty
      BeginProperty Field2 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "Equip_Date"
         Caption         =   "Equip_Date"
      EndProperty
      BeginProperty Field3 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "Equip_Price"
         Caption         =   "Equip_Price"
      EndProperty
      BeginProperty Field4 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "Equip_Year"
         Caption         =   "Equip_Year"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   200
         Scale           =   0
         Type            =   200
         Name            =   "Equip_Else"
         Caption         =   "Equip_Else"
      EndProperty
      BeginProperty Field6 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Type_Name"
         Caption         =   "Type_Name"
      EndProperty
      BeginProperty Field7 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   129
         Name            =   "Lab_Name"
         Caption         =   "Lab_Name"
      EndProperty
      BeginProperty Field8 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Orter_Name"
         Caption         =   "Orter_Name"
      EndProperty
      BeginProperty Field9 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "Type_ID"
         Caption         =   "Type_ID"
      EndProperty
      BeginProperty Field10 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "Lab_ID"
         Caption         =   "Lab_ID"
      EndProperty
      NumGroups       =   0
      ParamCount      =   2
      BeginProperty P1 
         RealName        =   "Param1"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      BeginProperty P2 
         RealName        =   "Param2"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset8 
      CommandName     =   "Cmdlog2"
      CommDispId      =   1064
      RsDispId        =   1068
      CommandText     =   "select * from Log_Info where 日期< ?"
      ActiveConnectionName=   "cntloginfo"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   6
      BeginProperty Field1 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   200
         Name            =   "操作员"
         Caption         =   "操作员"
      EndProperty
      BeginProperty Field2 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "日期"
         Caption         =   "日期"
      EndProperty
      BeginProperty Field3 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "操作时间"
         Caption         =   "操作时间"
      EndProperty
      BeginProperty Field4 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   200
         Name            =   "操作模块"
         Caption         =   "操作模块"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   200
         Name            =   "操作"
         Caption         =   "操作"
      EndProperty
      BeginProperty Field6 
         Precision       =   0
         Size            =   100
         Scale           =   0
         Type            =   200
         Name            =   "备注"
         Caption         =   "备注"
      EndProperty
      NumGroups       =   0
      ParamCount      =   1
      BeginProperty P1 
         RealName        =   "Param1"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset9 
      CommandName     =   "Cmdin1"
      CommDispId      =   1069
      RsDispId        =   1073
      CommandText     =   "select * from Buy_Info_VIEW where Lab_Name=?"
      ActiveConnectionName=   "cntloginfo"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   10
      BeginProperty Field1 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   129
         Name            =   "Equip_ID"
         Caption         =   "Equip_ID"
      EndProperty
      BeginProperty Field2 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "Equip_Date"
         Caption         =   "Equip_Date"
      EndProperty
      BeginProperty Field3 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "Equip_Price"
         Caption         =   "Equip_Price"
      EndProperty
      BeginProperty Field4 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "Equip_Year"
         Caption         =   "Equip_Year"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   200
         Scale           =   0
         Type            =   200
         Name            =   "Equip_Else"
         Caption         =   "Equip_Else"
      EndProperty
      BeginProperty Field6 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Type_Name"
         Caption         =   "Type_Name"
      EndProperty
      BeginProperty Field7 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   129
         Name            =   "Lab_Name"
         Caption         =   "Lab_Name"
      EndProperty
      BeginProperty Field8 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Orter_Name"
         Caption         =   "Orter_Name"
      EndProperty
      BeginProperty Field9 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "Type_ID"
         Caption         =   "Type_ID"
      EndProperty
      BeginProperty Field10 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "Lab_ID"
         Caption         =   "Lab_ID"
      EndProperty
      NumGroups       =   0
      ParamCount      =   1
      BeginProperty P1 
         RealName        =   "Param1"
         Direction       =   1
         Precision       =   255
         Scale           =   255
         Size            =   16
         DataType        =   200
         HostType        =   8
         Required        =   -1  'True
      EndProperty
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset10 
      CommandName     =   "Cmdlend1"
      CommDispId      =   1074
      RsDispId        =   1079
      CommandText     =   "select * from Lend_Info_VIEW where Return_Date is null"
      ActiveConnectionName=   "cntloginfo"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   9
      BeginProperty Field1 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   129
         Name            =   "Equip_ID"
         Caption         =   "Equip_ID"
      EndProperty
      BeginProperty Field2 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Type_Name"
         Caption         =   "Type_Name"
      EndProperty
      BeginProperty Field3 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   129
         Name            =   "Lab_Name"
         Caption         =   "Lab_Name"
      EndProperty
      BeginProperty Field4 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Lend_Unit"
         Caption         =   "Lend_Unit"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   2147483647
         Scale           =   0
         Type            =   201
         Name            =   "Lend_Tel"

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -