πεδίο τηλεφώνου

[ΚΩΣΤΑΣ2]

Καλησπέρα
Έχω στο πεδίο τηλεφώνου δεκαψήφιους και επταψήφιους
Θέλω στους επταψήφιους να προσθέσω το 210
Ευχαριστώ

[pakos]

καλησπερα

σε ενα κουμπι διαδικασια συμβαντος

Private Sub Εντολή0_Click()
DoCmd.RunSQL "UPDATE Πίνακας SET Πίνακας.phone = ""210"" & [phone] " & _
" WHERE (((Len([phone]))<10));"
End Sub

η

Private Sub Εντολή0_Click()
DoCmd.RunSQL "UPDATE Πίνακας SET Πίνακας.phone = ""210"" & [phone] " & _
" WHERE (((Len([phone]))=7));"
End Sub