Update Sorgusunda String Kaydetmek

Özür dilerim örnek karışmış Mesaj#8 i güncelliyorum

Güncelledim

teşekkürler userx ama benim Vba ile bunu yapmam lazım şöyle yazarsam oluyor

strSQL = "UPDATE tSorgu SET tSorgu.id1 =""01"" WHERE (((tSorgu.id)=709));"

ama buradaki  "01" string değişkeni  ve 709 integer değişkeni

strSQL = "UPDATE tSorgu SET tSorgu.id1 =" & asd & " WHERE tSorgu.id =" & asde & ";"

bu hale nasıl çevirebilirim

strSQL = "UPDATE tSorgu SET tSorgu.id1 =" & "'" & asd & "'" & " WHERE tSorgu.id=" & asde & ";"

bu şekilde yazılması gerekiyormuş