主题：什么弄个提示是否已重复-未増加行显示在 Case "库存盘点.htm" '网页里

保存前先判断，e.PostValues("商品条码")在数据库是否存在，存在就提示重复并返回，否则保存

http://www.foxtable.com/mobilehelp/topics/0058.htm

最好把这个页面完整代码发上来，不知道是不是这个意思？

If e.PostValues("商品条码") IsNot Nothing Then
    Dim dr提示 As DataRow = DataTables("标签明细201609").sqlFind("商品条码 = '" & e.PostValues("商品条码") & "' And  库存店名 = '" & dr3("账号企业名") & " 'And  库存备注 = '柜台货'")
    Dim dr提示2 As DataRow = DataTables("手机盘点明细").sqlFind("商品条码 = '" & e.PostValues("商品条码") & "' And  店名 = '" & dr3("账号企业名") & " '")
    If dr提示("商品条码") IsNot Nothing And dr提示2("商品条码") Is Nothing Then
        wb.InsertHTML("", "<div style='width:79.5%;height:50px;background-color:#cc040060;float:left;border-radius:5px;'> 有条码 </div>")
        'ElseIf dr提示("商品条码") Is Nothing  Then
    ElseIf dr提示("商品条码") IsNot Nothing And dr提示2("商品条码") IsNot Nothing Then
        wb.InsertHTML("", "<div style='width:79.5%;height:50px;background-color:#cc040060;float:left;border-radius:5px;'> 重复条码 </div>")
    End If
Else
    wb.InsertHTML("", "<div style='width:79.5%;height:50px;background-color:#cc040060;float:left;border-radius:5px;'> 无条码 </div>")
    Return Nothing '必须返回
End If

按照你一楼逻辑，没有条码是不是应该新增，就不需要提示了。