国产一区二区欧美精品免费-欧美国产日韩在线视频-欧美亚洲国语精品一区二区-欧美激情五月综合啪啪-国产69精品麻豆久久久久-亚洲人成精品久久久久桥网站-欧美刺激肥熟在线视频-十七岁日本免费完整版BD-黑夜在线拖拽不卡第一页

本人想通過(guò)EXCEL調(diào)取Sql server中BOM信息，但因?yàn)閂BA中字符變量有255字符限制，SQL查詢語(yǔ)句超過(guò)1500字符，導(dǎo)致SQL查詢語(yǔ)句無(wú)法執(zhí)行。想請(qǐng)教如何突破字符變量255字符限制，網(wǎng)上有說(shuō)一些解決辦法，可試了根本沒(méi)用。

環(huán)境版本：EXCEL 2019

舉例：

Dim strSQL as string

Dim strCn as string

Dim cn As Object
Dim rs As Object
Set cn = CreateObject("Adodb.Connection")
Set rs = CreateObject("Adodb.Recordset")

strCn = "Provider=sqloledb;Server=" 192.168.1.100 ";Database="ERP";Uid="sa";Pwd="123456"

strSQL=”WITH BC (G,H,I,J,K,L,M,N,O,P,Q,R,S,T) AS (SELECT c3.BOMMaster B,c4.Code H,c4.Name I,c4.SPECS J,c3.UsageQty K,c3.IssueUOM L,c3.SupplyWareHouse M,c3.ParentQty N,c4.ItemFormAttribute O,c3.IssueStyle P,c4.DescFlexField_PrivateDescSeg3 Q,c5.MinRcvQty R,c6.PurProcessLT S,c6.FixedLT T FROM CBO_BOMComponent c3 LEFT JOIN CBO_ItemMaster c4 ON c3.ItemMaster = c4.ID LEFT JOIN dbo.CBO_PurchaseInfo c5 ON c4.PurchaseInfo=c5.ID LEFT JOIN dbo.CBO_MrpInfo c6 ON c4.MrpInfo=c6.ID), FBC ( A,B,D,C, E, F) AS (SELECT  m1.Org A,m1.ID B,m1.BOMVersionCode D,c2.Code C,c2.Name E,c2.SPECS F FROM CBO_BOMMaster m1 LEFT JOIN CBO_ItemMaster c2 ON m1.ItemMaster = c2.ID WHERE m1.DisableDate>=GETDATE() AND m1.EffectiveDate<=GETDATE() AND m1.Status=2 AND m1.org='1001911084536821'), FB (A,B,C,D,E,F,G,H,I,J, K,L,M,N,O,P,Q,R,S,T) AS (SELECT u.A,u.B,u.C,u.D,u.E,u.F,v.G,v.H,v.I,v.J,v.K,v.L,v.M,v.N,v.O,v.P,v.Q,v.R,v.S,v.T FROM FBC u LEFT JOIN BC v ON v.G = u.B),
TR(A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T) AS (SELECT * FROM FB where C ='SMDU26GB0028' AND D='E03' UNION ALL SELECT t1.A,t1.B,t1.C,t1.D,t1.E,t1.F,t1.G,t1.H,t1.I,t1.J,t1.K,t1.L,t1.M,t1.N,t1.O,t1.P,t1.Q,t1.R,t1.S,t1.T FROM FB t1 JOIN TR t2 ON t1.C = t2.H)
SELECT * FROM TR”

cn.Open strCn
rs.Open strSQL, cn
------------------------------------------------------------

strSQL會(huì)被截?cái)酁?55個(gè)字符