(04/10/2024, 12:16)atoykan yazdı:

Dim Sql As String, a1 As String

SQL = "Select * from tbl_Data"

rs.Open SQL, cn, 1, 3

If a1 <> "" Then 

    rs!Aciklama1 = a1

Else

    rs!Aciklama1 = ""

End If

rs.Update

rs.Close

şeklinde deneyin. Null yerine "" boş bir string değer işlemek daha doğru olacaktır.

Tamamdır Hocam söylediğiniz gibi deneyeceğim