[分享]文章《有關 JET SQL “位與”等位操作》

zhuyiwen

    經(jīng)測試,在 JET 4.0 (Access 2000 及以后版本中) 支持 BAND (Binary AND) / BOR (Binary OR) / BXOR (Binary XOR) / BNOT (Binary NOT) 操作。但 不 能用于 ACCESS 查詢。可以通過 ADO 語句調(diào)用。



例：

1. Function TestBand()
   
   
2.     Dim rs As New ADODB.Recordset
   
   
3.     Dim strSql As String
   
   
4. 
   
   
5.     strSql = "SELECT c2, (c2 BAND 2) As MyResult FROM cc;"
   
   
6.     rs.Open strSql, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
   
   
7. 
   
   
8.     Do While Not rs.EOF
   
   
9.         Debug.Print rs!c2, rs!MyResult
   
   
10.         rs.MoveNext
    
    
11.     Loop
    
    
12. 
    
    
13.     rs.Close
    
    
14.     Set rs = Nothing
    
    
15. End Function

復制代碼

運行結果：

1             0

2             2

3             2

4             0

5             0

6             2

7             2

8             0

9             0



可是, 未找到任何正式的文檔說明.



2004.08.10

ui

不錯，深層次！值！

zhuyiwen

還支持 BNOT (Binary NOT)

tmtony

不錯，學到一招。

sweetduck

深奧。。。