SQL执行问题

wind7412

请教：
我有一段代码如下：
“Dim DBRst As New ADODB.Recordset
Dim SQLRst As String
Dim i As String
Dim dateKS As String
Dim dateJZ As String
'DBRst.ActiveConnection = ConnDB
'DBRst.CursorLocation = adUseServer
'DBRst.LockType = adLockBatchOptimistic
dateKS = Me.txtKSRQ
dateJZ = Me.txtJZRQ
SQLRst = "select INVENTORY_ITEM_ID  from inv.mtl_system_items_b " _
            & "where inventory_item_status_code='Active' AND CREATED_BY = '1063' and （organization_id = '28' OR organization_id = '31') " _
            & "and (CREATION_DATE between to_date('" & dateKS & "','yyyy/mm/dd') & " _
            & "and to_date('" & dateJZ & "','yyyy/mm/dd')) "
DBRst.Open SQLRst, ConnDB, adOpenStatic”
在调试时，本地窗口中SQLRst的值是：
"select INVENTORY_ITEM_ID  from inv.mtl_system_items_b
where inventory_item_status_code='Active'
AND CREATED_BY = '1063'
and （organization_id = '28' OR organization_id = '31')
and (CREATION_DATE between to_date('2016/9/12','yyyy/mm/dd') & and to_date('2"
为什么会截断呢？

wind7412

xinrenq 发表于 2016-9-26 20:12
你是怎么调试的？是用debug么？

把本地窗口打开就能看到
来自: 微社区

xinrenq

你是怎么调试的？是用debug么？

wind7412

谢谢回复，已解决，是代码中多了个＆。
来自: 微社区

tmtony

1. 可能太长了
2. 可能你原来 文字中有 回车符 ，你删除干净 空白，再添加空白看看
3.或用replace 把 vbcrlf vbcr vblf 都替换掉