?????????????????????????????????洢????????????????????????о????????????????

??????д?洢?????????????????к??????????紴????洢???????????????????????????????????д???洢???????SQL Server??????λ??????????????洢??????????????????????????

???????????????????????????????????????????????????????????????????????????????????????????????????????????????

set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go


ALTER PROCEDURE [dbo].[OperRecordThree]
 --????????????????????????δ????????????????
  @File varchar(10)??   --???0
 @Operator varchar(2)??--??????0
 @Context varchar(10)??--????0
 
 @RelationOne varchar(3)??--???1
 @FileOne varchar(10)?? --???1
 @OperatorOne varchar(2)?? --??????1
 @ContextOne varchar(10)??--????1
 
 @RelationTwo varchar(3)??--???2
 @FIleTwo varchar(10)??  --???2
 @OperatorTwo varchar(2)??--??????2
 @ContextTwo varchar(10)--????2
AS
 --?????????????
 DECLARE @TempSql varchar(500)
BEGIN
   --char(32)????char(39)???????
 set @TempSql=??select * from workingTeacher where ??+char(32)
+@File+@Operator+char(39)+@Context+char(39)
+char(32)+@RelationOne+char(32)
+@FileOne+@OperatorOne+char(39)+@ContextOne+char(39)
+char(32)+@RelationTwo+char(32)
+@FIleTwo+@OperatorTwo+char(39)+@ContextTwo+char(39)
 --??????????????????洢????????
 execute (@tempsql)
END
 


???????????

execute OperRecordThree ??robot??????<>??????3??????and??????levels??????<>?????????????????and??????robot??????<>??????2??


??????????DAL?????ú?????

#Region "????????????????????"
    Public Function OperatorRecordThree(ByVal OperatorRec() As Entry.StuBaseInfoInq) As DataTable
        Dim sql As String = "OperRecordThree"
        Dim sqlcmd As SqlCommand = New SqlCommand(sql?? con)
        Dim dt As New DataTable
        Dim dst As New DataSet
        Dim MyDataAdapter As New SqlDataAdapter
        sqlcmd.CommandType = CommandType.StoredProcedure
        ????????洢???????????
        sqlcmd.Parameters.Add("@File"?? SqlDbType.VarChar?? 10).Value = OperatorRec(0).Field
        sqlcmd.Parameters.Add("@Operator"?? SqlDbType.VarChar?? 2).Value = OperatorRec(0).Oper
        sqlcmd.Parameters.Add("@Context"?? SqlDbType.VarChar?? 10).Value = OperatorRec(0).Context

        sqlcmd.Parameters.Add("@RelationOne"?? SqlDbType.VarChar?? 3).Value = OperatorRec(1).Relation
        sqlcmd.Parameters.Add("@FileOne"?? SqlDbType.VarChar?? 10).Value = OperatorRec(1).Field
        sqlcmd.Parameters.Add("@OperatorOne"?? SqlDbType.VarChar?? 2).Value = OperatorRec(1).Oper
        sqlcmd.Parameters.Add("@ContextOne"?? SqlDbType.VarChar?? 10).Value = OperatorRec(1).Context

        sqlcmd.Parameters.Add("@RelationTwo"?? SqlDbType.VarChar?? 3).Value = OperatorRec(2).Relation
        sqlcmd.Parameters.Add("@FileTwo"?? SqlDbType.VarChar?? 10).Value = OperatorRec(2).Field
        sqlcmd.Parameters.Add("@OperatorTwo"?? SqlDbType.VarChar?? 2).Value = OperatorRec(2).Oper
        sqlcmd.Parameters.Add("@ContextTwo"?? SqlDbType.VarChar?? 10).Value = OperatorRec(2).Context

        MyDataAdapter.SelectCommand = sqlcmd
        MyDataAdapter.Fill(dst?? "workingTeacher")
        dt = dst.Tables("workingTeacher")
        con.Open()
        sqlcmd.ExecuteNonQuery().ToString()
        Return dt
        con.Close()
    End Function
#End Region