主题：后台自动更新,循环代码请教老师

表中的代码如下:

If e.DataCol.Name = "背面规格" Then
    Dim cmd As New SQLCommand
    Dim dt As DataTable
    Dim dr As DataRow = e.DataRow
    cmd.C
    cmd.CommandText = "SELECT * From {表B} Where [产品编号] = '" & dr("产品编号") & "'"
    dt = cmd.ExecuteReader
    If dt.DataRows.Count > 0 Then
        Dim Multi As String = dt.DataRows(0)("背面规格")
        Dim Values() As String
        Values = Multi.split("|")
        For Each Index As String In Values
            If e.DataRow("背面规格") <> Index Then
               
            End If
        Next

    End If
End If

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目16.zip