訪問VBA SQL where子句問題

我需要一些幫助。當我運行下面的查詢時，我得不到任何結果，如果我包含在哪裏的Pkg編號部分。當我在Access中運行查詢時，它工作正常。瓦爾的例如包號1_282 Rptdt 201301訪問VBA SQL where子句問題

Dim db As Database 'generic database object 
Dim rst As Recordset 'this is going to hold the query result 
Set db = CurrentDb 
Dim PKG As Double 
Dim rptDT As Double 
Dim wireDT As Date 

Set rst = db.OpenRecordset("SELECT Max(tbl_Revision.Revision_Number) as Revision_Number FROM tbl_Revision" & _ 
" where (tbl_Revision.RUN_YR_MO=" & rptDT & ")" & _ 
" and (tbl_Revision.Package_Number=" & PKG & ")") 

getRevision = rst!Revision_Number + 1

來源

2013-09-27 James.l.Norman

什麼類型的tbl_Revision.Package_Number是？ – 4dmonster

package_number是表中的文本字段。 –

如果你想1_282工作的PKG不能是一個雙。所以把它做成一個字符串。您還必須添加報價：

" where (tbl_Revision.RUN_YR_MO='" & rptDT & "')" & _

來源

2013-09-27 13:51:35 Wietze314

「和（tbl_Revision.Package_Number =」＆PKG＆「）」） –

訪問VBA SQL where子句問題

回答

相關問題