如何清空整筆資料的某一欄位值呢？

dechiuan999

各位大大好：
小弟正在學習使用vba
操作access資料庫
現有一範例想將查詢的
某一筆資料指定的欄位：縣市
相符時將該縣市欄位值清空
但小弟使用vba語法會出現
錯誤訊息。請問小弟應如何
改正語法呢？

執行階段錯誤-2147217887 (80040e21)
供應商資訊行政區欄位不能是零長度字串

1. Option Compare Database
   
2. Option Explicit
   
3. 
   
4. 'ADO 記錄更新
   
5. Public Sub ADOcontoExtDB()
   
6.   Dim con2 As New ADODB.Connection
   
7.   Dim rcord2 As New ADODB.Recordset
   
8.   
   
9.   Set con2 = CurrentProject.Connection
   
10.   rcord2.Open "Select * From 供應商資訊 Where 縣市 Like '台中%'", _
    
11.               con2, adOpenKeyset, adLockPessimistic
    
12.   With rcord2
    
13.     Do While Not .EOF
    
14.     Debug.Print .AbsolutePosition, .Fields("供應商編號"), .Fields(2), .Fields(3), .Fields(6)
    
15.     .MoveNext
    
16.     Loop
    
17.   End With
    
18.   rcord2.MoveFirst
    
19.   
    
20.   With rcord2
    
21.     Do While Not .EOF
    
22.       .Fields(6).Value = ""   '如果雙引號內加單引號可執行，但不加單引號就會出現錯誤訊息
    
23.       .MoveNext
    
24.     Loop
    
25.   End With
    
26.   con2.Close
    
27. End Sub

複製代碼

Jackie_1st

如果將該欄位的"允許零長度字串"設定為yes應改可以解決

dechiuan999

回復 2# aa7551


    大大您好：

謝謝您！
但小弟是想讓使用者可以
修改一筆資料內某一欄位資料
或是可清空欄位資料。
因此，不想改變原設計內容。

感恩大大！

aa7551

執行階段錯誤-2147217887 (80040e21)
供應商資訊行政區欄位不能是零長度字串,如果="",則符合錯誤訊息,因為資料為零長度字串,應改設定