随笔分类 -  三调DB

摘要:Sub tt() Dim i As Integer For i = 2 To ActiveSheet.UsedRange.Rows.Count If Sheets(1).Cells(i, 6) <> "" Then Dim j As Integer For j = 2 To 153 If Sheet 阅读全文
posted @ 2021-01-02 15:14 橙香夜雨 阅读(66) 评论(0) 推荐(0)
摘要:SELECT * FROM FJ WHERE EXISTS (SELECT TBYBH FROM "关联错误信息" WHERE 举证图斑预编号 = FJ.TBYBH) SELECT 改为 DELETE 即为删除 后续 SELECT * FROM "FJ" WHERE ((FJ ISNULL and 阅读全文
posted @ 2021-01-02 15:04 橙香夜雨 阅读(62) 评论(0) 推荐(0)