以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 编辑长代码时的困扰 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=8962) |
-- 作者:小狐 -- 发布时间:2011/1/4 22:25:00 -- 编辑长代码时的困扰 编写多行代码,或者在sql 企业管理器中调试好的多行代码 移到foxtable ,
要么把 回车行删除 ,整为一行 要么设置字符变量,将代码分为多行, 每一行加上vbcrlf 最后作为该字符变量的值
这两种方式都超级麻烦,回车行删除,代码太长,不利于阅读。 用vbcrlf,后期有调整又要把全部的代码复制出来,在把vbcrlf等代码删除,还原 遇到sql多行代码在套用到foxtable的变量 头都做晕了,
建议对多行代码的头尾加上特殊符号 ,只要头尾加就可以了,操作简单一点,也利于后期的阅读与调整 [此贴子已经被作者于2011-1-4 22:42:39编辑过]
|
-- 作者:狐狸爸爸 -- 发布时间:2011/1/4 22:43:00 -- 这个不是我能决定的 |
-- 作者:foxor -- 发布时间:2011/1/5 8:18:00 -- 是有点,不过在Word中统一替换后再粘贴,也不致于超级麻烦 |
-- 作者:狐狸爸爸 -- 发布时间:2011/1/5 9:11:00 -- 其实这样写也行: Dim s As String s = "; With cte As (" & _ " Select a.出库单号, 客户, b.产品, 最后订购日期= 日期 ,订购数量=数量" & _ " from 出库 a , 出库明细 b " & _ " where a.出库单号=b.出库单号) " & _ " Select * from cte t " & _ " where not exists(Select 1 from cte where 客户=t.客户 And 产品=t.产品 And 最后订购日期>t.最后订购日期)" |