sor = "Select * from yazi where id='"&id&"';"

olarak dener misin? İşe yararsa id alanının türünü numeric/AutoNumber yapman gerekiyor.